Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
PanZzaNni
Je te conseille de masquer les lignes ne contenant pas de données
'------------------------------------- Sub Masquer() Dim cell As Range For Each cell In Selection If IsEmpty(cell) Then cell.EntireRow.Hidden = True Next End Sub '------------------------------------
Pour ensuite les afficher
'--------------------------------------- Sub Afficher() Cells.EntireRow.Hidden = False
End Sub '-------------------------------------
En espérant avoir répondu à ta question
"Avec du sarcasme, on peut seulement masquer ses blessures, sinon ses dégoûts." Cioran, Emil Michel
"JEAN" a écrit dans le message de news:
Bonjour, j'ai un tableau avec 300 lignes.
mais tantot le tableau possede 15 lignes, tantot 20, tantot 2, tantot 40
je voudrai mettrai un bouton de commande sur cette feuille afin de m'imprimer directement seulement les lignes ou j'ai des valeurs.
c'est a dire quand j'imprimerai, je ne voudrai pas voir des lignes vides. si j'ai 10 lignes dans mon tableau, alors imprimer seulement ces dix lignes.
quel serait le code? merci de votre aide
Je te conseille de masquer les lignes ne contenant pas de données
'-------------------------------------
Sub Masquer()
Dim cell As Range
For Each cell In Selection
If IsEmpty(cell) Then cell.EntireRow.Hidden = True
Next
End Sub
'------------------------------------
Pour ensuite les afficher
'---------------------------------------
Sub Afficher()
Cells.EntireRow.Hidden = False
End Sub
'-------------------------------------
En espérant avoir répondu à ta question
"Avec du sarcasme, on peut seulement masquer ses blessures, sinon ses
dégoûts."
Cioran, Emil Michel
"JEAN" <JEAN@discussions.microsoft.com> a écrit dans le message de news:
021EBF1A-2DE6-4BF1-A322-A18C237788D7@microsoft.com...
Bonjour, j'ai un tableau avec 300 lignes.
mais tantot le tableau possede 15 lignes, tantot 20, tantot 2, tantot 40
je voudrai mettrai un bouton de commande sur cette feuille afin de
m'imprimer directement seulement les lignes ou j'ai des valeurs.
c'est a dire quand j'imprimerai, je ne voudrai pas voir des lignes vides.
si j'ai 10 lignes dans mon tableau, alors imprimer seulement ces dix
lignes.
Je te conseille de masquer les lignes ne contenant pas de données
'------------------------------------- Sub Masquer() Dim cell As Range For Each cell In Selection If IsEmpty(cell) Then cell.EntireRow.Hidden = True Next End Sub '------------------------------------
Pour ensuite les afficher
'--------------------------------------- Sub Afficher() Cells.EntireRow.Hidden = False
End Sub '-------------------------------------
En espérant avoir répondu à ta question
"Avec du sarcasme, on peut seulement masquer ses blessures, sinon ses dégoûts." Cioran, Emil Michel
"JEAN" a écrit dans le message de news:
Bonjour, j'ai un tableau avec 300 lignes.
mais tantot le tableau possede 15 lignes, tantot 20, tantot 2, tantot 40
je voudrai mettrai un bouton de commande sur cette feuille afin de m'imprimer directement seulement les lignes ou j'ai des valeurs.
c'est a dire quand j'imprimerai, je ne voudrai pas voir des lignes vides. si j'ai 10 lignes dans mon tableau, alors imprimer seulement ces dix lignes.
quel serait le code? merci de votre aide
PanZzaNni
Je vois que tu as répondu au message "tcd et problème" à 00:25. C'est donc que tu as lu inévitablement ma réponse à propos de ton problème d'impression. La moindre des choses est de dire merci.
"On peut dire merci au métro. Au moins maintenant il y a moins de violence dans la rue." Jordan, Jim
"PanZzaNni" a écrit dans le message de news:
Je te conseille de masquer les lignes ne contenant pas de données
'------------------------------------- Sub Masquer() Dim cell As Range For Each cell In Selection If IsEmpty(cell) Then cell.EntireRow.Hidden = True Next End Sub '------------------------------------
Pour ensuite les afficher
'--------------------------------------- Sub Afficher() Cells.EntireRow.Hidden = False
End Sub '-------------------------------------
En espérant avoir répondu à ta question
"Avec du sarcasme, on peut seulement masquer ses blessures, sinon ses dégoûts." Cioran, Emil Michel
"JEAN" a écrit dans le message de news:
Bonjour, j'ai un tableau avec 300 lignes.
mais tantot le tableau possede 15 lignes, tantot 20, tantot 2, tantot 40
je voudrai mettrai un bouton de commande sur cette feuille afin de m'imprimer directement seulement les lignes ou j'ai des valeurs.
c'est a dire quand j'imprimerai, je ne voudrai pas voir des lignes vides. si j'ai 10 lignes dans mon tableau, alors imprimer seulement ces dix lignes.
quel serait le code? merci de votre aide
Je vois que tu as répondu au message "tcd et problème" à 00:25. C'est donc
que tu as lu inévitablement ma réponse à propos de ton problème
d'impression. La moindre des choses est de dire merci.
"On peut dire merci au métro. Au moins maintenant il y a moins de violence
dans la rue."
Jordan, Jim
"PanZzaNni" <emilefyon@hotmail.com> a écrit dans le message de news:
e180Yrv4EHA.2196@TK2MSFTNGP14.phx.gbl...
Je te conseille de masquer les lignes ne contenant pas de données
'-------------------------------------
Sub Masquer()
Dim cell As Range
For Each cell In Selection
If IsEmpty(cell) Then cell.EntireRow.Hidden = True
Next
End Sub
'------------------------------------
Pour ensuite les afficher
'---------------------------------------
Sub Afficher()
Cells.EntireRow.Hidden = False
End Sub
'-------------------------------------
En espérant avoir répondu à ta question
"Avec du sarcasme, on peut seulement masquer ses blessures, sinon ses
dégoûts."
Cioran, Emil Michel
"JEAN" <JEAN@discussions.microsoft.com> a écrit dans le message de news:
021EBF1A-2DE6-4BF1-A322-A18C237788D7@microsoft.com...
Bonjour, j'ai un tableau avec 300 lignes.
mais tantot le tableau possede 15 lignes, tantot 20, tantot 2, tantot 40
je voudrai mettrai un bouton de commande sur cette feuille afin de
m'imprimer directement seulement les lignes ou j'ai des valeurs.
c'est a dire quand j'imprimerai, je ne voudrai pas voir des lignes vides.
si j'ai 10 lignes dans mon tableau, alors imprimer seulement ces dix
lignes.
Je vois que tu as répondu au message "tcd et problème" à 00:25. C'est donc que tu as lu inévitablement ma réponse à propos de ton problème d'impression. La moindre des choses est de dire merci.
"On peut dire merci au métro. Au moins maintenant il y a moins de violence dans la rue." Jordan, Jim
"PanZzaNni" a écrit dans le message de news:
Je te conseille de masquer les lignes ne contenant pas de données
'------------------------------------- Sub Masquer() Dim cell As Range For Each cell In Selection If IsEmpty(cell) Then cell.EntireRow.Hidden = True Next End Sub '------------------------------------
Pour ensuite les afficher
'--------------------------------------- Sub Afficher() Cells.EntireRow.Hidden = False
End Sub '-------------------------------------
En espérant avoir répondu à ta question
"Avec du sarcasme, on peut seulement masquer ses blessures, sinon ses dégoûts." Cioran, Emil Michel
"JEAN" a écrit dans le message de news:
Bonjour, j'ai un tableau avec 300 lignes.
mais tantot le tableau possede 15 lignes, tantot 20, tantot 2, tantot 40
je voudrai mettrai un bouton de commande sur cette feuille afin de m'imprimer directement seulement les lignes ou j'ai des valeurs.
c'est a dire quand j'imprimerai, je ne voudrai pas voir des lignes vides. si j'ai 10 lignes dans mon tableau, alors imprimer seulement ces dix lignes.
