Compléter un menu Excel d’une boite de dialogue

gilbert_RGI

XLDnaute Barbatruc

• 30 Mars 2008

• #2

Re : Compléter un menu Excel d’une boite de dialogue

Bonjour

Vous mettez ceci dans le Thisworkbook du classeur

Code:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
    MsgBox "Votre message"
End Sub

Salutations

RGI

 

Vote positif 0 Vote négatif

J

joss56

XLDnaute Accro

• 30 Mars 2008

• #3

Re : Compléter un menu Excel d’une boite de dialogue

bonjour à tous,

regarde le fichier joint et teste le en le fermant
A+
joss

 

Pièces jointes

• fermeture.xls

  19.5 KB · Affichages: 77
• fermeture.xls

  19.5 KB · Affichages: 84
• fermeture.xls

  19.5 KB · Affichages: 83

Vote positif 0 Vote négatif

J

joss56

XLDnaute Accro

• 30 Mars 2008

• #4

Re : Compléter un menu Excel d’une boite de dialogue

bonjour Gilbert,

nos messages se sont croisés, désolé...
bon dimanche
joss

 

Vote positif 0 Vote négatif

gilbert_RGI

XLDnaute Barbatruc

• 30 Mars 2008

• #5

Re : Compléter un menu Excel d’une boite de dialogue

joss56 à dit:

bonjour Gilbert,

nos messages se sont croisés, désolé...
bon dimanche
joss

Cliquez pour agrandir...

Bon Dimanche également

 

Vote positif 0 Vote négatif

gourdin

XLDnaute Impliqué

• 30 Mars 2008

• #6

Re : Compléter un menu Excel d’une boite de dialogue

Exactement ce qu'il me fallait

Merci encore

Bon dimanche

 

Vote positif 0 Vote négatif

S

sebastien450

XLDnaute Occasionnel

• 30 Mars 2008

• #7

Re : Compléter un menu Excel d’une boite de dialogue

Merci pour la solution! Comment modifier la cellule dans lequel la date sera mise ?

 

Vote positif 0 Vote négatif

E

Evelynetfrancois

XLDnaute Impliqué

• 30 Mars 2008

• #8

Re : Compléter un menu Excel d’une boite de dialogue

BONJOUR a tous !!
je vous envoye juste une petite idée , en passant par un USF
pour une saisie (presque lol ) automatique de la date........
bon dimanche a tous

E et F

 

Vote positif 0 Vote négatif

E

Evelynetfrancois

XLDnaute Impliqué

• 30 Mars 2008

• #9

Re : Compléter un menu Excel d’une boite de dialogue

evidemant j ai oublié le fichier .................oups

 

Pièces jointes

• fermeture.zip

  9.5 KB · Affichages: 24
• fermeture.zip

  9.5 KB · Affichages: 30
• fermeture.zip

  9.5 KB · Affichages: 23

Vote positif 0 Vote négatif

J

joss56

XLDnaute Accro

• 30 Mars 2008

• #10

Re : Compléter un menu Excel d’une boite de dialogue

Sebastien,

Il suffit de changer Cells(1) par l'adresse de ta cellule: range("A2"), range("D4") etc...
A+
Joss

 

Vote positif 0 Vote négatif

E

Evelynetfrancois

XLDnaute Impliqué

• 30 Mars 2008

• #11

Re : Compléter un menu Excel d’une boite de dialogue

petite modif .dsl .pour avoir la date dans le bon sens , et non pas inverse (jour mois)
E et F

 

Pièces jointes

• fermeture.zip

  9.8 KB · Affichages: 32
• fermeture.zip

  9.8 KB · Affichages: 28
• fermeture.zip

  9.8 KB · Affichages: 29

Vote positif 0 Vote négatif

S

sebastien450

XLDnaute Occasionnel

• 30 Mars 2008

• #12

Re : Compléter un menu Excel d’une boite de dialogue

J'ai essayer ton fichier evelynet mais il me dit :"Objet requis" et me donne:UserForm1.Show

 

Vote positif 0 Vote négatif

E

Evelynetfrancois

XLDnaute Impliqué

• 30 Mars 2008

• #13

Re : Compléter un menu Excel d’une boite de dialogue

DSL sebastien450 là je ne sais pas pourquoi chez moi ca fonctionne
cependant je viens de rajouter un "ON ERROR RESUME NEXT"
pour eviter le bug si aucune date n'est saisie dans le combo et que l'on valide OK "malgres tout.........

Private Sub CommandButton1_Click()
On Error Resume Next
madate = TextBox1.Value
Cells(1) = CDate(Format(UCase(TextBox1.Value), "dd/mm/yyyy"))
Unload Me
End Sub

E et F

 

Vote positif 0 Vote négatif

S

sebastien450

XLDnaute Occasionnel

• 30 Mars 2008

• #14

Re : Compléter un menu Excel d’une boite de dialogue

Merci pour la réponse.
Comment integrer également l'execution d'une macro sous une condition ( si "OUI" dans A3 par exemple)?????

 

Vote positif 0 Vote négatif

E

Evelynetfrancois

XLDnaute Impliqué

• 30 Mars 2008

• #15

Re : Compléter un menu Excel d’une boite de dialogue

RE
Sous reserve d'avoir bien saisi ta requete
oups le fichier une fois de plus

 

Dernière édition: 30 Mars 2008

Vote positif 0 Vote négatif