Visual Basic (VB ) skript erbjuder många sätt att importera data till Excel . Ett av de enklaste sätten är att använda Excel makro -inspelaren
Du behöver : .
Microsoft Excel
1
Öppna Excel och aktiverar makron . . : välj ” Alt-F ”och klicka sedan på ”Alternativ ”. Välj ” Trust Center ”och sedan på ” Säkerhetscenter ” inställningar , följt av ” Macro inställningar. ” Klicka på ” Aktivera alla makron . . . ” och ” Trust tillgång . . . ” alternativ , klicka på ” OK ” på alla öppna alternativ fönster .
2 .
Högerklicka på Excel statusfält ( nedre gränsen i Excel -fönstret ) och välj ” Macro inspelning. ”Tryck på makro inspelningsknappen , som ligger nära ” Ready ” text i Excel nedre vänstra hörnet .
3 .
Skriv ” loadword ” på i ” Spela in makro ” i dialogrutan och klicka sedan på ” OK ” för att stänga rutan . Klicka på ” Infoga ”, följt av ” Objekt ”, på Excel verktygsfält .
4 .
Välj ” Skapa från fil ” fliken i ” Object ” dialogrutan navigerar sedan till en befintlig Microsoft Word -fil med knappen ”Bläddra” . Klicka på ”Lägg ”och sedan ”OK ”-knapparna . Observera att Excel har laddat Word-filen du valde på det aktuella kalkylbladet. Stoppa makro inspelningen genom att trycka fyrkant i Excel nedre vänstra hörnet .
5 .
Klicka på Word- dokumentet du just lastas på kalkylbladet och tryck sedan på ” Delete ”för att radera det . Tryck på ” Alt-F8 ” för att få upp listan med makron och sedan dubbelklicka på ” loadword ” makro du precis har spelat . Observera att Excel har återigen laddat Word-dokumentet .
6 .
Ange Visual Basic integrerad utvecklingsmiljö ( IDE ) genom att trycka ” Alt-F8 , ” välja ” loadword ” objekt från listan över makron och sedan trycka på ” Redigera . ” .
7
Ändra ” loadword ” subrutin så den laddar en fil ges ett filnamn som du anger i ett kalkylblad : Byt programkoden mellan ” Sub ” och ” End Sub ” sökord med detta program i registret:
Dim s
s=Range ( ” a1 ” ) Värde
ActiveSheet. OLEObjects. Add ( Filnamn : . =s , _
Länk :=False , DisplayAsIcon :=_ False
) Välj
8
Återgå till Excel genom att trycka ” Alt- F11 ”och sedan skriver du den fullständiga sökvägen till någon . Word- fil i cell A1 i det aktuella kalkylbladet. .
9
köra om loadword makro som du gjorde i steg 5 , och se effekten . Excel ladda filen du angav i cell A1
10 .
Tryck makroinspelning knappen igen , skriv ” loadweb ” för makro namn , stäng sedan makrot rutan inspelningen dialogrutan .
11 .
Välj ” Data ”och sedan av ” Från webben ”-ikonen på Excel verktygsfält . Navigera till ” ehow. com , ” tryck sedan på knappen ”Importera” . Tryck på ” OK ” på ” Importera data ” i dialogrutan . Observera att Excel läser den webbsida som du angett , hamnar då makrot inspelningen som du gjorde i steg 4 .
12 .
Radera data laddas från webben . Spela upp ” loadweb ” makro genom att läsa steg 5 anvisningar , med ” loadweb ”ersätts med ” loadword . ” Observera att webbdokument laddas till arbetsbladet.
tips och varningar
コメント