Kuinka jakaa sarake VBA: n kautta

Anonim

Jos sinulla on vaikeuksia jakaa teksti kahteen tai useampaan erilliseen sarakkeeseen tietyn merkin perusteella, sinun kannattaa lukea tämä artikkeli.

Tässä artikkelissa aiomme oppia jakamaan nimen kolmeen soluun VBA: n avulla Microsoft Excelissä.

Otetaan esimerkki ymmärtääksemme, missä ja miten voimme jakaa nimen.

Sarakkeessa A on luettelo nimistä muodossa "Etunimi Alkuperäinen sukunimi". Haluamme jakaa koko sarakkeen kolmeen sarakkeeseen, joista toinen sisältää kaikki etunimet, toinen sisältää alkukirjaimen ja kolmas sisältää kaikki sukunimet .

Kirjoitamme VBA -koodin nimen jakamiseksi. Noudata alla annettuja ohjeita:-

Jaamme nimen kolmeen soluun käyttämällä VBA: ta. Katso alla oleva menettely ja koodi, niin ymmärrät sen helposti:-

  • Avaa VBA -sivu ja paina Alt+F11
  • Aseta moduuli
  • Siirry sitten Lisää -valikkoon ja napsauta menettelyä, josta saat menettelyn makron käynnistämiseksi
  • Kirjoita alla mainittu koodi:-
Julkinen alijakoNimi () X = Solut (Rivid.Count, 1) .End (xlUp) .Row For A = 1 to XB = InStr (Solut (A, 1), "") C = InStrRev (Solut (A, 1 ), "") Solut (A, 2) = Vasen (Solut (A, 1), B) Solut (A, 3) = Keskitaso (Solut (A, 1), B, C - B) Solut (A, 4 ) = Oikea (Solut (A, 1), Len (Solut (A, 1)) - C) Seuraava A Loppuosa 

Koodin selitys:- Ensin olemme antaneet makron nimen, sitten määritimme tietoalueen x: n avulla ja sitten käytimme A: ta, B: tä ja C: tä määrittelemään, kuinka arvot tulisi valita soluista.

  • Suorita makro Excelissä painamalla näppäintä F5
  • Kun suoritat makron, nimet jakautuvat kolmeen sarakkeeseen

Johtopäätös: Tällä tavalla voimme jakaa nimet kolmeen sarakkeeseen käyttämällä Microsoft Excelin VBA: ta.

Jos pidit blogistamme, jaa se ystävillesi Facebookissa. Voit myös seurata meitä Twitterissä ja Facebookissa.
Haluaisimme kuulla sinusta, kerro meille, kuinka voimme parantaa, täydentää tai innovoida työtämme ja parantaa sitä sinulle. Kirjoita meille sähköpostitse