XL 2010 stock

M12

XLDnaute Accro

• 14 Janvier 2022

• #2

Bonjour,
Si c'est la dernière ligne des valeurs renseignées que tu cherches, ôte le Exit Sub de ta macro Change

VB:

Private Sub TextBox1_Change()

'cod vba
Dim iii
'TextBox11 = Null
'TextBox82 = Null
Sheet1.Activate
iii = 2
Do Until Sheet1.Cells(iii, "b").Text = ""
    If Me.TextBox1.Text = Sheet1.Cells(iii, "b").Text Then
      Cells(iii, "b").Activate
       
Me.TextBox2 = ActiveCell.Offset(0, 1).Text
Me.TextBox3 = ActiveCell.Offset(0, 2).Text

'Exit Sub (à supprimer)
    End If
    iii = iii + 1
   
Loop


End Sub

 

Vote positif 0 Vote négatif

M

Mody200

XLDnaute Junior

• 14 Janvier 2022

• #3

Bonjour
je ne veux pas ajouter ce code
Me.TextBox3 = ActiveCell.Offset(0, 2).Text
Le résultat dans textbox3 est la valeur de la cellule D3 qui est 662 .
Je ne veux pas que la zone de textbox3 soit dans la cellule D11

 

Vote positif 0 Vote négatif

fanfan38

XLDnaute Barbatruc

• 14 Janvier 2022

• #4

Bonjour
Ci joint ma solution
Tu choisis ta référence dans le combobox
ensuite tu choisis la ligne dans la listbox

A+ François

 

Pièces jointes

• Stock.xlsm

  24.2 KB · Affichages: 17

Vote positif 0 Vote négatif

M

Mody200

XLDnaute Junior

• 14 Janvier 2022

• #5

fanfan38 à dit:

Bonjour
Ci joint ma solution
Tu choisis ta référence dans le combobox
ensuite tu choisis la ligne dans la listbox

A+ François

Cliquez pour agrandir...

Bonjour

Gestion des stocks Je souhaite afficher la dernière valeur de 163 basée sur deux critères combobox1 et textbox1 malgré la redondance des données

 

Vote positif 0 Vote négatif

P

pedrobrignoles

XLDnaute Nouveau

• 22 Juillet 2022

• #6

fanfan38 à dit:

Bonjour
Ci joint ma solution
Tu choisis ta référence dans le combobox
ensuite tu choisis la ligne dans la listbox

A+ François

Cliquez pour agrandir...

Bonjour Fanfan38
J'ai voulu adapter ton exemple, en mettant des nombres au niveau du champ Ref. Rien ne s'affiche dans la listbox quand je choisi un nombre (ref) dans le combobox. Merci par avance pour ton aide.

 

Vote positif 0 Vote négatif

fanfan38

XLDnaute Barbatruc

• 22 Juillet 2022

• #7

Bonjour pedrobrignoles
Nouveau problème=nouveau post
Un fichier est TOUJOURS le bienvenu
A+ François

 

Vote positif 0 Vote négatif