Autres formules textbox

Dranreb à dit:

Vous n'avez encore rien compris au principe je vois.
Mettez des ComboBox pour le numéro d'article et pour la réf/lot interne dans un seul UserForm de consultation et mise à ajour. Comme ça vous ne risquerez pas de les créer en double car "Modifier" sera automatiquement proposé en CBnValider.Caption au lieu de "Ajouter"
Typiquement les procédures de mise à jour du tableu s'écrivent comme ça :

VB:

Private Sub CBnEntrée_Click()
   CAs.ValeursVers TVL
   If LCou = 0 Then
      CLs.ValeursVers TVL
      CLs.Lignes.Add.Range.Value = TVL
      CLs.Actualiser
   Else: CLs.Lignes(LCou).Range.Value = TVL: End If
   End Sub
Private Sub CBnSuppr_Click()
   If MsgBox("Êtes vous sûr de vouloir supprimer ça définitvement ?", vbYesNo + vbExclamation _
      + vbDefaultButton2, Me.Caption) = vbNo Then Exit Sub
   CLs.Lignes(LCou).Delete
   CLs.Actualiser
   End Sub
Private Sub CBnEchap_Click(): If CLs.ChangéÀLEchap Then Exit Sub
   Select Case CBnEchap.Caption
      Case "Effacer": CLs.Nettoyer: CBnEchap.Caption = "Quitter"
      Case Else: Unload Me: End Select
   End Sub

Plus besoin de s'occuper des détails c'est fait automatiquement parce que la correspondance entre les contrôles et les numéros de colonnes du tableau est établie une fois pour toutes au départ dans la Sub UserForm_Initialize.

Cliquez pour agrandir...

Dranreb à dit:

Mais une ComboBox est faite pour ça, pas pour se précipiter aveuglément sur le bouton flèche pour y retrouver quelque chose d'existant. D'ailleurs ce bouton flèche peut être rendu invisible par la propriété ShowDropButtonWhen de la ComboBox. Le ComboBoxLiées la met même à 0 si la liste est trop longue, c'est à dire si sont nombre de lignes est supérieur à la valeur de la propriété ListRows de la ComboBox et si on n'a pas affecté à CLs.LMaxDropBtn une valeur supérieure. C'est fait exprès justement pour inciter les utilisateurs à y taper ce qu'ils veulent et non utiliser ce bouton. Son usage doit rester exceptionnel, quand on ne sait plus bien quoi taper d'autre d'existant ou qu'on a la flemme de taper le reste quand l'assumé commençant par le début tapé n'est pas celui qu'on voulait.

Cliquez pour agrandir...