aide sur userform

[gh4]

bonjour
j'ai besoin de votre aide
comment choisir mon client avec mon userform et remplir les case de la feuille3
d'avance merci

 

[kjin]

Re : aide sur userform

Bonjour,
A adapter
A+
kjin

 

[gh4]

Re : aide sur userform

merci bcp
je vais encore vous mettre a contribution
en partant de votre fichier comment ajouter un nouveau client et l'enregistrer dans ma bd client directement et le mettre sur la feuille3
d'avance merci

 

[pierrejean]

Re : aide sur userform

bonjour gh4

Vois si cela te convient

 

[gh4]

Re : aide sur userform

merci pierrejean
j'vais m'en servir en faisant un mixte des deux
voir messagee precedent pour plus d'aide
merci bcp

 

[pierrejean]

Re : aide sur userform

Re

A tester

 

[gh4]

Re : aide sur userform

merci bcp mais y'a un beug cela plante sur la ligne
Range("C" & dl) = x(1)


Private Sub CommandButton1_Click()
If ToggleButton1 Then
With Sheets("client")
dl = .Range("A65536").End(xlUp).Row + 1
.Range("A" & dl) = TextBox1
x = Split(ComboBox1, " ")
.Range("B" & dl) = x(0)
.Range("C" & dl) = x(1)
.Range("D" & dl) = TextBox3
.Range("E" & dl) = TextBox4
.Range("F" & dl) = TextBox5

 

[pierrejean]

Re : aide sur userform

Re

Dans le combobox1 il faut mettre le Nom et le prénom séparés par un espace (pour les prénoms composés ne pas mettre d'espace mais un tiret )

 

[gh4]

Re : aide sur userform

merci bcp pierrejean
et bonne soirée

 

[gh4]

Re : aide sur userform

encore une petite question
comment faire disparaitre le userform une fois que j'ai valider
encore merci

 

[pierrejean]

Re : aide sur userform

Re

Mettre unload Me comme ceci

Private Sub CommandButton1_Click()
..........
End If
[COLOR=blue]Unload Me
[/COLOR]End Sub

 

[gh4]

Re : aide sur userform

merci bcp

une petite chose le nom de type société n'a donc pas de prenom je suis donc obliger de faire deux espaces apres le nom pour que cela fonctionne