Impression page active VBA

Bonjour ,

je cherche un code vba affecter à un bouton qui me permettrai d' imprimer une page spécifique , je travail sur un tableau( de type planning) dans un onglets avec 52 pages et je voudrais pouvoir imprimer la page voulue automatiquement.

si quelqu'un à la solution

merci

Bonjour,

A tester

Code à coller dans le Thisboork

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)

       With ActiveCell  'Sélectionne la cellule active et applique la macro 1
           Impression
        End With
        Cancel = True
End Sub

Amicalement

pierrot

Bonjour,

Qu'est-ce qui définit la page voulue ?

Cordialement.

Le code Impression a coller dans un module

la feuille à imprimer est la feuille active cette impression est activée par un double-clic sur la feuille active

Sub Impression()
Application.Dialogs(xlDialogPrintPreview).Show
End Sub

Pierrot