tester une valeur et imprimer - VB/VBA/VBS - Programmation
Marsh Posté le 18-11-2004 à 17:03:49
utilise
ThisWorkbook.sheets("Feuil1" ).PrintOut
pour imprimer la feuil1
Marsh Posté le 19-11-2004 à 15:12:56
merci mais je n'y arrive pas je debute completement !!!
mais j'ai trouver comment faire autrement mais il me manque q'un petit truc si vous pouvez m'aidez
voila une partie de ma macro donne ca:
je met entre paranthese ce qu'il faut qu'il faudrait rajouter
ActiveWindow.SmallScroll Down:=27
Range("C57" ).Select (si la valeur de cette cellule est egal a "OUI" )
alors
Sheets("MARGES" ).Select
ActiveWindow.SelectedSheets.Delete
Sheets("CONTENU" ).Select
merci d'avance !!
Marsh Posté le 19-11-2004 à 19:06:14
mets ca directement :
if Range("C57" )="OUI" then
Sheets("MARGES" ).Select
ActiveWindow.SelectedSheets.Delete
Sheets("CONTENU" ).Select
End if
Marsh Posté le 18-11-2004 à 11:31:58
bonjour
voila je connais pas grand chose en programation!
je me contenté d'enregistrer mes macro mais la je suis facea un probleme !!!
en enfet je dois faire une macro qui doit tester la valeur de certaine cellule et en fonction de valeur imprimer une page !!
si "oui" on imprime la page si "non" on saute
voila si quelqu'un peut m'aider ca serait super sympa !