Excel et macro pdf automatique sur mac

Lorrelei87 Messages postés 26 Date d'inscription Statut Membre Dernière intervention -
f894009 Messages postés 17277 Date d'inscription Statut Membre Dernière intervention - 23 oct. 2016 à 13:10

Bonjour,

Je suis sur Mac et début complètement avec excel.

J'ai un classeur avec 8 feuilles. J'ai créé un bouton sur deux d'entre elles pour enregistrer le document en format PDF automatiquement. Le pb... Cela m'enregistre une page blanche. Que faire ?

Voici les macros écrites pour les deux feuilles :

-------------

Sub PDFFI()
'
'

PdfFullName = Worksheets("FI").Cells(8, 8).Value & "_" & Worksheets("FI").Cells(3, 7).Value & Worksheets("FI").Cells(3, 8).Value

' PDFFI Macro
'
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"Macintosh HD:Users:bidule:Dropbox:pouet:truc:" & PdfFullName & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True, _
From:=2, To:=2
End Sub

-----------------------------------

Sub PDFFF()
'
'

PdfFullName = Worksheets("FF").Cells(8, 8).Value & "_" & Worksheets("FF").Cells(3, 7).Value & Worksheets("FF").Cells(3, 8).Value

' PDFFI Macro
'
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"Macintosh HD:Users:bidule:Dropbox:pouet:truc:" & PdfFullName & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True, _
From:=3, To:=3
End Sub

--------------------------------

Quel est le soucis ?

Merci beaucoup!!!!

Afficher la suite

A voir également:

Pdf en excel mac
Lire le coran en français pdf - Télécharger - Histoire & Religion
Liste déroulante excel - Guide
Adresse mac - Guide
Aller à la ligne excel mac - Guide
Mise en forme conditionnelle excel - Guide

1 réponse

Réponse 1 / 1

gbinforme Messages postés 14946 Date d'inscription Statut Contributeur Dernière intervention 4 724

Bonjour,

As-tu défini une zone d'impression correcte ?

Lorrelei87 Messages postés 26 Date d'inscription Statut Membre Dernière intervention

Oui, tout à fait. Je ne comprends vraiment pas ce qui cloche. :/

gbinforme Messages postés 14946 Date d'inscription Statut Contributeur Dernière intervention 4 724

Bonjour,

Pourquoi tu fais "ActiveSheet.Export" alors que tu as l'air de fonctionner sur une autre feuille " Worksheets("FI")"

Lorrelei87 Messages postés 26 Date d'inscription Statut Membre Dernière intervention

Hello gbinforme,

Merci pour ta réponse.

Je dois mettre Worskeets("FI") à la place de "ActiveSheet"?

Comme ceci :

Sub PDFFI()
'
'

PdfFullName = Worksheets("FI").Cells(8, 8).Value & "_" & Worksheets("FI").Cells(3, 7).Value & Worksheets("FI").Cells(3, 8).Value

' PDFFI Macro
'
Worksheets("FI").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"Macintosh HD:Users:bidule:Dropbox:pouet:truc:" & PdfFullName & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True, _
From:=2, To:=2
End Sub

Si oui, ça ne fonctionne pas non plus :s. Ca m'ouvre une fenêtre de debug :/

gbinforme Messages postés 14946 Date d'inscription Statut Contributeur Dernière intervention 4 724

Bonjour,
Pas facile de voir ton souci sans Mac, sans classeur et sans connaitre le contexte.
C'est quelle ligne en jaune ?

Lorrelei87 Messages postés 26 Date d'inscription Statut Membre Dernière intervention

Oui j'imagine bien :s. Désolée... Qu'est ce que je peux vous donner comme infos pour que ce soit plus clair ?

La ligne jaune est

Celle ci :

Worksheets("FI").ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"Macintosh HD:Users:bidule:Dropbox:pouet:truc:" & PdfFullName & ".pdf", _
Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=True, _
From:=3, To:=3

Votre réponse