L
Luc
Guest
Rebonjour,
Je me demande aussi comment je peux, en cliquant next (pour indiquer la fin de l'entrée des données) d'un formulaire, que les données des textbox s'achemine automatiquement dans une base de données (disons la Feuil2) et qu'en même temps les textbox se vident pour l'entrée de nouvelles données et ainsi de suite. Voici ce que j'ai pour l'instant:
Private Sub CommandButton1_Click()
If Sheet1.TextBox1.Value = "" Then
MsgBox "Please enter the first name of the candidate."
Sheet1.TextBox1.Activate
End
End If
If Sheet1.TextBox2.Value = "" Then
MsgBox "Please enter the last name of the candidate."
Sheet1.TextBox2.Activate
End
End If
If Sheet1.TextBox4.Value = "" Then
MsgBox "Please enter the candidates ID number."
Sheet1.TextBox4.Activate
End
End If
' Go to Sheet2
Sheets("Sheet2").Select
' Range("A1").Select
End Sub
A+ et merci beaucoup... Luc.
Je me demande aussi comment je peux, en cliquant next (pour indiquer la fin de l'entrée des données) d'un formulaire, que les données des textbox s'achemine automatiquement dans une base de données (disons la Feuil2) et qu'en même temps les textbox se vident pour l'entrée de nouvelles données et ainsi de suite. Voici ce que j'ai pour l'instant:
Private Sub CommandButton1_Click()
If Sheet1.TextBox1.Value = "" Then
MsgBox "Please enter the first name of the candidate."
Sheet1.TextBox1.Activate
End
End If
If Sheet1.TextBox2.Value = "" Then
MsgBox "Please enter the last name of the candidate."
Sheet1.TextBox2.Activate
End
End If
If Sheet1.TextBox4.Value = "" Then
MsgBox "Please enter the candidates ID number."
Sheet1.TextBox4.Activate
End
End If
' Go to Sheet2
Sheets("Sheet2").Select
' Range("A1").Select
End Sub
A+ et merci beaucoup... Luc.