Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Spustite program Microsoft Office Excel a zadajte " 1 " na " A1 " . Typ " 2 " v " A2 " , " 3 " na " A3 " a " 4 " v " A4 " .
2
Vyberte " " kartu a kliknite na " Developer Visual Basic . " Kliknite pravým tlačidlom myši " Microsoft Excel Objects " a vyberte položku " Vložiť " , potom kliknite na " modul " .
Typu " Private Sub saveDataArray ( ) " vytvoriť podprogram a stlačte " Enter " .
sims 3
Zadajte nasledujúce deklarovať svoje premenné :
Dim txtFileNum As Integer
Dim dataArray ( 5 ) As String Dim
xLoop As Integer
Stránka 4
Zadajte nasledujúci vytvoriť nový textový súbor :
Otvorte " C : \\ myTextFile.txt " Pre Append ako # txtFileNum
Nahradiť " C : \\ myTextFile .. txt " s názvom súboru podľa vášho výberu
5
zadajte nasledovné prechádzať dáta v programe Excel a uložte ho na pole :
Pre xLoop = 1 až 4
Range ( " a " a xLoop ) . Vyberte klipart
dataArray ( xLoop ) = Range ( " a " a xLoop ) . Hodnota
Ďalšie xLoop
praha 6
zadajte nasledujúce slučku cez pole a uložiť dáta v textovom súbore : klipart
xLoop = 1 až 4
Print # txtFileNum , dataArray ( xLoop )
Ďalšie xLoop
7
Zadajte nasledujúce zatvorte textový súbor :
Close # txtFileNum
Stlačte " F5 " spustiť podprogram .
Copyright © počítačové znalosti Všetky práva vyhradené