Lien hypertext permettant impression directe

Résolu
c135078 Messages postés 48 Statut Membre -  
c135078 Messages postés 48 Statut Membre -
Bonjour,
je cherche a créer une icone sur un fichier excel (transformé en HTML) permettant en cliquant dessus d'imprimer une autre feuille dans un autre classeur...

est ce possible et si oui comment

un tout grand merci Jérôme
Configuration: Windows XP
Internet Explorer 6.0

2 réponses

  1. c135078 Messages postés 48 Statut Membre 1
     
    merci j'ai trouvé
    0
  2. c135078 Messages postés 48 Statut Membre 1
     
    Private Sub CommandButton6_Click()
    Dim Fichier As String
    Dim App As Object
    Dim Book As Workbook
    Dim Sheet As Worksheet

    Set App = CreateObject("Excel.Application")
    App.DisplayAlerts = False
    Set Book = App.Workbooks.Open("chemin d'acces.xls")
    Set Sheet = Book.Sheets("non de la feuille")
    Sheet.PrintOut Copies:=1, Preview:=False, Collate:=False
    Set Book = Nothing
    Set Sheet = Nothing
    App.Quit
    End Sub
    0