Ako sa zbaviť Pattern prípony súborov z reťazcov v Excel Makrá

Môžete ľahko zbaviť prípony vzor súborov z reťazcov v aplikáciách Microsoft Excel pomocou jazyka Visual Basic for Applications alebo VBA . VBA je programovací jazyk používaný v aplikáciách Microsoft Office automatizovať rutinné úlohy , ako je napríklad odstránenie prípony súborov . Môžete vytvárať makrá v programe Excel spustiť kód VBA s kliknutím na tlačidlo . Pridať makro vo VB editore pridaním príkazov VBA , ktoré majú vykonať pri spustení makra . Pokyny dovolená 1

Spustite program Microsoft Office Excel , kliknite na tlačidlo " Developer " a " Visual Basic " pre spustenie editora jazyka Visual Basic . Kliknite na tlačidlo " Vložiť > modul " pridať nový kód modulu VBA
2

Pridajte nasledujúci kód na vytvorenie novej aplikácie Excel makrá : .

Private Sub removeFileExtension ( )

3

zadefinujte dve celočíselné premenné a polia reťazcov , ktoré sa bude konať názvy súborov :

Dim názov súboru ( 5 ) Vzhľadom na to StringDim xCntr Ako IntegerDim pos As Integer
4

Pridať názvy súborov na pole reťazcov : klipart

mena súboru ( 0 ) = " myfile.xlsx " Názov súboru ( 1 ) = " myfile2.txt " Názov súboru ( 2 ) = " myfile3 . doc " Názov súboru ( 3 ) = " myfile4.docx " Názov súboru ( 4 ) = " myfile5.xls "
5

Vytvorenie " Pre ... Loop " , aby sa vyzliekli rozšírenie vzor súborov zo súboru mená v poli :

xCntr = 0 4POS = Instru ( " . " 1 , fileName ( xCntr ) , vbTextCompare ) fileName ( xCntr ) = Ľavá (filename ( xCntr ) , pos - 1 ) Ďalšie xCntr
Praha 6

slučku cez pole reťazcov a zobrazenie nové názvy súborov v prvom stĺpci tabuľky programu Excel :

xCntr = 1 To 5Range ( " a " . & xCntr ) SelectRange ( " a " a xCntr ) Hodnota = Názov súboru ( xCntr - . " . Makrá " 1 ) Ďalšie xCntrEnd Sub
7

Prepnite späť do programu Microsoft Excel a potom kliknite na tlačidlo Input " removeFileExtension " a kliknite na tlačidlo " Run " pre spustenie makra a pridať nové názvy súborov bez prípony .

• Predchádzajúca strana: Ako si vyrobiť Text zobrazujú ako zadali v programe Excel 
• Ďalšia strana: Ako upraviť korelácia na vzorke dát v programe Excel