R
Raph
Guest
voilà le code "normal" pour récupérer des valeurs dans une comboBox :
**********************************
Option Explicit
**********************************
Private Sub UserForm_Initialize()
Ini
End Sub
**********************************
Private Sub Ini()
Dim a As Integer
Dim b As String
a = Sheets("Feuil1").Range("A65536").End(xlUp).Row
b = Sheets("Feuil1").Range("A2:A" & a).Address
ComboBox5.RowSource = "Feuil1!" & b
End Sub
****************************
Le problème c'est que j'ai un message d'erreur :
"Erreur de Compilation
Variable non définie "
J'ai bidouillé et impossible de trouver ce qu'il ne va pas !!!
Merci d'avance Raph
**********************************
Option Explicit
**********************************
Private Sub UserForm_Initialize()
Ini
End Sub
**********************************
Private Sub Ini()
Dim a As Integer
Dim b As String
a = Sheets("Feuil1").Range("A65536").End(xlUp).Row
b = Sheets("Feuil1").Range("A2:A" & a).Address
ComboBox5.RowSource = "Feuil1!" & b
End Sub
****************************
Le problème c'est que j'ai un message d'erreur :
"Erreur de Compilation
Variable non définie "
J'ai bidouillé et impossible de trouver ce qu'il ne va pas !!!
Merci d'avance Raph