Slik kopierer rader i Excel ved hjelp av VBScript

Kopiere rader i Excel ved hjelp av VBScript kan enkelt oppnås ved å bruke Notepad, som allerede er inkludert i operativsystemet Windows. VBScript er et skriptspråk som kan brukes i en rekke miljøer. Hvis du er en Visual Basic programmerer deretter VBScript skal være enkelt å forstå, siden syntaksen er svært like. I VBScript kan du bruke "Excel.Application" objekt for å åpne et Excel-regneark og kopiere noen verdier i regnearket.

Bruksanvisning

1 Start Microsoft Excel og skriv "kopi" i A1, "dette" i B1, og "tekst" i C1. Trykk "Ctrl" og "S" for å lagre regnearket. Lagre den som "C: \ Temp \ myXLS.xls." Close Excel.

2 Start Notepad og kopiere og lime inn følgende linjer med kode for å åpne regnearket du opprettet i trinn 1:

Sett objExcel = Create ( "Excel.Application")
Sett objWorkbook = objExcel.Workbooks.Open _

("C:\Temp\myXLS.xls")

3 Legg til følgende kode for å opprette variabelen som du vil bruke for å kopiere tekst fra hver celle i en bestemt rad:
dim rowValues

4 Kopier og lim inn følgende kode for å opprette variabelen som vil identifisere rad for å kopiere og en variabel for å identifisere målet rad:

sourceRow = 1
targetRow = 2

5 Kopier og lim inn følgende kode for å kopiere verdiene for hver celle i rad nummer én til rad nummer to:

rowValues ​​= objExcel.Cells (sourceRow, 1) .Value
objExcel.Cells (targetRow, 1) .Value = rowValues
rowValues ​​= objExcel.Cells (sourceRow, 2) .Value
objExcel.Cells (targetRow, 2) .Value = rowValues
rowValues ​​= objExcel.Cells (sourceRow, 3) .Value
objExcel.Cells (targetRow, 3) .Value = rowValues

6 Lukk Excel objekt ved å legge til følgende kode:
objExcel.Quit

7 Trykk "Ctrl" og "S" for å lagre VBScript filen som "C:. \ Temp \ copyExcelData.vbs" Naviger til "C: \ Temp" og dobbeltklikk på "copyExcelData.vbs" for å utføre koden.