Impression de cellule Excel
Résolu
Sly
-
Sly -
Sly -
Bonjour,
Je vous écris car j'ai un problème sur un code tout con en VBA, qui dit "Tu imprimeras la cellule A2 le nombre de fois indiqué dans la cellule D8". Bref, tout bête, mais impossible de le faire marcher. Le problème survient quand j'essaie d'imprimer la cellule en particulier, alors que si je décide d'imprimer toute la page, je n'ai aucun souci.
Et j'ai essayé comme ça aussi :
Je sais que j'aurais pu mettre directement Copies:=Range("D8").Value au lieu de déclarer la variable NOne, mais bref, là n'est pas le souci.
Vous auriez une idée?
Merci d'avance,
Sly
Je vous écris car j'ai un problème sur un code tout con en VBA, qui dit "Tu imprimeras la cellule A2 le nombre de fois indiqué dans la cellule D8". Bref, tout bête, mais impossible de le faire marcher. Le problème survient quand j'essaie d'imprimer la cellule en particulier, alors que si je décide d'imprimer toute la page, je n'ai aucun souci.
Dim NOne As Integer
NOne = Range("D8").Value
Range("A2").Select
Selection.PrintOut Copies:=NOne, Collate:=True, IgnorePrintAreas:=False
Et j'ai essayé comme ça aussi :
Sheets("Feuil1").Range("A2").PrintOut Copies:=1, Collate:=True, IgnorePrintAreas:=False
Je sais que j'aurais pu mettre directement Copies:=Range("D8").Value au lieu de déclarer la variable NOne, mais bref, là n'est pas le souci.
Vous auriez une idée?
Merci d'avance,
Sly
2 réponses
-
Bonjour,
Le truc, c'est que, puisque tu sélectionnes une cellule et que tu imprimes la Selection, il faut ignorer le paramètreIgnorePrintAreas
. Comme ceci :Dim NOne As Integer NOne = Range("D8").Value Range("A2").Select Selection.PrintOut Copies:=NOne, Collate:=True ', IgnorePrintAreas:=False
-
Ho ok, nickel, merci beaucoup!
Effectivement, c'est logique, comme quoi...
Sinon je viens de contourner le problème avec une autre technique (j'avais isolé les cellules à imprimer sur un autre onglet, comme ça je pouvais imprimer la page en entier et non devoir choisir, mais c'est plus du bricolage.
Merci beaucoup, et bonne journée.
