tester une valeur et imprimer

tester une valeur et imprimer - VB/VBA/VBS - Programmation

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 !

Reply

Marsh Posté le 18-11-2004 à 11:31:58   

Reply

Marsh Posté le 18-11-2004 à 17:03:49    

utilise
 
ThisWorkbook.sheets("Feuil1" ).PrintOut
 
pour imprimer la feuil1

Reply

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 !!


Message édité par blinkoff le 19-11-2004 à 15:15:04
Reply

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

Reply

Sujets relatifs:

Leave a Replay

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