Excel Visual Basic : Ako nahradiť reťazec v rámci zodpovednosti

Použitie programu Excel je vstavaný v programovacom jazyku Visual Basic for Applications alebo VBA , nahradiť reťazec v úvodzovkách pomocou funkcie Nahradiť , že jazyk je . Táto funkcia hľadá podreťazec , ktorý zadáte do väčšieho reťazca , potom nahradia podreťazec s treťou reťazec , ktorý poskytujú . Všimnite si , že táto operácia nemení pôvodný reťazec , ale výstupy nový reťazec , ktorý môžete zachytiť v novej reťazcové premenné . Môžete použiť to , čo ste sa naučili v tomto projekte odstrániť nadbytočné úvodzovky , ktoré užívatelia VBA programov vstupujú v tabuľkách . Pokyny dovolená 1

Kliknite na tlačidlo menu " Súbor " v " Option " , a potom kliknite na ovládací prvok " Prispôsobiť pás s nástrojmi " v " Kategórie " panelu . Kliknite na políčko " Developer " na označenie Ak chcete zobraziť túto kartu , zatvorte všetky otvorené dialógové okná . Excel sa teraz zobrazí kartu " Vývojár " . Tento krok vám umožní vstúpiť do vývojového prostredia VBA pomocou tlačidla " Developer " tabulátora " Visual Basic " .
2

Kliknite na kartu " Vývojár " , potom kliknite na " Visual Basic " tlačidlo pre vstup do programovacieho prostredia VBA . Kliknite na " Vložiť " kartu v rámci životného prostredia , a potom kliknite na príkaz " modul " pre vloženie nové okno pre zadanie príkazy VBA .
3

vložte nasledujúci programovú časť do okna ktorý ste práve vytvorili . Tento fragment definuje reťazcové premenné a priradí mu reťazec , ktorý je v úvodzovkách . Fragment používa príkaz Chr pridať úvodzovky . Ak sa pokúsite pridať úvodzovky , bez toho, aby pomocnú funkciu ako Chr , bude vývojové prostredie nahlásiť chybu syntaxe . Dôvodom je , že VBA kontrolu syntaxe interpretuje každú dvojicu doslovné úvodzoviek ako nový reťazec .

Sub replaceQuotedString ( ) Dim x , longerString , newString Ako Stringx = Chr ( 34 ) & " abc " a , Chr ( 34 ) End Sub
4

vložte nasledujúci fragment programu po poslednom " X = " príkazu v predchádzajúcom fragmentu . Tento fragment je priradenie do dvoch nových reťazcov . Prvá úloha je reťazec " longerString , " a obsahuje " X " premenné sa svojimi úvodzoviek . Vymeňte funkcie vykonáva druhý úloha , ktorý je k tejto funkcii nahradí podreťazec dlhší reťazca s iným reťazcom

longerString = " Poďme nahradiť tento reťazec : " " newString . " . & XnewString = Nahradiť ( longerString , X , " abc " )
5

Kliknite na ľubovoľný príkaz v programe , potom stlačte tlačidlo " F8 " pre vstup do režimu pre spúšťanie programov jeden príkaz naraz . Stlačte tlačidlo " F8 " , kým sa nezvýrazní vyhlásenie s " newString " .
6

Prejdite myšou nad " longerString " premenné . VBA zobrazí hodnotu reťazca , ktorý obsahuje premennú X s jeho reťazec v úvodzovkách , " abc " .
7

Press " F8 " znova spustiť Nahradiť vyhlásenie , a prejdite myšou nad " newString " variabilná . VBA sa zobrazí reťazec s rovnakou hodnotou ako " longerString , " ale s novým reťazec v mieste citovanej " abc " časť . Nový reťazec " abc " bez úvodzoviek .

• Predchádzajúca strana: Ako si vyrobiť informácie automaticky presunie na novej karte v aplikácii Excel 
• Ďalšia strana: Ako nakresliť histogram v systéme Windows Excel