Discussion :

[clairiousse]

Bonjour,
Sur ce fichier, j’ai intégré la procédure suivante qui permet de savoir si le formulaire est bien rempli ou non.

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
Sub formulaire_rempli()
 
Dim c As String
Dim i As Integer
Dim j As Integer
 
For i = 2 To 4
 
    If Cells(i, 2).Value = "" And Cells(i, 3).Value = "" Then
    MsgBox "Le formulaire est incomplé"
    Else
    c = Cells(i, 4).Value
       MsgBox c
 
    End If
 
Next i
 
End Sub

Ensuite j’aimerai que lorsque c’est coché non à une question, la procédure stocke la valeur de la colonne D. Et que la procédure ouvre la feuille 2 pour parcourir la colonne A et toutes les lignes. Lorsque l’on tombe sur la valeur stockée. Ça grisonne toute la ligne.

Pourriez vous m'aider?

Merci