Macro de selection et d'impression

Résolu/Fermé
Signaler
Messages postés
7
Date d'inscription
jeudi 1 octobre 2009
Statut
Membre
Dernière intervention
12 avril 2010
-
Messages postés
7
Date d'inscription
jeudi 1 octobre 2009
Statut
Membre
Dernière intervention
12 avril 2010
-
Bonjour,

mon probleme est que voulant faire un impression uniquement des lignes referencés dans un tableau excel, j'ai pondu un petit code en VBA, mais etant une mauvaise poule, le code ne fonctionne pas ;)
Le voici:

Sub Imprimer()
'
' Imprimer Macro
' Impression partielle du document
'

'

For i = 9 To 112
If Not IsEmpty(Feuil1.Cells(G, i)) Then
Range("Bi:Gi").Select
End If
Next i
Feuil1.PrintPreview


End Sub


Si quelqu'un pouvais m'orienter et m'expliquer ce qui ne va pas dans mon code, cela m'aiderai beaucoup.

Merci d'avance.

2 réponses

Messages postés
7
Date d'inscription
jeudi 1 octobre 2009
Statut
Membre
Dernière intervention
12 avril 2010

Voila, j'ai modifier un peut le code et ca donne ca:

For i = 9 To 120
If Not IsEmpty(Gi) Then

Range("Bi:Gi").Select
End If
Next i
Feuil1.PrintPreview


Donc la boucle se fait bien, mais j'ai une autre question maintenant, comment imprimer uniquement les lignes dont la cellule Gi n'est pas vide??

merci
Messages postés
7
Date d'inscription
jeudi 1 octobre 2009
Statut
Membre
Dernière intervention
12 avril 2010