Visal Basicben Web adatok importálása
2022-09-08T11:38:36+02:00
2022-09-09T11:54:40+02:00
2022-09-09T12:10:29+02:00
promax
Visal Basic -ben szeretnék Web adatokat Excelbe importálni, miközben nem vagyok a VB nyelv alapos ismerője. 
Találtam egy youtube mintát, amely nekem egyáltalán nem működik.

How to Use Webtables to Import Specific Data to Excel

Indításkor a változó nincs definiálva hibaüzenettel kezd, megjegyzem teljesen igaza van a fordítónak.
A bemutató videóban hibátlanul működő kód az alábbi: 

Sub macro() Cells.Clear qurl = "https://finance.yahoo.com/quote/MSFT/key-statistics?p=MSFT" With ActiveSheet.QueryTables.Add(Connection:="URL;" & qurl, Destination:=Range("A1")) .BackgroundQuery = True .Refresh BackgroundQuery:=False End With End Sub
Hogy lehet ez, mi a probléma? 
Megj: csak remélni tudom ha megoldódik a változó kérdés, utána már működni fog a kód. )
Mutasd a teljes hozzászólást!

  • Szia!
    Sajnos egy szempontból hiányos a videó. Nem foglalkozik azzal, hogy a qurl változót miért nem kell definiálni, illetve hogyan kell.
    A hibaüzenetet azért kaptad, mert be van kapcsolva a VBA nézetben a
    Tools - Options alatt a Require Variable Declaration opció.
    Ilyenkor a modul első sor tartalmazza az 
    Option Explicit 
    kifejezést. Tehát, ha ezt a sort látod, akkor ez a hiba oka.
    Ebben az esetben egy változó első használata előtt definiálni kell pl. az alábbiak szerint:
    Dim qurl As String
    Ezután már következhet az értékadás.
    Ez azért hasznos, mert így megvéd a változónév tévesztésből vagy változó típustévesztéstől eredő hibáktól, mert ezt futás előtt ellenőrizni tudja.
    A VBA-ban lehetőség van egyébként "implicit" változó definiálásra is - ez történik a videóban is. Ilyenkor azonban a végrehajtás előtt nem történik ellenőrzés. Ha az Option Explicit sort kitörlöd vagy aposztrófot (') teszel elé, akkor megszűnik a hiba. 
    .Javaslom a változók deklarását leíró help tanulmányozását
    Üdv.
    Mutasd a teljes hozzászólást!
  • Köszönöm, erről az opciós lehetőségről még nem hallottam. Így persze érthető.
    Ugyanakkor még egy kis segítséget kérnék. Már látszólag működik, látszik az aktivitás a lekérdezéskor, azonban az excelben nem jelenik meg sehol a tábla. A kijelölt helyre (A1) lépve a mezőnévben olvasható a "KülsőAdatok_1....KülsőAdatok7", de maga az excel üres marad.
    Mi lehet ennek az oka?
    Mutasd a teljes hozzászólást!
abcd