XL 2013 Affiche UserForm

Chris24

XLDnaute Impliqué

• 20 Mai 2016

• #2

Re : Affiche UserForm

Bonjour

Tu n'as pas de feuille nommée ""Base client"

 

Vote positif 0 Vote négatif

A

aziz

XLDnaute Occasionnel

• 20 Mai 2016

• #3

Re : Affiche UserForm

Bonjour Chris
je ne vois pas le lien avec la base client ?
😕

 

Vote positif 0 Vote négatif

T

thebenoit59

XLDnaute Accro

• 20 Mai 2016

• #4

Re : Affiche UserForm

Bonjour Aziz, Chris.

Comme l'a souligné Chris, tu aurais pu faire une recherche dans ton code et trouvais la réponse, il n'existe pas de feuille Base Client.
Et quand tu regardes le code de ton UF :

Code:

Private Sub UserForm_Initialize()
'si la dernière ligne est supérieure à 256 déclarer i et x en Integer
Dim i As Byte, x As Byte
i = Sheets("Base client").Range("B65536").End(xlUp).Row
For x = 3 To i
    With ComboBoxParNom
        .AddItem Sheets("Base client").Range("B" & x)
    End With
Next x
End Sub

 

Vote positif 0 Vote négatif

A

aziz

XLDnaute Occasionnel

• 20 Mai 2016

• #5

Re : Affiche UserForm

Bonjour thebenoit59
et grand merci à vous deux
Bonne journée

 

Vote positif 0 Vote négatif