1 908
modifications
Modifications
→Eviter une intrusion dans le disque C:\
*Enregistrer
*Fermer la page des macros
===== Eviter une intrusion dans le disque C:\=====;NB: si vous voulez éviter une intrusion dans le disque C:\, remplacez aux 2 endroits signalés en rouge dans le dernier paragraphe de la macro {{coloré|red|c}} par {{coloré|red|d}}.
<nowiki>
Set fs = CreateObject("Scripting.FileSystemObject")
</nowiki><br />
<nowiki>
Set a = fs.CreateTextFile("</nowiki>{{coloré|red|c}}<nowiki>:\excel-to-mediawiki.txt", True)
</nowiki><br />
<nowiki>
MsgBox "La feuille Excel " & Sheets(nom).Name & " a été transformée en fichier WikiGenWeb sour le nom </nowiki>{{coloré|red|c}}<nowiki>:\excel-to-mediawiki.txt que vous devez copier dans votre article." & vbCrLf _
</nowiki><br />
<nowiki>
