J'ai crée un userform de cloture "automatique" comprenant 3 TextBox :
TextBox 3 : Référence
TextBox 2 : Date
TextBox 1 : Signature / Validation
Il y a un bouton check pour vérifier que la référence entrée existe bien dans le tableau et un bouton ok pour valider la cloture.
Je souhaiterai que les valeurs entrée en textbox 2 et 1 soit la date et signature soit ajouter directement dans les cellules concernées selon la référence checké. Est - ce possible ? Ca fais un moment que je tourne dessus certes je suis amateur. Je compte sur vous étant donné que ce forum m'a dejà bien aidé récemment.
Dim i As Long
For i = 279 To 2 Step -1
If TextBox3.Value = Cells(i, 2).Value Then Sheets("Suivi des règles de conception").Rows(i).Select
With Selection
Cells(i, 11).Value = TextBox1
Cells(i, 12).Value = TextBox2
End With
Next i
End Sub
Si ce topic existe déjà merci de me rediriger.
Merci d'avance.
Private Sub CommandButton1_Click()
Dim i As Long
For i = 279 To 2 Step -1
If TextBox3.Value = Cells(i, 2).Value Then
Cells(i, 11).Value = TextBox1
Cells(i, 12).Value = CDate(TextBox2)
End If
Next i
End Sub
Décidément tu me fais gagner un temps précieux aujourd'hui. Le code fonctionne seulement j'ai juste laisser Textbox2 et retirer CDate car il ne me le prend pas le CDate (surement le format qui pose problème). Je vais l'adapter.
méfie toi tout de même, comme vba considère le contenu d'un "textbox" comme du texte, fonction de ce que tu aura mis comme format te retournera une date dont le mois et le jour seront inversés....