Merhaba,
Aşağıdaki kod aracılığıyla, XML dosyaları excele çevirirken, XML dosyaları tek tek seçmem gerikiyor, birden fazla XML dosyaları seçmem için kod aşağdaki düzenlemem lazım
Sub Makro1()
Application.ScreenUpdating = False
On Error GoTo 10:
'Dosya Aç diyalog kutusu aracılığıyla XML...