Integrer un champ texte saisissable dans un pied de page avant impression

Dranreb

XLDnaute Barbatruc

• 12 Novembre 2012

• #2

Re : Integrer un champ texte saisissable dans un pied de page avant impression

Bonjour
Un InputBox tout simplement peut être.
À +

 

Vote positif 0 Vote négatif

F

franky42

Guest

• 13 Novembre 2012

• #3

Re : Integrer un champ texte saisissable dans un pied de page avant impression

Merci Dranreb pour ta réponse qui ma bien aidée.

Bon j'ai réussi à assembler ça:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
With ActiveSheet.PageSetup
.LeftHeader = Format(Now(), "dddd dd mmmm yyyy")
End With
nom = InputBox("Quel est votre nom ?", "Votre nom")
Range("A1").Value = nom
End Sub

Par contre, le nom s'affiche dans la cellule A1, et j'aurai voulu qui au centre de l'entete de page (center header), j'y arrive pas.
et j'aurai voulu rendre l'imput box obligatoire, car si on vais cancel, on peut la straper, là je sais pas comment faire.

Merci au forum

 

Dernière modification par un modérateur: 13 Novembre 2012

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 13 Novembre 2012

• #4

Re : Integrer un champ texte saisissable dans un pied de page avant impression

Bonsoir.
je ne vois pas pourquoi vous n'y arrivez pas.
Faites une boucle Do … Loop until nom <> ""
À +

 

Vote positif 0 Vote négatif

F

franky42

Guest

• 13 Novembre 2012

• #5

Re : Integrer un champ texte saisissable dans un pied de page avant impression

la réponse est simple, j'ai remis les doigts dans VBA il y a 4 heures ....
Je pense comprendre ce qu'est do loop, c'est a dire tant que le champ est vide ca tourne en boucle.
Je vais voir comment mettre ca dans le code.

Et pour la sortie de inputbox dans l'entete, est ce possible svp ?

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 14 Novembre 2012

• #6

Re : Integrer un champ texte saisissable dans un pied de page avant impression

Oui, c'est possible. Enregistrer une nouvelle macro qui engendrera les instructions nécessaire en faisant les manœuvres sous Excel. Il n'y a que vous qui puissiez trouver pourquoi ça ne marche pas, étant donné que je ne dispose pas d'un classeur où ça ne marche pas. Si vous voulez que je cherche à votre place, vous savez ce qu'il vous reste à faire.

 

Vote positif 0 Vote négatif

F

franky42

Guest

• 14 Novembre 2012

• #7

Re : Integrer un champ texte saisissable dans un pied de page avant impression

ok j'essai avec votre methode , je recupére le bout de code apres enrengistrement.
Je vous tiens au courant...merci

 

Vote positif 0 Vote négatif