Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Probleme de code tout bête! Impression sur critères

  • Initiateur de la discussion Initiateur de la discussion chkeuz
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

C

chkeuz

Guest
Bonjour les amis!
Aujourd'hui je viens vers vous pour vous soumettre un petit problème de code. Je m'esplique: J'ai un grand tableau, dont l'impression est conditionnée par le contenu des cellules d'une des colonnes-seules les cellules pleines sont imprimées. Je voudrais intégrer une seconde colonne à ces critères dans la macro, et n'y parviens pas...(habitué des scripts en AS2 ou 3 et C, j'ai tenté tout ce que je connaissais, mais le résultat s'avère insatisfaisant!J'ai tout essayé: pomper du code dans les discussions, And, Or...Rien de rien!).
Voici donc mon code:
Sub imprimerPlageCellules()
Dim n As Integer
Application.ScreenUpdating = False
For n = 4 To 495
If Cells(n, 6) = 0 Then
Rows(n).Hidden = True
End If
Next n
Sheets("feuil1").Range("A4:L495").PrintOut
For n = 4 To 495
Rows(n).Hidden = False
Next n
Application.ScreenUpdating = True

End Sub

Tout bête, non? Eh ben je coince! saint PJ, si tu passes par là, je te paie une bouteille!😀
 
Re : Probleme de code tout bête! Impression sur critères

Bonjour chkeuz,

En supposant que la 2ème colonne à tester soit la 7, avez-vous bien essayé :

If Cells(n, 6) = 0 Or Cells(n, 7) = 0 Then

ou bien (ça dépend de ce que vous voulez) :

If Cells(n, 6) = 0 And Cells(n, 7) = 0 Then

Par ailleurs, notez qu'il est bien plus simple de remplacer la 2ème boucle For par :

Rows("4:495").Hidden = False

A+
 
Re : Probleme de code tout bête! Impression sur critères

Wow! Ca c'est de la réponse rapide!
Merci!
J'avais tenté les And et les For, mais avec l'habitude de l'actionscript,et de tout mettre à la ligne, eh bien ça ne marchait pas!!
Autrement dit, pourquoi faire simple??
Merci encore, et à bientôt!
 
Re : Probleme de code tout bête! Impression sur critères

Bonjour le fil, le Forum, et tous ses bienfaiteurs.
J'ai, de nouveau, un problème avec ce *** tableau.
Le code VBA me renvoie systématiquement une erreur d'incompatibilité 13 quand je cible la colonne que je cherche à masquer...et ça m'énerve!!!
Quelqu'un saura-t-il trouver la solution?
Fichier à consulter:
http:///www.lma-lebeurre.com/test.xls
Merci d'avance si vous passez par là!!
 
Re : Probleme de code tout bête! Impression sur critères

Bonjour chkeuz, le forum,

Il y a tout simplement des valeurs d'erreur #VALEUR! dans le tableau.

Alors dans la macro le test sur la cellule crée un bug 🙂

A+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

K
Réponses
2
Affichages
2 K
Compte Supprimé 979
C
C
Réponses
0
Affichages
683
C
G
Réponses
9
Affichages
16 K
G
Z
Réponses
12
Affichages
1 K
@+Thierry
@
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…