xml import error
Dear newsgroupexperts,
Im getting crazy from this error message that repetently occurs when importing xml. the message is: some data is imported as text. I do'nt care about this and do'nt want to press OK everytime, because there are over 2000 xml-files everyday. I have read the posts in this NG, regarding xml-import. application.displayalerts=false, does'nt work. ThisWorkbook.XmlMaps(1).ShowImportExportValidation Errors = False does neither. what can I do aubout this? my code is: Sub XMLbestandenLijst() Dim T As Long, R As Long Application.ScreenUpdating = False xmlLkol = wblXML.Range("Tabel1").Columns.Count If bDirChoice Then For T = 1 To fnum ThisWorkbook.XmlMaps(1).ShowImportExportValidation Errors = False ThisWorkbook.XmlMaps(1).Import URL:=MyFiles(T) If bImported Then Debug.Print MyFiles(T) Application.StatusBar = " importing xml; ready: " & Round(T / fnum * 100, 1) & "%" Next T End If Application.StatusBar = "ready" Application.ScreenUpdating = True End Sub If there are betterways of importing xml, using different objects please let me know. Best wishes, Ernst |
xml import error
Ernst
I found this... http://www.ozgrid.com/forum/showthread.php?t=61415 The key for me was the DisplayAlerts. Hope this helps Have good cheer John |
All times are GMT +1. The time now is 07:32 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com