1 908
modifications
Modifications
→Eviter une intrusion dans le disque C:\
== Eviter une intrusion dans le disque C:\==
;NB: si vous voulez éviter une intrusion dans le disque C:\, remplacez dans le dernier paragraphe de la macro {{coloré|red|c}} par {{coloré|red|d}}dans le dernier paragraphe de la macro.<br />
<nowiki>
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.CreateTextFile("</nowiki>{{coloré|red|c}}<nowiki>:\excel-to-mediawiki.txt", True)
</nowiki><br />
...<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 _
& ncols & " colonnes." & vbCrLf & nrows & " lignes."
</nowiki><br />
<nowiki>
End Sub
</nowiki>
;Rédiger:{{coloré|red|d}}<nowiki>:\excel-to-mediawiki.txt
{{Palette aide}}
[[Catégorie:Aide|{{PAGENAME}}]]
[[Catégorie:Nouvel article|{{PAGENAME}}]]
