Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Ecrire du xml avec VBA

1 réponse
Avatar
Frédéric
Bonjour,
Est ce que quelqu'un sait comment écrire dans un fichier xml à partir de VBA?
J'ai lu pas mal de choses sur le net, entre autre concernant MS XMLDOM, mais
il est difficile de trouver des exemples de code....
Merci.

1 réponse

Avatar
Frédo P
Bonsoir
un exemple remanié dont je n'ai plus l'origine

Sub creérune_feuil_HTml()
msgbox_popup "Frédéric", "Alliance", "Aviculteur"
End Sub

Sub msgbox_popup(Adherent, Contrat, Specialite)
Dim ie As Object, BR
Set ie = CreateObject("internetexplorer.application")
ie.Navigate ("about:blank")
ie.addressbar = False
ie.MenuBar = False
ie.StatusBar = False
ie.Toolbar = False
ie.Width = 650
ie.Height = 500
ie.document.write "<IMG SRC='file:///C:Photo.jpg' ALIGN='right'>" < BR <>
BR > ""
ie.document.write "<FONT COLOR='black'>" & Adherent & "<BR><BR></FONT>"
ie.document.write "<FONT COLOR='red'><B><U>Contrat :</B></U></FONT>"
ie.document.write "<FONT COLOR='black'>&nbsp;&nbsp;&nbsp;&nbsp" & Contrat &
"</FONT><BR><BR><BR>"
ie.document.write "<HR WIDTH`% COLOR='MAGENTA'>"
ie.document.write "<FONT COLOR='red'><B><U>Spécialité :</B></U></FONT>"
ie.document.write "<FONT COLOR='black'>&nbsp;&nbsp;&nbsp;&nbsp" & Specialite
& "</FONT><BR><BR><BR>"
ie.Visible = True
End Sub
--
Fred


"