Hello,
From what I have read across your forumns and support groups QueryTables in excel are not supported. Is this still true?
If so, I am looking for an alternative method to import data into my sheets for computations. Below is an example of one of many diff Query Table calls… any suggestions on an alternative?
Text_Import_String = “TEXT;” & import_path & “\Report4.txt”
’
With ActiveSheet.QueryTables.Add(Connection:= _
Text_Import_String _
, Destination:=Range(“A2”))
.Name = “Run4-ServerUtilization”
.FieldNames = True
.RowNumbers = False
.FillAdjacentFormulas = False
.PreserveFormatting = True
.RefreshOnFileOpen = False
.RefreshStyle = xlInsertDeleteCells
.SavePassword = False
.SaveData = True
.AdjustColumnWidth = True
.RefreshPeriod = 0
.TextFilePromptOnRefresh = False
.TextFilePlatform = 437
.TextFileStartRow = 1
.TextFileParseType = xlDelimited
.TextFileTextQualifier = xlTextQualifierDoubleQuote
.TextFileConsecutiveDelimiter = False
.TextFileTabDelimiter = True
.TextFileSemicolonDelimiter = False
.TextFileCommaDelimiter = False
.TextFileSpaceDelimiter = False
.TextFileOtherDelimiter = “|”
.TextFileColumnDataTypes = Array(1, 1, 1, 1, 1)
.TextFileTrailingMinusNumbers = True
.Refresh BackgroundQuery:=False
End With
Range(“A1:E1”).Select
Selection.Font.Bold = True
'Setup Headings …
Range(“A1”) = “HostName”
Range(“B1”) = “MountPoint”
Range(“C1”) = “Used Space (GB)”
Range(“D1”) = “Allocated Space (GB)”
Range(“E1”) = “Utilization %”
Thanks,
John
Hi John,
We do not support QueryTables. But we have plenty of options to import data to worksheets from data sources. One option is you can fetch data from your source to fill a datatable using ADO.NET components and use Cells.ImportDataTable() method which is fast and efficient and minimize the coding.
Please check:
Thank you.