Bonjour,
Le code ci-dessous à pour but de contrôler pour la dernière ligne utilisée par la personne que la colonne 12 (L) est bien renseignée (la personne doit faire un choix dans une liste déroulante).
Une fois ce contrôle effectué, la macro "Majuscule" est lancée et ensuite une feuille "Saisie" est ouverte.
Le souci que j'ai est le suivant: l'absence de texte en colonne 12 (L) est bien détecté, mais la macro "Majuscule" et l'ouverture de la feuille "Saisie" se font sans attendre le remplissage de la cellule colonne 12 (L)....
Quel code puis-je utiliser pour éviter cela ? (débutant en VBA, merci de me répondre avec détails !)
Lenul
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24 Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Target, Range("m12")) Is Nothing Then Application.ScreenUpdating = False Select Case Target.Column Case 13 If Target.Offset(, -1).Value = Empty Then Application.EnableEvents = False MsgBox " Une saisie obligatoire n'a pas été respectée !" Target.Value = Empty Target.Offset(, -1).Select End If 'Quel code doit figurer "ici" pour attendre la saisie obligatoire 'dans la colonne 12 Majuscule Range("a11").Select Sheets("Saisie").Visible = True Sheets("Saisie").Select Application.ScreenUpdating = True End Select End If End Sub
Partager