Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 20/10/2011, 17h36   #1
Invité de passage
 
Homme cyril schaff
Ingénieur validation
Inscription : octobre 2011
Messages : 1
Détails du profil
Informations personnelles :
Nom : Homme cyril schaff
Localisation : France, Territoire de Belfort (Franche Comté)

Informations professionnelles :
Activité : Ingénieur validation
Secteur : Industrie

Informations forums :
Inscription : octobre 2011
Messages : 1
Points : 0
Points : 0
Par défaut Importer un XML en lecture seule

Bonjour,

J'ai un problème pour la conception d'une application VBA Excel.
Je dois réaliser l'importation d'un fichier XML par macro.
J'ai réussi à faire l'importation avec le code ci-dessous :

Code :
1
2
3
4
5
6
Worksheets(Nom(i)).Select
            ActiveWorkbook.XmlImport _
            Url:=TT_Adresse_messagerie(i), _
            Importmap:=Nothing, _
            Overwrite:=True, _ 
Destination:=Range("A1")

Le problème c'est que le fichier XML est importé dans ma feuille Excel en tant que liste XML.
Il m'est nécessaire pour la suite de mon application que le fichier soit importé en tant que classeur en lecture seule.
Quand vous glisser un fichier XML sur une page Excel, Windows vous donne le choix entre ces 2 types d'importation.
J'ai pensé à enlever le mappage en faisant Importmap:=Nothing mais cela ne change rien.

En vous remerciant pour l'attention que vous apporterez à ma requête.
cschaffhauser est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 16h38.


 
 
 
 
Partenaires

Hébergement Web