Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Saisir une date à partir d'une boîte de message

  • Initiateur de la discussion Initiateur de la discussion eric26
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

E

eric26

Guest
Bonjour,

Je travaille actuellement sur un fichier servant à établir des devis à partir de données se trouvant sur plusieurs feuilles et toutes les feuilles se basent sur la même période.

Le choix du 1er mois de la période est donc primordial : il ne faut donc pas oublier de le mettre.

QUESTION : existe t-il une formule ou autre qui permette à l'utilisateur de saisir, dès l'ouverture du fichier et à l'aide d'une boîte de dialogue, l'année d'une part et le mois d'autre part de la période de façon à ce que ces données apparaissent dans des cellules spécifiques (ex : feuill1 en D2 et C2).

Merci d'avance
 
Re : Saisir une date à partir d'une boîte de message

Bonsoir

Pour modifier les valeurs inscrites il suffit de modifier la procédure suivante
Code:
Private Sub CommandButton1_Click()
If ListBox1.ListIndex = -1 Then Exit Sub
If ListBox2.ListIndex = -1 Then Exit Sub

Sheets(nomfeuille1).Range("D2") = ListBox2.List(ListBox2.ListIndex)
Sheets(nomfeuille1).Range("c2") = Format(ListBox1.List(ListBox1.ListIndex), [COLOR="red"]"mmmm"[/COLOR])
' pour afficher une date il faut mettre "dd/mm/yyyy"
'pour afficher les mois en lettre "mmmm" en chiffre "mm"
' voir les formats dans le menu "format" options cellules (j > d et a > y)

CommandButton2_Click
End Sub

A adapter en fonction des besoins.

JP
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…