Ako preniesť dáta do otvoreného listu v aplikácii Excel VBA

Môžete naraziť na problémy , keď sa snažíte , aby programovo zapisovať do otvoreného hárka programu Excel , a to najmä ak ste otvorení to druhýkrát . Excel nepodporuje otvorenie iného zošita s rovnakým názvom , aj keď je to uložené v inú cestu . S Visual Basic for Applications alebo VBA , môžete použiť objekt Window rozhranie pre prepnutie aktívneho systému Windows namiesto otvorení tabuľky pre prenos dát . Použitie objektu Window možno takisto zvýšiť rýchlosť prenosu dát , pretože nemusíte otvárať tabuľky viackrát do nej zapisovať . Návod dovolená 1

spustení programu Excel , a zadajte " Toto je otvorený list " v " A1 " . Uložte zošit do " C : \\ Temp \\ " " . Sheet1.xlsx " ako
2

Spustiť novú reláciu programu Excel , a typ " dáta " v " A1 " , " Data b " v " B1 " a "c " údaje v " C1 . " Kliknite na kartu " Vývojár " , a kliknite na tlačidlo " Visual Basic " pre spustenie editora jazyka Visual okno . Kliknite na menu " Vložiť " , a kliknite na tlačidlo " modul " . Zadajte nasledujúci kód pre vytvorenie nového postupu :

Private Sub transferDataToSheet ( )

Stlačte tlačidlo " ENTER " .
3

Skopírujte a vložte nasledujúci vytvoriť tri premenné držať mobilný údaje :

Dim clmnA As String Dim

clmnB As String Dim

clmnC As String
4

Copy a vložte nasledujúci kód pre uloženie hodnôt v bunkách A1 , B1 a C1 do premennej : ..

s listami ( " Hárok1 " )

Range ( " A1 " ) Vyberte

clmnA = ActiveCell.Value

. Range ( " B1 " ) . Vyberte

clmnB = ActiveCell.Value

. Range ( " C1 " ) . Zvoľte

clmnC = ActiveCell.Value

End With
5

skopírujte a vložte nasledujúci aktiváciu otvorený list ( Sheet1.xlsx ) :

. Windows ( " Hárok1 " ) Aktivovať
6

skopírujte a vložte nasledujúci pre prenos dát z aktuálneho listu otvoreného listu :

s listami ( " Hárok1 " )

. Range ( " A2 " ) . Vyberte

Selection.Value = clmnA

. Range ( " B2 " ) . Vyberte

Selection.Value = clmnB

. Range ( " C2 " ) . Vyberte

Selection.Value = clmnC

End With
7

Stlačte " F5 " na spustiť procedúru pre prenos dát do otvoreného listu .

• Predchádzajúca strana: Ako odobrať len prvé slovo v programe Excel 
• Ďalšia strana: Ako odstrániť heslo z hárku programu Excel 2007