Boa tarde galera.
Dei uma lida em alguns tópicos de importação de dados da WEB e não localizei alguém que tenha postado algo que está ocorrendo comigo.
Tenho o código
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://export.cafepele.com.br/index.php", Destination:=Range("$A$1"))
.Name = "index"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.BackgroundQuery = True
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.WebSelectionType = xlSpecifiedTables
.WebFormatting = xlWebFormattingNone
.WebTables = "6"
.WebPreFormattedTextToColumns = True
.WebConsecutiveDelimitersAsOne = True
.WebSingleBlockTextImport = False
.WebDisableDateRecognition = False
.WebDisableRedirections = False
.Refresh BackgroundQuery:=False
End With
Só gravei a macro importando, mas qdo fecho o arquivo e abro novamente a macro não funciona e pede para habilitar conteúdo.
Igual quando abrimos um arquivo e pede para habilitar macros.
Isso está ocorrendo porque o site que entrei pede senha e login ?
_______________________________________________________________________________________________
Carlos Santos
* Marque o tópico como Resolvido se foi solucionado seu problema.
Postado : 14/09/2016 1:36 pm