Spodaj si bomo ogledali program v Excel VBA to ločuje strune.
Situacija:
Na delovni list postavite ukazni gumb in dodajte naslednje kodne vrstice:
1. Najprej razglasimo spremenljivko, imenovano polno ime tipa String, spremenljivko, imenovano ukaz tipa Integer, in spremenljivko, imenovano i, tipa Integer.
Zatemni polno ime kot niz, ukaz As Integer, i As Integer
Težava, s katero se ukvarjamo, je, da moramo Excelu VBA povedati, kje želimo ločiti niz. V primeru Smitha je vejica Mike na mestu 6, v primeru Williamsa pa Janet vejica na mestu 9.
2. Za izvedbo operacij pri vsakem imenu, vnesenem v Excel, uporabljamo zanko. Najprej inicializiramo spremenljivko polno ime. Nato s funkcijo Instr poiščemo vejico.
Za i = 2 do 7
polno ime = celice (i, 1) .Vrednost
ukaz = InStr (polno ime, ",")
3. Nazadnje želimo del za vejico zapisati v stolpec B in del pred vejico v stolpec C. To lahko dosežete z dodajanjem vrstic:
Celice (i, 2). Vrednost = srednja (polno ime, ukaz + 2)
Celice (i, 3). Vrednost = levo (polno ime, ukaz - 1)
Mid (polno ime, ukaz + 2) pomeni, da želimo del polnega imena, ki se začne pri znaku 'commaposition + 2' (to je točno prvo ime).
Levo (polno ime, ukaz - 1) pomeni, da želimo del polnega imena, ki se začne na začetku, do znaka 'ukaz -1' (to je ravno priimek).
4. Ne pozabite zapreti zanke.
Naprej i
5. V obseg ("A2: A7") dodajte šest imen, ločenih z vejico in presledkom.
6. Preizkusite program.
Rezultat: