Impression d'une cellule sur une page

[msingle]

Bonjour,

Dans un tableau, j'aimerais pouvoir sélectionner n'importe quelle cellule d'une colonne, et que, lors de l'impression, le contenu de cette cellule occupe toute une page A4.

Bien entendu, il ne faut pas que l'impression du tableau complet soit perturbée...

Merci de votre aide.

 

[Victor21]

Re : Impression d'une cellule sur une page

Bonjour, msingle.

Peut-être :

Sub Macro1()
Application.DisplayAlerts = False
Application.PrintCommunication = True
ActiveSheet.PageSetup.PrintArea = Selection.Address
With ActiveSheet.PageSetup
    .Zoom = 400
End With
ActiveWindow.SelectedSheets.PrintPreview
'PrintOut Copies:=1
Application.DisplayAlerts = False
End Sub

 

[msingle]

Re : Impression d'une cellule sur une page

Un grand merci pour cette macro.

Mais j'ai contourné le problème en créant une feuille spécifique dans laquelle j'injecte les données.

Cordialement