Új hozzászólás Aktív témák

• #19462 DIEGO15 őstag

  Új Válasz 2013-11-07 02:37:19 #19462

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  Privát üzenet küldése

  

  DIEGO15

  őstag

  Sziasztok. Weboldalról szeretnék lekérdezést csinálni, de vannak bizonyos oldalak, amiken nem tudok. Ilyen pl. az eredmenyek.com , ha erre a címre indítok lekérdezést, gyakorlatilag csak az országok nevét másolja le. Tudna nekem valaki segíteni ebben?

  Ezt a forrást használtam eddig:

  Sub Basic_Web_Query()
  
  With Munka2.QueryTables.Add(Connection:= _
  "URL;" & Range("A1").Value, Destination:=Range("$B$2"))
  
  .FieldNames = True
  .RowNumbers = False
  .FillAdjacentFormulas = False
  .PreserveFormatting = True
  .RefreshOnFileOpen = False
  .BackgroundQuery = True
  .RefreshStyle = xlOverwriteCells
  .SavePassword = False
  .SaveData = True
  .AdjustColumnWidth = True
  .RefreshPeriod = 0
  .WebSelectionType = xlSpecifiedTables
  .WebFormatting = xlWebFormattingNone
  .WebTables = "1,2"
  .WebPreFormattedTextToColumns = True
  .WebConsecutiveDelimitersAsOne = True
  .WebSingleBlockTextImport = False
  .WebDisableDateRecognition = False
  .WebDisableRedirections = False
  .Refresh BackgroundQuery:=False
  End With
  
  End Sub

Új hozzászólás Aktív témák