en JAUNE cadre à imprimer pour ici : 1 , 2 3 4 5 et 6
Donc il me faudrait une macro qui imprime tout.. quand il y a un numero dans la colonne AE et qui s'arrête toute seule quand c'est vide ici après le 6. Mais pour certaines fois cela peut aller jusqu'à 10 ou 100 etc...
Sub IMPRESSION()
Dim K As Integer
With TEST
For K = 4 To Range("AE" & Rows.Count).End(xlUp).Row
If Range("K" & K) = "" Then
Range("J4") = Range("AE" & K)
Sheets("TEST").PrintPreview
End If
Next K
End With
End sub
ensuite, pour que ta macro s'arrête, pose la condition de AE non vide, sinon elle t'imprimeras des #NA
Code:
If Range("K" & K) = "" And Range("AE" & K) <> "" Then
Donc
VB:
Sub IMPRESSION()
Dim K As Integer
With TEST
For K = 4 To Range("AE" & Rows.Count).End(xlUp).Row
If Range("K" & K) = "" And Range("AE" & K) <> "" Then
Range("J4") = Range("AE" & K)
Sheets("TEST").PrintPreview
End If
Next K
End With
End Sub
On ne valide pas la réponse proposée, le #10 me semble tout a fait clair...
Après, tu peux toujours éditer ton premier message en ajoutant [résolu] dans le sujet, sauf si tu es curieux d'une proposition ou de l'avis d'un pro du vba.
@+