PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEV, WEBDEV e WINDEV Mobile

Inicio | Mensagens recentes | Conecte-se... |  | Português FR
Inicio → WINDEV 2024 → Macro Excel
Macro Excel
Iniciado por Elliot Ly, jan., 21 2005 1:06 PM - Sem resposta
#1
Publicado em janeiro, 21 2005 - 1:06 PM
bonjour
j'aimerais savoir comment je devais coder cette macro excel
je sais qu'il faut faire préceder les macro par >>
donc j'ai fait :
xl>>activesheet>>querytables>>add.. puis ensuite je ne sais plus comment faire

Merci

With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;C:\Documents and Settings\ly\Bureau\elliot.txt", Destination:=Range("A1"))
.Name = "elliot"
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.TextFilePromptOnRefresh = False
.TextFilePlatform = xlWindows
.TextFileStartRow = 1
.TextFileParseType = xlDelimited
.TextFileTextQualifier = xlTextQualifierDoubleQuote
.TextFileConsecutiveDelimiter = False
.TextFileTabDelimiter = False
.TextFileSemicolonDelimiter = False
.TextFileCommaDelimiter = True
.TextFileSpaceDelimiter = False
.TextFileColumnDataTypes = Array(1, 1, 1)
.Refresh BackgroundQuery:=False
End With
End Sub
→ Voltar para WINDEV 2024