Amélioration textbox de mon userform

bonjour le forum,

bonjour à tous,

j'ai besoin d'aide pour apporter deux améliorations à mon userform pour gagner du temps dans les saisies.

il s'agit du multipage 1 --> "entrer un nouveau lot" -->

1/ combobox "magasin 1 et magasin 2 = ce que je souhaiterais c'est pouvoir saisir la lettre A pour que s'affiche "Site Hall A" et lorsque ce sera le Hall B, alors l'entrée de la lettre B devrait déclencher le remplissage de "Site Hall B".

2/ combobox "type produit" = lorsque j'ai le bon résultat affiché, je souhaiterais pouvoir appuyer sur la touche entrée de mon clavier pour aller sur le texbox "commentaire 1".

merci d'avance pour votre aide.

cordialement.

Moutchec.

Bonjour toutes et tous,

Magasin1

double clic gauche pour effacer le contenu du magasin1

on tape a, b, c , d ou e (minuscule ou MAJuscule ) met directement dans la l'autre combo

on peut beaucoup améliorer le code

à tester

crdlt,

André

bonjour et merci pour votre intervention.

il y a un bug qui appairait dans le module 4, le code ci-dessous à la 5eme ligne lorsque je valide avec le bouton "enregistrer les données":

Option Explicit

Option Base 1

Public Function Insert_Donnees(ByVal T As Variant, Str_Op As String)

For Col = 2 To 4 Step 2

If T(6, Col) <> "" Then

With Ws_Cible_S

Lgn_S = .Cells(.Rows.Count, 1).End(xlUp).Row + 1

End With

With Ws_Cible_M

Lgn_M = .Cells(.Rows.Count, 1).End(xlUp).Row + 1

End With

For i = 1 To UBound(T, 1)

c = CLng(T(i, UBound(T, 2)))

With Ws_Cible_S

With .Cells(Lgn_S, c)

.Value = T(i, Col) 'On colle les donnees

.NumberFormat = IIf(i = 9, "dd/mm/yyyy", "General")

End With

End With

With Ws_Cible_M

With .Cells(Lgn_M, c)

.Value = T(i, Col) 'On colle les donnees

.NumberFormat = IIf(i = 9, "dd/mm/yyyy", "General")

End With

End With

Next i

End If

Next Col

End Function

Bonjour toutes et tous,

@Moutchec

Je t'ai mis sur une mauvaise piste, je viens de m'apercevoir, car, ta combobox de ton magasin 1 s'initialise en rapport de ton Userform + ta feuille , j'ai fais un bricolage absurde oupss! en voulant mettre A, B, c d et e pour que cela puisse s'afficher sur ton autre combobox suivant la lettre tapée de ta combobox

Je pense qu'il faut auparavant effectué ceci:

1/ reprendre ton fichier principal et corrigé l'enregistrement des données

( j'ai un doute avec les contrôles CTRL)

2/ Ne serai-ce pas plus préférable de mettre des options de choix (a b c d et e) pour ton magasin 1 (si l'option de choix a par exemple est coché la combobox recherche est sélectionne directement Site Hall A affiche sur l'autre combobox le contenu adéquate

une idée