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

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