Ako kopírovať riadky v Exceli pomocou VBScript

Kopírovanie riadkov v programe Excel pomocou jazyka VBScript možno ľahko vykonať pomocou programu Poznámkový blok , ktorý je už súčasťou operačného systému Windows . VBScript je skriptovací jazyk , ktorý môže byť použitý v rôznych prostrediach . Ak ste Visual Basic programátor potom VBScript by malo byť jednoduché pochopiť , pretože syntax je veľmi podobná . V VBScript môžete použiť " Excel.Application " objekt otvoríte hárok programu Excel a skopírujte všetky hodnoty v tabuľke . Pokyny dovolená 1

Spustite program Microsoft Excel a zadajte " kópie " v A1 , " to " v B1 a " text " v C1 . Stlačte tlačidlo " Ctrl " a " S " pre uloženie tabuľky . Uložte ho ako . " C : . \\ Temp \\ myXLS.xls " Zavrite Excel
2

Launch Poznámkový blok a skopírujte a vložte nasledujúce riadky kódu na otvorenie listu , ktorý ste vytvorili v kroku 1 :

Nastaviť objExcel = CreateObject ( " Excel.Application " ) Set objWorkbook = objExcel.Workbooks.Open _ ( " C : \\ Temp \\ myXLS.xls " )
3

Pridajte nasledujúci kód na vytvorenie premennej , ktoré budete používať pre kopírovanie textu z každej bunky v určitom riadku : Dim rowValues ​​
4

skopírujte a vložte nasledujúci kód vytvoriť premennú , ktorá bude identifikovať riadok na skopírovanie a variabilný identifikovať cieľový riadok :

sourceRow = 1targetRow = 2
5

skopírujte a vložte nasledujúci kód skopírovať hodnoty pre každú bunku v riadku číslo jedna na riadku číslo dva : ...

rowValues ​​= objExcel.Cells ( sourceRow , 1 ) ValueobjExcel.Cells ( targetRow , 1 ) Hodnota = rowValuesrowValues ​​= objExcel.Cells ( sourceRow , 2 ) ValueobjExcel.Cells ( targetRow , ... 2 ) hodnota = rowValuesrowValues ​​= objExcel.Cells ( sourceRow , 3 ) ValueobjExcel.Cells ( targetRow , 3 ) hodnota = rowValues ​​
Praha 6

Zatvorte objekt programu Excel pridaním nasledujúceho kódu : objExcel . ukončite
7

Stlačením tlačidla " Ctrl " a " S " uložiť súbor VBScript ako " C : . \\ Temp \\ copyExcelData.vbs " Navigovať do " C : \\ Temp " a dvakrát kliknite na " copyExcelData . vbs " spustiť kód .

• Predchádzajúca strana: Ako vytvoriť General Ledger v programe Excel Návody 
• Ďalšia strana: Ako pridať voľby graf do Excelu 2010