Discussion :

[ovich87]

Bonjour,

Je ne maîtrise pas du tout VBA et j'utilisais jusqu'à présent le code ci-dessous pour mes impressions en masse:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
Sub Impression()
    Dim Liste As String, C As Range
    With Sheets("Fiches individuelles")
        Liste = .Range("E8").Validation.Formula1
        Liste = Right(Liste, Len(Liste) - 1)
        For Each C In Range(Liste)
            .[E8] = C.Value
            .PrintOut
        Next C
    End With
End Sub

En effet, j'ai un onglet Excel dans lequel j'ai une fiche individuelle par personne (je change de personne via la liste déroulante en cellule E8). Cette macro me permettait d'imprimer sur papier via mon imprimante par défaut chacune des fiches individuelles.

Nous sommes désormais passés au digital et je souhaiterais que les sorties de chacune des fiches se fassent sous format pdf. J'ai testé en modifiant mon imprimante par défaut à Adobe PDF mais chaque nouvelle fiche vient écraser la précédente (même nom de fichier à chaque fois). En effet, je ne sais pas comment personnaliser cette macro en lui demandant de sauvegarder chaque fiche en prenant comme nom celui qui est renseigné en cellule E8.

Avez-vous une idée svp?

Merci de votre aide

[MarcelG]

Bonjour et bienvenu sur ce Forum,

2 remarques préliminaires

- Pour reporter un code utilise les balises appropriés (#)
- Si tu utilises la méthode With alors n'oublie pas de mettre un "." devant les objets qui y sont attachés

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
With Worksheets("tata")
    .range("A1:A3").Value = 2

Pour ton besoin.
Je te conseille
- de boucler sur tes fiches Excel et de les enregistrer sous format Pdf
- ensuite, boucler sur ceux-ci pour les imprimer par procédure VBA depuis Excel

Avant d'aller plus loin, qu'en penses-tu?

[ovich87]

Merci MarcelG de ta réponse.

Je voudrais bien répondre à ta question mais je ne sais même pas ce que veut dire boucler J'ai repris ce fichier qui était construit par quelqu'un d'autre et j'ai tenté de comprendre le code VBA qui y était inscrit.

Je vais essayer d'apprendre les rudiments de VBA et tenter ta méthode.

[MarcelG]

Salut,

Ne t'inquiète pas. Nous sommes tous passé par une phase d'apprentissage.

Par boucler, je voulais signifier la méthode For...Next

Il y a beaucoup de tutoriels sur ce site pour t'apprendre les rudiments d'Excel d'bord, de VBA ensuite.

A partir de là, si nous pouvons t'être utiles, n'hésite pas.

Bonne continuation.

[kiki29]

Salut, voir en bas de ce post 1 Impression de certaines Feuilles d'un classeur via un tableau dans un seul Pdf résultant et adapter à ton contexte. Il y a aussi Excel et l'enregistreur de macro