Kopiering rækker i Excel ved hjælp af VBScript kan nemt gøres ved hjælp af Notepad , som allerede følger med Windows-styresystemet. VBScript er et script-sprog , der kan bruges i mange forskellige miljøer . Hvis du er en Visual Basic programmør så VBScript skal være let at forstå , da syntaksen er meget ens. I VBScript kan du bruge " Excel.Application " objekt for at åbne et Excel-regneark og kopiere nogen værdier i regnearket . Instruktioner
1

Launch Microsoft Excel og skrive " copy" i A1, " denne" i B1, og "tekst" i C1 . Tryk på " Ctrl " og "S " for at gemme regnearket. Gem det som. " C: . \\ Temp \\ myXLS.xls " Close Excel
2

Launch Notesblok og kopiere og indsætte følgende linjer kode til at åbne det regneark, du oprettede i trin 1: < br >

Set objExcel = CreateObject ( " Excel.Application " ) Indstil objWorkbook = objExcel.Workbooks.Open _ ( "C: \\ Temp \\ myXLS.xls " )
3 < p > Føj følgende kode til at oprette den variabel, du vil bruge til at kopiere tekst fra hver celle i en bestemt række: Dim rowValues ​​
4

Kopier og indsæt følgende kode til at skabe den variabel, der vil identificere rækken til at kopiere og en variabel til at identificere målet rækken : Hej

sourceRow = 1targetRow = 2
5

Kopier og indsæt følgende kode til at kopiere værdierne for hver celle i række nummer et at ro nummer to : .

rowValues ​​= objExcel.Cells ( sourceRow , 1 ) ValueobjExcel.Cells ( targetRow , 1 ) Værdi = rowValuesrowValues ​​= objExcel.Cells ( sourceRow , 2) ValueobjExcel.Cells ( targetRow . . 2 ) Værdi = rowValuesrowValues ​​= objExcel.Cells ( sourceRow , 3) ValueobjExcel.Cells ( targetRow , 3) Værdi = rowValues ​​
6

Luk Excel-objekt ved at tilføje følgende kode : . . . objExcel . Afslut
7

Tryk på " Ctrl " og "S " for at gemme VBScript-fil som " C: . \\ Temp \\ copyExcelData.vbs " Naviger til "C: \\ Temp" og dobbeltklik på " copyExcelData . vbs "for at udføre koden .