MS Excel

Niečo takéto jednoduché to byť nemôže ?citovat

Buď ste to neskúšal na súboroch, so skladbou akou ste poslal, alebo ste si iba skopíroval makro (bez vytvoreného pripojenia na import XML), alebo neviem čo. Ja som to teraz skúšal prehodiť do rôznych adresárov, premenovať, meniť počet súborov, obsah súborov, počet riadkov DETECTION v súboroch. Bez problémov. Na Office 2013 x64 Pro SK a Win 8.1.1 x64 SK Pro.
Máte pripojenie na karte Údaje - Pripojenia - Názov pripojenia - Vlastnosti - Definícia - Súbor prepojenia ?
Robil som to takto :
Údaje - Z iných zdrojov - Z importu údajov XML - vybral som prvý XML súbor. Vypíše, že zadaný zdroj neobsahuje schému, potvrdím. Nechám vybrané Tabuľka XML v existujúcom hárku - $A$1 - Vlastnosti - Názov "SEARCH_Map", voľby nastavím na Nie, Áno, Áno, Áno, Áno, Pripojiť nové údaje k existujúcim tabuľkám XML - OK. Ešte raz OK, a načíta mi do tabuľky ten súbor ktorý som zadal. V tomto momente máme prepojenie. Môžeme nakopírovať a makro NESPÚŠŤAŤ (pozor na názov "SEARCH_Map", ak ste dal iný, treba v makre zmeniť). Rovnako buď si zmente názov objektu Tabuľka tak ako sa volá v mojom príklade "tblImport", alebo inak, každopádne opäť treba v makre nastaviť správny názov.
Súbor najskôr uložíme, lebo makro berie cestu k súborom predvolene tak, že cesta kde sa nachádza tento súbor XLSM + podadresár s XML súbormi
.Path & "\XML súbory\"
ak to chcete inak, opäť to upravte.
Spustite makro.
MUSÍ Vám to ísť. Pozrite sa, čo som kvôli Vám popísal, podrobný a presný návod, na rovnakom Office, niekoľkokrát skúšal, a funguje. Na dátach, ktoré mám.

EDIT:
Ešte ma napadlo, že ak sa pokúsite vymazať už raz vymazanú oblasť DataBodyRange Tabuľky, tak to samozrejme nepôjte, tak si ten riadok
.DataBodyRange.Clear
zmente na
On Error Resume Next
.DataBodyRange.Clear
On Error GoTo 0
Samozrejme tiež vyskúšané, tak mi netvrdte, že nende citovat