XL pour MAC Export en pdf d'une plage de cellule, avec nom de fichier dans une cellule

CM1090 à dit:

Bonsoir,

Après avoir traîné ici et là, je n'ai pas trouvé ma solution ... Je fais donc appel aux bonnes âmes présentes ici !

Je souhaiterais créer une macro (click sur un bouton) pour exporter une plage de cellules dans un fichier pdf. Le nom de celui-ci est dans une cellule de la feuille.

mon classeur a 3 feuilles : Home, Prop, Dev (dans cet ordre-là)
Plage de cellules à exporter : H9 à O55 (sur la page Dev) ; toujours la même plage exportée, mais avec des résultats qui varient
Nom du fichier destination : se situe en V13 (page Dev), et est variable
Chemin de destination : C:\NUM\CONT

Merci pour aide !

Christophe

Cliquez pour agrandir...

Sub export()
    Dim Chemin$
    Chemin = "C:\NUM\CONT\"
    With Sheets("Dev")
        .PageSetup.PrintArea = "H9:O55"
        .ExportAsFixedFormat Type:=xlTypePDF, Filename:=Chemin & .[v13]
    End With
End Sub

Jacky67 à dit:

Bonjour,
Le code pourrait ressembler à ceci

VB:

Sub export()
    Dim Chemin$
    Chemin = "C:\NUM\CONT\"
    With Sheets("Dev")
        .PageSetup.PrintArea = "H9:O55"
        .ExportAsFixedFormat Type:=xlTypePDF, Filename:=Chemin & .[v13]
    End With
End Sub

**Code pour PC, à voir si cela fonctionne sur Mac

Cliquez pour agrandir...

CM1090 à dit:

Merci bien.
2 Messages d'erreurs :
fenêtre "Erreur d'impression", et à débuguer (surligné en jaune) : .ExportAsFixedFormat Type:=xlTypePDF, FileName:=Chemin & .[v13]••••ˇˇˇˇ

Cliquez pour agrandir...

Jacky67 à dit:

Re..
Tester sur Xl pc
Si le chemin existe et la cellule V13 est renseignée sans caractères interdits et cela ne fonctionne pas sur mac, je ne serais plus d'aucun secours.
Désolé!

Cliquez pour agrandir...

kiki29 à dit:

Salut, si tu es curieux, pour ce qui concerne le Mac, un coup d'œil sur le site de Ron de Bruin

Cliquez pour agrandir...