Bonsoir tout le monde je travail sur un user form pour enregistrer les donnes dans excel et transformer un code vers un code Bar
il me reste deux chose que je souhaite votre aide :
1- code comment transformer la colone Code vers un colone qui contient le code barre
2- comment afficher le liste box dans user forme ( sous forme d'un tableau ) " dans la fonction refresh data "
" Code de user form"
Private Sub CommandButton1_Click()
Me.ComboBox1.Value = ""
Me.ComboBox3.Value = ""
Me.TextBox3.Value = ""
Me.ComboBox2.Value = ""
End Sub
Private Sub CommandButton5_Click()
ThisWorkbook.Save
MsgBox "Data Saved"
End Sub
Private Sub ListBox1_Click()
End Sub
Private Sub UserForm_Activate()
With Me.ComboBox3
.Clear
.AddItem ""
.AddItem "L551"
.AddItem "L550"
.AddItem "X540"
End With
Call Refresh_Data
End Sub
Sub Refresh_Data()
Dim sh As Workbook
Set sh = ThisWorkbook.Sheets("Data")
Dim last_Row As Long
last_Row = Application.WorksheetFunction.CountA(sh.Range("A:A"))
With Me.ListBox1
.ColumnHeads = True
.ColumnCount = 4
.RowSource = "Data!A1:E" & last_Row
End With
End Sub