Remonter un pop up à l' écran

jean de chez claude · 30 Novembre 2009

Bonjour à tous
Est-ce possible lorsqu’ une macro s’exécute, qu’au moment opportun, un pop up remonte à l’écran et demande quelle date inscrire ? (date qui devra s’inscrire en cellule D2 :E27 de la feuille nommée Ao.
Cordialement 🙄

Robert · 30 Novembre 2009

Re : Remonter un pop up à l' écran

Bonsoir Jeau, bonsoir le froum,

Peut-être comme ça :

Code:

Sub Macro1()
Dim d As String 'déclare la variable d
Dim da As Date 'déclare la variable da
 
d = InputBox("Tapez la date.") 'définit la variable d
da = CDate(d) 'définit la variable da
Sheets("Ao").Range("D2").Value = Format(da, "dd-mmm") 'place la date au bon format dans D2 de l'onglet "Ao"
End Sub

jean de chez claude · 2 Décembre 2009

Re : Remonter un pop up à l' écran

Bonsoir à tous
Merci Robert, c'est exactement ce dont j'ai besoin.
Une fois de plus Merci
@+

Remonter un pop up à l' écran

jean de chez claude

Guest

Pièces jointes

Robert

XLDnaute Barbatruc

jean de chez claude

Guest

Remonter un pop up à l' écran

jean de chez claude

Guest

Pièces jointes

Robert

XLDnaute Barbatruc

jean de chez claude

Guest

Privacy & Transparency

Privacy & Transparency