GÉNÉRER UN DOCUMENT RTF EN VBA/VB
micniv
Messages postés
5
Date d'inscription
lundi 15 novembre 2004
Statut
Membre
Dernière intervention
8 novembre 2008
-
8 nov. 2008 à 15:38
cs_YvesMarie Messages postés 6 Date d'inscription vendredi 18 avril 2003 Statut Membre Dernière intervention 1 juin 2009 - 15 nov. 2008 à 17:55
cs_YvesMarie Messages postés 6 Date d'inscription vendredi 18 avril 2003 Statut Membre Dernière intervention 1 juin 2009 - 15 nov. 2008 à 17:55
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/48394-generer-un-document-rtf-en-vba-vb
https://codes-sources.commentcamarche.net/source/48394-generer-un-document-rtf-en-vba-vb
15 nov. 2008 à 17:55
merci et bravo !!!
10 nov. 2008 à 10:55
Merci pour ce code très bien commenté.
Il fonctionne bien sur mon pc, aucun bug rencontré.
Luna.
9 nov. 2008 à 19:10
un travail basé sur un autre ok, mais juste proposer un nom modifiable alors que tu pouvais simplement demander cette "option" à l'auteur... certains choix m'échappent :/
9 nov. 2008 à 12:26
8 nov. 2008 à 21:13
Bonne programmation,
Amicalement,
Us.
8 nov. 2008 à 20:53
8 nov. 2008 à 20:49
Je te proposais de me mettre un ZERO à la place du 9/10, pour me faire pardonner de ma bourde !
J'ai un souci, je ne sais pas comment mettre à jour la source sur le site. J'ai cherché partout, mais je ne trouve pas. Connais-tu la procédure ? dans la négative, je poserai la question sur le forum.
@+
8 nov. 2008 à 20:22
Il me semble qu'on peut voter qu'une seule fois, sinon faut demander à un admin. pour faire une correction... Je crois que ce n'est pas la peine de les embêter pour une note... (déjà bonne)... A la prochaine source, je mettrai +1... enfin, 11/10 cela ne sera pas possible... -:);
Amicalement,
Us.
8 nov. 2008 à 20:14
(si tu remplaces ton 9/10 par un 0/10, je ne t'en tiendrai pas rancune)
micniv, je suis en train de regarder sur Google le message "Erreur de fichier...". Hélas personne ne donne la solution. En lisant les discussions, j'ai compris que le pb se produit à l'ouverture du fichier avant toute exécution des macros. Donc ignore ma question sur le n° d'erreur. Il semble qu'il y ait une règle générale à ce bug, c'est qu'il n'apparaît que quand le fichier xls est ouvert sur un poste différent de celui qui l'a généré. J'ai lu quelque part qu'il était possible d'exécuter les macros à la main. Peux-tu me dire si tu peux exécuter une macro Demo
Cordialement
8 nov. 2008 à 19:39
En fait, le bouton "Ouvrir repertoire" fonctionne uniquement sur la feuille Demo1. pour les 2 autres, le lien n'est pas fait. En effet, il manque c'est 2 lignes dans Open :
ActiveSheet.Hyperlinks.Add Anchor:=Worksheets("Démo2").Shapes("zt1"), Address:=ActiveWorkbook.Path
ActiveSheet.Hyperlinks.Add Anchor:=Worksheets("Démo3").Shapes("zt1"), Address:=ActiveWorkbook.Path
Amicalement,
Us.
8 nov. 2008 à 19:20
micniv, je ne connais pas cette erreur, est-ce que tu pourrais m'envoyer son numéro et l'instruction où elle se produit pour que je fasse des recherches ?
Quand à l'absence de bouton et de zone grise, je ne vois pas, car ce sont des formes statiques enregistrées dans la feuille.
us_30 : le problème vient peut-être du fait que le lien hypertexte généré dynamiquement par la macro auto_open pointe un répertoire et non un fichier. J'ai passé beaucoup de temps à chercher s'il était légal de faire un lien sur un répertoire, sans trouver de réponse, alors je me suis risqué. Si tu as un moment, peux tu ôter le "on error resume next" de la macro auto_open et me dire si tu as une erreur ? Chez moi il n'y en a pas.
Merci encore, vous êtes sympas
8 nov. 2008 à 18:51
9/10.
Aucun pb de cet ordre, pour ma part... juste le bouton "Ouvrir ce repertoire" qui ne pointe pas correctement sur la cible...
Amicalement,
Us.
8 nov. 2008 à 15:38