Sujet Précédent Sujet Suivant

Boîte de dialogue

Colyr -  
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   -
Bonjour,

J'ai un tableau en feuille1 avec en colonne A5 le titre, en colonne B5, le sujet, en colonne C5 la date (rappel).

Est-ce possible à l'ouverture d'excel qu'un boîte de dialogue s'ouvre pour les rappels qui sont échues avec le titre et le sujet?

Merci pour votre aide.

A voir également:

1 réponse

Réponse 1 / 1
pijaku Messages postés 13513 Date d'inscription   Statut Modérateur Dernière intervention   2 768
 
Bonjour,
Alors il faut placer ce code dans le "Thisworkbook" :
1- Ouvrir le classeur Excel concerné,
2- Taper ALT+F11,
3- Dans la fenêtre Visual Basic, sur la gauche vous voyez VBA-Project(nom du classeur) / Mcrosoft Excel Objets / les noms des feuilles et "This Workbook".
Double clic sur "This Workbook"
4- Dans la fenêtre centrale coller ce code : 

Private Sub Workbook_Open()
Dim derlig, i As Integer
Dim chaine As String
derlig = Range("C65536").End(xlUp).Row
For i = 6 To derlig
If Cells(i, 3) < Date Then
chaine = chaine & Cells(i, 1) & " " & Cells(i, 2) & vbCr
End If
Next
MsgBox chaine
End Sub

5- fermer la fenêtre visual Basic
6- Enregistrer puis fermer et ouvrez à nouveau votre classeur pour tester
1