S.O.S Erreur 1004, (Userform)

[M.D]

Bonjour à tous les membres et lecteurs du forum,

Plus je travaille sur les USERFORM, moins j’obtiens de résultats positifs
Depuis quelques jours je cherche où se trouve l’erreur qui me bloque tout mon projet, sans succès
Lors du lancement de mon USERFORM, j’ai un message d’erreur 1004. « La méthode « Range » de l’objectif_ globale à échoué. ¨pas moyen d'avancer son mon projet.

Je fais donc appel aux spécialistes pour me venir en aide afin de m’expliquer l’origine de ce blocage ?
Merci d’avance

M.D

 

[mapomme]

Re : S.O.S Erreur 1004, (Userform)

Bonsoir M.D,

Deux petits bugs dans le code:

Private Sub UserForm_Initialize() 'à l'initialisation de l'UserForm
li = 2 'définit la variable li (déclarée Publique dans le Module1)
'alimente les comboboxes
ComboBox_fournisseur.List = Range("fournisseur").Value
Call Rens_Ctrl 'lance la procédure de renseignement des contrôles
End Sub

il n'y a pas de plage de nom fournisseur dans le fichier.

Public Sub Rens_Ctrl()
Dim dl As Long 'déclare la variable dl (Dernière Ligne)
Dim ctrl As Control 'déclare la variable ctrl (ConTRôLe)

With Sheets("BD_depense") 'prend en compte l'onglet "BD_depense"

La feuille s'appelle BD-depense et non BD_depense.

 

[M.D]

Re : S.O.S Erreur 1004, (Userform)

Bonsoir,

Merci pour votre aide. J’espère que ces procédure que vous développer, vont pouvoir faire avancer mon projet.

J’essaierai cela demain matin.

M.D