Impression

[redfox]

Je veux imprimer une selection d'une feuille de calcul selon que le resultat de mon UserForm est "bordereau", "doc", ...

Mais cette ecriture ne semble pa convenir.
qq'1 aurait une idée de l'erreur ?




Select Case choix
Case "bordereau"
Feuil11.Range(Cells(3, 21), Cells(73, 31)).PrintOut
Case "doc"
Case "famille"
Case "lpd"
Case "client"
Case "interne"
Feuil2.Range(Cells(1, 1), Cells(69, 6)).PrintOut
Case "tri"
End Select

 

[STéphane]

bonjour

qu'est-ce qui cloche là-dedans ?


select case choix '.text ou .value ?
case "bordereau" : msgbox "oto"
case "doc" : msgbox "tata"
case else :
end select

ou s'arrête le débogueur ?

bye
stéphane

 

[redfox]

quand je choisi "interne" il plante et me dis que la méthode Range de l'objet Worksheet a échoué

Select Case choix
Case "bordereau"
Feuil11.Range(Cells(3, 21), Cells(73, 31)).PrintOut
Case "doc"
Case "famille"
Case "lpd"
Case "client"
----->Case "interne"
----->Feuil2.Range(Cells(1, 1), Cells(69, 6)).PrintOut
Case "tri"
End Select