Modifications

Aller à : navigation, rechercher

Aide:Transformer un tableau Excel en tableau WikiGenWeb

1 octet ajouté, 25 février 2011 à 07:02
aucun résumé de modification
*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 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>
& ncols & " colonnes." & vbCrLf & nrows & " lignes."
</nowiki><br />
===Lancer la transformation===
Votre tableau étant maintenant réalisé, rendez-vous dans le [[Aide:Manuel de l'éditeur|Manuel de l'éditeur]] pour mettre en valeur votre réalisation par des enrichissements de caractères.
 
== 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}}.
<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>
& ncols & " colonnes." & vbCrLf & nrows & " lignes."
</nowiki><br />
{{Palette aide}}
[[Catégorie:Aide|{{PAGENAME}}]]
[[Catégorie:Nouvel article|{{PAGENAME}}]]
1 908
modifications

Menu de navigation