macro - nom de fichier

@

@+Thierry

Guest

• 10 Décembre 2002

• #2

Bonsoir Dark

Dans Excel ce n'est pas Filename en tout cas !
Non il faut faire plutôt un truc comme çà :

Worksheets("Sheet3").PageSetup.CenterFooter = ThisWorkbook.Name

ou bien :

With ActiveSheet
.PageSetup.CenterFooter = ThisWorkbook.Name
End With

Voilà pour Excel.... Pour Word ce ne peut-être idem... Mais je ne sais pas !! et puis c'est pas Word-Downloads ici ! lol

@+Thierry

 

Vote positif 0 Vote négatif

C

Cyber PAPY

Guest

• 10 Décembre 2002

• #3

Bonsoir Dark

pour éviter de devoir changer le nom du fichier dans la macro, lorsqu'on le change lors d'une sauvegarde, on peut aussi utiliser " &F"


With ActiveSheet.PageSetup
.CenterFooter = "&F"
End With

 

Vote positif 0 Vote négatif

C

chris

Guest

• 10 Décembre 2002

• #4

Dans word il suffit d'insérer un champ FILENAME.

DAns Excel il y a aussi un moyen simple mais j'ai oublié.

Chris

 

Vote positif 0 Vote négatif

D

Dark

Guest

• 10 Décembre 2002

• #5

Je vous remercie de vos reponses.
Mais je voudrais avoir un bouton sur word que quand je clique, il insere le champ la ou je voudrais.
Merci encore

Dark

 

Vote positif 0 Vote négatif

D

Dark

Guest

• 10 Décembre 2002

• #6

J'oublie de vos dire que cette fonction avait dans "insertion automatique" mais elle est disparu. et j'arrive pas à l'ajouter. Quand je fais "personnaliser ", elle n'existe plus.

 

Vote positif 0 Vote négatif

C

Cyber PAPY

Guest

• 10 Décembre 2002

• #7

C'est vrai que j'aurais pu aussi préciser cela.

Donc pour mettre mettre automatiquement le nom du fichier au pied de page, il suffit de choisir .

"Fichier"
"Mise en page"
et dans la boite de dialogue qui s'ouvre, choisir l'onglet "en tete et pied de page"

dans la zonze "pied de page" on a un menu déroulant (en cliquant sur la flèche) qui permet de choisir ce que l'on veut mettre.

le dernier choix XXXX.XLS (XXX est le nom de votre fichier) permet d'ajouter, lors de l'impression, en bas de chaque page le nom sous lequel le fichier est sauvegardé.


Voilà
;-)

 

Vote positif 0 Vote négatif

C

Cyber PAPY

Guest

• 10 Décembre 2002

• #8

Dans Word, il y a la fonction "en tete et pied de page" dans le menu affichage.
Cette fonction permet dans la zone "insertion automatique" de mettre le nom du fichier où on le souhaite.

 

Vote positif 0 Vote négatif

@

@+Thierry

Guest

• 10 Décembre 2002

• #9

Salut Cyber PAPY,

Enchanté de faire ta connaissance mais pour ta gouverne... ThisWorkbook.Name = le raccourci "&F".... Et si tu changes le nom du fichier même après 100 sauvegardes ThisWorkBook.name sera le nom du fichier en cours.... Et il n'y aura pas besoin de changer quoique ce soit dans la macro.....

Ou alors il y a quelque chose qui m'échappe dans ta remarque..."pour éviter de devoir changer le nom du fichier dans la macro".....(?)

De plus ThisWorkbook est une propriété importante pour déclencher n'importe quelles sortes de macros depuis laquel on veut renvoyer les valeurs du classeur dans lequel le code s'exécute tandis que le " &F" n'est qu'un raccourci clavier applicable uniquement depuis la fenêtre "Set-Up"(Mise en page)... pour le cas présent...

D'ailleurs ce "&F" qu'on obtient depuis l'enregistreur de macro (je viens de vérifier sur Excel Français.... çà marche) Mais dans d'autres langues ou Fichier ne commence pas par "F" ne sera pas applicable.... En US c'est OK pour File... Mais les autres...

Je ne sais pas comment on dit en Néerlandais (André) mais par exemple en Allemand il faudrait "&D" (Datei)...... etc.... Non les raccourcis clavier sont bien pour faire des raccourcis claivier.....Mais pas pour les intégrer dans du code VBA.... enfin en tout cas pas pour une appli qui doit tenir la route...

Enfin ptet j'ai loupé quelque chose.... Que tu vas pouvoir m'expliquer

Bonne Soirée
@+Thierry

 

Vote positif 0 Vote négatif

D

Dark

Guest

• 10 Décembre 2002

• #10

Olalala! J'ai une affaire a des "pros", je suis loin de comprendre tout ça , mais enfim, ça me donne pas un bouton quelque part comme j'avais avant.

 

Vote positif 0 Vote négatif

D

Dark

Guest

• 10 Décembre 2002

• #11

Je crois que Thierry a raison je vous embete avec une question rien a voir avec ce forum. Veuillez me pardonner, mais comme je trouve des personnes tres doue ici;.. je croieis

c'est injuuuuust e

 

Vote positif 0 Vote négatif

@

@+Thierry

Guest

• 10 Décembre 2002

• #12

lol@Dark...

Pas de problème vous ête tous les bienvenus... Même les "wordiens" lol

@+Thierry

 

Vote positif 0 Vote négatif

@

@+Thierry

Guest

• 10 Décembre 2002

• #13

Notez que j'ai bien mis un "D" dans Wordiens......

Sinon ce ne serait pas gentil !!!

@+Thierry

 

Vote positif 0 Vote négatif

V

Victor

Guest

• 10 Décembre 2002

• #14

Pour @+Thierry,

Excusez-moi les autres.

@+Thierry,
Quand je regarde tes posts je tombe souvent sur le terme "lol" qui m'intrigue. Peux-tu me dire ce que c'est ?

Victor

 

Vote positif 0 Vote négatif

@

@+Thierry

Guest

• 10 Décembre 2002

• #15

Bonsoir Victor,

Tu vas bien?

Ti m'avait fait la même demande....

Alors je te fais une macro !!!

Dim LoL as String

For each LoL in Forum
L = Laughing
O = Out
L = Loud
Next
Ha ha ha

C'est à cause de mon habitude de trainer sur les Chat et Forum US depuis des années...
Donc en "bon Chat français" on écrit MDR = Mort De Rire".... Quoique je vois de plus en plus PTDR ... qu'on traduira facilement....


Voilà Victor, un homme averti en vaut deux !! lol...

Bonne nuit
@+Thierry

 

Vote positif 0 Vote négatif