1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. VB.NET
Sujet Précédent Sujet Suivant

Imprssion d'une sélection de feuilles excel via VBA

Résolu
Signaler
Messages postés
27
Date d'inscription
lundi 4 juin 2007
Statut
Membre
Dernière intervention
29 juin 2007
 -
Messages postés
443
Date d'inscription
mardi 27 mars 2007
Statut
Membre
Dernière intervention
1 mars 2011
 -
bonjour à tous!

voici mon code de sélection de mes feuilles, le principe est simple à partir de la "feuil4" (comprise) jusqu'à la fin le programme me sélectionne en surbrillance les feuilles:


<hr />
Private Sub CommandButton1_Click()
Dim myarray() As String
Dim i As IntegerFor Each currentsheet In ThisWorkbook.Sheets
    If currentsheet.Name <> "crea_bl" And currentsheet.Name <> "bl" And currentsheet.Name <> "BDD" Then
                ReDim Preserve myarray(i)
                myarray(i) = currentsheet.Name
                i = i + 1
            End If
        Next currentsheet
       
        Sheets(myarray).Select
End Sub

<hr />
à la suite de cela je voudrais qu'il m'imprime les feuilles sélectionnées... à vous de me le dire

1 réponse

Réponse 1 / 1
Messages postés
443
Date d'inscription
mardi 27 mars 2007
Statut
Membre
Dernière intervention
1 mars 2011
 2
Bonjour,
Un point similaire a déjà été traité !!!
    ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
Bonne Journée.JML
 Partageons notre savoir et nos acquis
Répondre Posez votre question