Publication de documents????

Pour une utilisation personnelle, tu peux faire ce que tu veux :-)

Utilisation personnelle: ton utilisation propre et ou dans le cadre de ta famille directe ou envoi à un destinataire précis (courrier réel j'entends, par lettre fermée).

Un site intranet, visible par les employés d'une entreprise (même sécurisé) est par définition une utilisation publique.

Bref, tu peux le faire (avec accord de l'auteur), si ce n'est pas possible, il faut au minimum renseigner l'origine de la source (nom de l'auteur + url du site d'origine), histoire de limiter les "dégâts" :-)

Commence par envoyer un tit mail à l'auteur :-)

merci.
;-)

Bonjour,

Depuis un classeur excel j'ai réalisé une macro pour publier des données et un graphique depuis un bouton.

voir plus loin le code

Ce classeur est fait de douze feuille, une par mois, sur le même modèle (par copie).
Le bouton est présent sur chaque feuille
Mon problème est que je publie toujours la même feuille depuis n'importe laquelle!
Or dans le code nullepart il est indiqué le nom de la feuille
je pensais avoir à faire à la feuille active!

Où modifier cette référence?

Comment rectifier le tir : je ne suis pas un pro de vba
mais quid de activesheet vis à vis de publishobjects qui d'après l'aide s'adresse aux objets workbook.

Merci de tout aide

le code

Range("A1:N74").Select
With ActiveWorkbook.PublishObjects("Four10 Prod -2003_6128")
.HtmlType = xlHtmlStatic
.Publish (False)
End With
ActiveWorkbook.Save

Qui ne tente rien n'a rien :)
Quand Daniel tente il a trop :(

Bonjour,

Depuis un classeur excel j'ai réalisé une macro pour publier des données et un graphique depuis un bouton.

voir plus loin le code

Ce classeur est fait de douze feuille, une par mois, sur le même modèle (par copie).
Le bouton est présent sur chaque feuille
Mon problème est que je publie toujours la même feuille depuis n'importe laquelle!
Or dans le code nullepart il est indiqué le nom de la feuille
je pensais avoir à faire à la feuille active!

Où modifier cette référence?

Comment rectifier le tir : je ne suis pas un pro de vba
mais quid de activesheet vis à vis de publishobjects qui d'après l'aide s'adresse aux objets workbook.

Merci de tout aide

le code

Range("A1:N74").Select
With ActiveWorkbook.PublishObjects("Four10 Prod -2003_6128")
.HtmlType = xlHtmlStatic
.Publish (False)
End With
ActiveWorkbook.Save

Qui ne tente rien n'a rien :)
Quand Daniel tente il a trop :(

Désolé erreur de direction

Qui ne tente rien n'a rien :)
Quand Daniel tente il a trop :(