worksheets cachée

worksheets cachée - VB/VBA/VBS - Programmation

Marsh Posté le 02-04-2009 à 11:18:16    

Bonjour,
 
J'ai crée un formulaire de saisie. Je cherche à enregistrer les données dans une feuille "Donnees" dans des colonnes précises lorsque je clique le bouton "ok" du formulaire. J'utilise le code suivant (qui marche pour un autre formulaire) :
 
Private Sub enregistrement()
Worksheets("Donnees" ).Cells(2, 12).End(xlDown).Offset(1, 0) = recep.Text
Worksheets("Donnees" ).Cells(2, 13).End(xlDown).Offset(1, 0) = trait.Text
Worksheets("Donnees" ).Cells(2, 14).End(xlDown).Offset(1, 0) = complet.Text
Worksheets("Donnees" ).Cells(2, 15).End(xlDown).Offset(1, 0) = obs.Text
Unload SUIVI
End Sub
 
Private Sub ok_Click()
Call enregistrement
End Sub
 
Lorsque je lance le programme j'ai le message d'erreur suivant lorsque je vais dans debogage :
"Impossible d'aller à "Worksheets" qui est cachée".
 
Je ne comprends pas ce message étant novice en programmation vba.
Pourriez vous m'aider ?
Merci.

Reply

Marsh Posté le 02-04-2009 à 11:18:16   

Reply

Marsh Posté le 02-04-2009 à 11:44:47    

Bonjour
 
Cet onglet, "Donnees", il est caché ou pas ??
Le message est assez explicite je pense...
 
Essaie de mettre, au debut de ton code :  
Worksheets("Donnees" ).Visible = -1
 
Cordialement


---------------
Soyez malin, louez entre voisins !
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed