VBA-konkatenaatti | Kuinka ketjuttaa ketjut yhdessä VBA: ssa?
Yhdistäminen tarkoittaa kahden arvon tai kahden merkkijonon yhdistämistä toisiinsa, samanlainen kuin Excel, jota käytämme & tai joka tunnetaan myös nimellä ampersand-operaattori ketjutukseen, kaksi ketjutettua kahta merkkijonoa, jota käytämme & operaattori, kuten merkkijono 1 ja merkkijono 2, nyt on tärkeä asia muistaa ja että on, että & operaattoria käytettäessä on annettava tilaa tai VBA harkitsee sitä niin kauan.
VBA-ketjutuskielet
VBA-konkatenaatti on yksi niistä asioista, joita käytimme yhdistämään kaksi tai useampia arvosoluarvoja yhteen, jos sanon yksinkertaisella kielellä, että se yhdistää, se yhdistää kaksi tai useampia arvoja yhteen saadakseen täyden arvon.
Meillä on Excelissä funktio nimeltä CONCATENATE, joka yhdistää kaksi tai useampia arvoja tai kaksi tai useampia soluarvoja yhdessä.
Mutta VBA: ssa meillä ei ole sisäänrakennettua toimintoa, joka yhdistää kaksi tai useampia arvoja yhdessä. Itse asiassa emme edes pääse laskentataulukon funktioluokkaan päästäksesi VBA CONCATENATE -funktioon laskentataulukko-funktiona.
Kuinka ketjuttaa ketjuja VBA: ssa?
Jos meillä ei ole minkäänlaista sisäänrakennettua toimintoa arvojen liittämiseen, eikä edes laskentataulukko-toimintoa ole integroitu VBA: han. Nyt haasteena on, kuinka yhdistämme arvot?
Vaikka sisäänrakennettuja toimintoja ei ole, voimme yhdistää VBA: ssa käyttämällä "ampersand" (&) -symbolia.
Jos seuraat postituksiamme säännöllisesti, käytämme usein ampersand (&) -symbolia koodauksessamme.
Esimerkiksi, jos sinulla on etu- ja sukunimi erikseen, voimme yhdistää nämä kaksi ja tehdä siitä täydellisen nimen. Kirjoita alla olevat vaiheet kirjoittamaan VBA-makrokoodi itse.
Vaihe 1: Siirry Visual Basic Editoriin ja luo VBA-alimenettely.
Vaihe 2: Määritä kolme muuttujaa merkkijonoksi .
Koodi:
Sub-ketjutus_esimerkki () Dim First_Name nimellä merkkijono Dim Last_Name nimellä merkkijono Dim Full_Name merkkijonon lopussa Sub
Vaihe 3: Määritä nyt muuttujalle etu- ja sukunimi .
Koodi:
Alaliitännän_esimerkki () Himmennä etunimi nimellä merkkijono Himmennä sukunimi nimellä merkkijono Himmenee koko_nimi nimellä merkkijono Etunimi = "Sachin" Sukunimi = "Tendulkar" Loppu
Vaihe 4: Yhdistä nyt nämä kaksi nimeä muuttujaan Full_Name käyttämällä ampersand- muuttujaa.
Koodi:
Alaliitännän_esimerkki () Himmennä etunimi nimellä merkkijono Himmennä sukunimi nimellä merkkijono Himmennä koko_nimi nimellä merkkijono Etunimi = "Sachin" Sukunimi = "Tendulkar" Koko_nimi = Etunimi ja sukunimi loppuosa
Vaihe 5: Näytä muuttujan Full_Name arvo nyt viestiruudussa.
Koodi:
Alaliittimen_esimerkki () Himmentää etunimi nimellä merkkijono Himmennä sukunimi nimellä merkkijono Himmennä koko_nimi nimellä merkkijono Etunimi = "Sachin" Sukunimi = "Tendulkar" Koko_nimi = Etunimi ja sukunimi MsgBox Koko_nimi Loppu
Suorita nyt koodi, jonka saamme koko nimen viestikenttään.
Tämän koko nimen ongelma on, että emme ole lisänneet etu- ja sukunimen erottimen merkkitilaa, kun etunimi ja sukunimi yhdistetään, yhdistetään myös välilyönti.
Koodi:
Alaliittimen_esimerkki () Himmentää etunimi nimellä merkkijono Himmennä sukunimi nimellä merkkijono Himmenee koko_nimi nimellä merkkijono Etunimi = "Sachin" Sukunimi = "Tendulkar" Koko_nimi = Etunimi & "" & Sukunimi MsgBox Koko_nimi Loppu
Tämä antaa oikean koko nimen nyt.
Tällä tavalla käyttämällä ampersandia, voimme liittää arvot. Nyt ratkaistaan laskentataulukko-ongelma etunimen ja sukunimen ratkaisemiseksi yhdessä, jotta siitä tulee täydellinen nimi.
Koska meidän on yhdistettävä monia nimiä, meidän on käytettävä silmukoita etunimen ja sukunimen yhdistämiseen. Alla oleva koodi tekee työn puolestasi.
Koodi:
Alaliitäntä_esimerkki1 () Dim i kokonaislukuna i = 2–9 solua (i, 3). Arvo = Solut (i, 1) & "" & Solut (i, 2) Seuraava i Loppu Sub
Tämä yhdistää etu- ja sukunimen aivan kuten VBA-ketjutustoimintomme.
Yleinen virhe Ampersand VBA -liitännässä
Jos huomaat koodini, olen lisännyt välilyönnin arvojen väliin ampersand-symbolin. Tämä on välttämätöntä VBA-ohjelmoinnin luonteen vuoksi.
Emme voi yhdistää arvoja ja ampertimerkkejä yhdessä, muuten saamme Compile Error kuten alla.
VBA-ketjutus JOIN-toiminnolla
VBA: ssa voimme käyttää JOIN-toimintoa arvojen yhdistämiseen. Tarkastele ensin VBA JOIN -funktion syntaksia.
- Matriisi on vain matriisi, joka pitää arvomme. Esimerkiksi sekä etu- että sukunimi.
- Erotin ei ole mitään, mutta mikä on erottimen kunkin ryhmän arvo, tässä tapauksessa, välilyönti.
Alla oleva koodi näyttää saman esimerkin.
Koodi:
Sub-ketjutus_esimerkki2 () Himmennä MyValues-vaihtoehtona Dim Full_Name As-merkkijono MyValues = Array ("Sachin", "Tendulkar") Full_Name = Liity (MyValues, "") MsgBox Full_Name End Sub
