Re : scan code barre appelle données USF
Bon dimanche le Forum, kijn,Pierrejean,
Voilà suis déjà de retour, et ai un souci.
Mon fichier était nickel , mais bien sur en l'adaptant, j'ai utilisé un code plus élaboré (Luki) pour récupérer le contenu des champs dans mon usf
(ici sans en faire l'énumération des contrôles et donc cela évite de se tromper lorsqu'il y à de nombreux champs)
ce qui fonctionne:
- l'appel du scan code barre et son apparition en "feuil2", "A1"
- l'affichage du Userform
ce qui ne fonctionne pas :
- la concordance entre le n° repris en "A1" et la combbox "cbx-connote"
permettant l'affichage de la bonne ligne
j'utilise une fonction "Public Function CellInDB"
puis dans un module "Sub DisplayRecord(l_Line As Long)
et c'est là que je ne parviens pas à créer la reconnaissance de la bonne ligne:
donc mon appel par scan affiche toujours la ligne (2)
il doit y avoir une erreur ici :
Private Sub Worksheet_Change(ByVal Target As Range)
Worksheets(2).Activate
Range("A1").Select
'J'appelle le formulaire et lui dit de prendre la valeur de la cellule "A1"
With USFYmission
.Cbx_connote = Range("A1:A1").Value
End With
' l_Line = Worksheets("Feuil2").Range("A1") ''' ??????
USFYmission.Show
'DisplayRecord (l_Line) ??????
où bien
DisplayRecord (2) 'deuxième ligne
' mai ici devrait faire référence à la ligne contentant
'en col "T" le n°connote
'remet le focus en "A1" pour un prochain scan
Range("A1").Select
End Sub
Voilà , si vous pouviez me dire comment adapter la ligne DisplayRecord .
Merci
CAPRI_456