macro imprimer à partir d'une cellule active

[tomacho]

Bonjour,

je cherche une macro qui me permettrai de lancer une impression d'une plage de 5 colonnes, 3 lignes suivant la cellule que j'aurais selectionnée
il m'arrive de cacher des colonnes


ex cellule B1 selectionnée alors impression de la plage B1:G3, ou B1 I3 si il y a 2 colonnes de cachées

si qqn a une idée?

merci

PS, je serais peut etre long en réponse, decalage guadeloupe france oblige!

 

[tototiti2008]

Re : macro imprimer à partir d'une cellule active

Bonjour tomacho,

Peut-être :

Sub Imprime()
    ActiveCell.Select
    SendKeys "+{RIGHT 4}"
    SendKeys "+{DOWN 2}"
    Selection.PrintOut Copies:=1, Collate:=True
End Sub

 

[tomacho]

Re : macro imprimer à partir d'une cellule active

super, merci
je ne connaissais pas senkeys

 

[tomacho]

Re : macro imprimer à partir d'une cellule active

bonjour,

je n'arrive pas à ce que la zone selectionnée devienne la zone d'impression, il manque quelque chose, mais quoi?!

Sub Imprimef()


ActiveCell.Select
SendKeys "+{RIGHT 4}"
SendKeys "+{DOWN 2}"

ThisWorkbook.Names.Add Name:="imprimf", RefersTo:= _
ActiveCell

ActiveSheet.PageSetup.PrintArea = "imprimf"
ActiveWindow.SelectedSheets.PrintPreview

End Sub