Conecção Com Web

[Guest - Adriano -]

Olá boa tarde.

Gostaria de saber se existe um outro comando fora o ActiveSheet.Connection.pra coletar dados de um página Web.

Grato.

[Lisandro Oliveira]

Olá boa tarde.

Gostaria de saber se existe um outro comando fora o ActiveSheet.Connection.pra coletar dados de um página Web.

Grato.

Não conheço, mas que tipo de dados seriam??

veja:

With ActiveSheet.QueryTables.Add(Connection:= _

"URL;http://scriptbrasil.com.br/forum/index.php?act=Post&CODE=06&f=15&t=35007&p=177693" _

, Destination:=Range("A1"))

.Name = "index.php?act=Post&CODE=06&f=15&t=35007&p=177693"

.FieldNames = True

.RowNumbers = False

.FillAdjacentFormulas = False

.PreserveFormatting = True

.RefreshOnFileOpen = False

.BackgroundQuery = True

.RefreshStyle = xlInsertDeleteCells

.SavePassword = False

.SaveData = True

.AdjustColumnWidth = True

.RefreshPeriod = 0

.WebSelectionType = xlEntirePage

.WebFormatting = xlWebFormattingNone

.WebPreFormattedTextToColumns = True

.WebConsecutiveDelimitersAsOne = True

.WebSingleBlockTextImport = False

.WebDisableDateRecognition = False

.Refresh BackgroundQuery:=False

End With

Veja se o obter dados externos/consulta web te ajuda em alguma coisa.