UserForm en panne

koukou40

XLDnaute Occasionnel

• 19 Avril 2008

• #2

Re : UserForm en panne

La Vouivre à dit:

Bonsoir amis du forum
je suis en panne avec un Userform qui refuse de s'afficher .
Pouvez-vous me dépanner ?
merci à tous pour vos super travaux

Cliquez pour agrandir...

Salut !

Normal que cela ne fonctionne pas !
Tu n'as pas renommé l'onglet "Stock" !

A+

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 19 Avril 2008

• #3

Re : UserForm en panne

Bonsoir,
tout d'abord, pourquoi deux Sub pour initialiser ton USF?
Ensuite, la feuille "Stock" n'existe pas...

Code:

Private Sub UserForm_Initialize()

CommandButton1.Caption = "Valider changement"
TextBox1.Visible = False
TextBox8.Enabled = False
IniComboBox1

End Sub
Private Sub IniComboBox1()
Dim Rng As Range

With Sheets("Stock")
Set Rng = .Range("A2:A" & .Range("A65536").End(xlUp).Row)
End With

With ComboBox1
.Clear
.List = Rng.Value
End With

End Sub

que tu peux remplacer par :

Code:

Private Sub UserForm_Initialize()
Me.CommandButton1.Caption = "Valider changement"
Me.TextBox1.Visible = False
Me.TextBox8.Enabled = False
Dim Rng As Range
With Sheets("Stock")
Set Rng = .Range("A2:A" & .Range("A65536").End(xlUp).Row)
End With
With Me.ComboBox1
.Clear
.List = Rng.Value
End With
End Sub

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 19 Avril 2008

• #4

Re : UserForm en panne

Bonsoir


Voila

EDITION: bonsoir bhbh

Même constat : pas de feuille stock

J'ai donc mis en commentaire le code relatif au combobox

Comme cela l'userform s'affiche 😉


EDITION2: Feuil2 renommée en Stock
la pièce jointe inclue le code de bhbh
Private Sub UserForm_Initialize()

 

Dernière édition: 20 Avril 2008

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 19 Avril 2008

• #5

Re : UserForm en panne

Bonjour à tous,
Salut Koukou 🙂,

Ravi de te retrouver sur un fil avec une réponse perspicace...😛
Si je puis me permettre : continue comme ça

A++ à toi
A+ à tous

Edition : Salut BH², Salut l'Agrafe, tout comme Koukou vous avez remarqué l'absence de la feuille "Stock"

 

Dernière édition: 19 Avril 2008

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 19 Avril 2008

• #6

Re : UserForm en panne

Bonsoir koukou40, JCGL


Si je viens de renommer la Feuil2 en Stock

 

Dernière édition: 20 Avril 2008

Vote positif 0 Vote négatif

La Vouivre

XLDnaute Occasionnel

• 19 Avril 2008

• #7

Re : UserForm en panne

Merci à tous
quel étourdi je suis .
bonne soirée à tous

 

Vote positif 0 Vote négatif

Cousinhub

XLDnaute Barbatruc

• 19 Avril 2008

• #8

Re : UserForm en panne

Re-,
Bonsoir Koukou, JC, Staple

Effectivement, Koukou, l'erreur venait de cette feuille manquante, seulement, nos post se sont croisés. 😎

PS : @staple : pour info, j'ai pris pour habitude de renommer les fichiers que je travaille avant de les reposter (exemple : le fichier en panne nommé erreur.xls, si je le modifie, je le reposte sous le nom erreur_v1.xls)
Ce n'est rien, mais si le fichier origine est toujours ouvert, cela ne m'oblige pas à le fermer afin d'ouvrir le fichier modifié proposé
Je ne sais pas si tu comprends ce que je veux dire, mais au cas où, ouvre le fichier origine, puis le tien proposé en téléchargement...😉
Bonne soirée 😀

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 19 Avril 2008

• #9

Re : UserForm en panne

Re,

Pour info, j'ai pris pour habitude de renommer les fichiers que je travaille avant de les reposter (exemple : le fichier en panne nommé erreur.xls, si je le modifie, je le reposte sous le nom erreur_v1.xls)
Ce n'est rien, mais si le fichier origine est toujours ouvert, cela ne m'oblige pas à le fermer afin d'ouvrir le fichier modifié proposé

Cliquez pour agrandir...

Re BH² : personnellement je ne peux qu'abonder dans ton sens, pour une plus grande lisibilité des messages et surtout des fichiers...
Et si cela pouvait faire partie de la Lien supprimé...

A++ BH²
A+ à tous

 

Vote positif 0 Vote négatif