XL 2013 Impression pdf bug vba

Fitgy · 6 Mai 2021

Bonjour à tous le forum,

J'ai un fichier sur lequel j'imprime en pdf dans le dossier voulu avec le nom voulu. Jusque là impeccable ma VBA marché nickel mais voilà j'ai fermé mon excel je le réouvre et ça ne fonctionne plus mais pooouurquooii j'ai beau tourner dans tout les sens je ne comprends pas ce qui ne lui plaît pas et encore plus du fait qu'elle marché avant...
Je vous met en jaune ce que le débogage me surligne.

Merci d'avance à ceux qui pourront m'aider
Ma VBA :

Sub ImpressionPDF()
Fichier = Range("F5") & ".pdf"
Dossier = "L:\Etude R&R\2021\"
Chemin = Dossier & Fichier

ActiveSheet.PageSetup.PrintArea = "$A$1:$R$45"
choix = MsgBox("Imprimer tout ?", vbQuestion + vbYesNoCancel + vbDefaultButton2, "Impression")
If choix = vbCancel Then Exit Sub
If choix = vbNo Then
' imprimer feuille
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Chemin
ActiveSheet.PageSetup.PrintArea = ""
Else
' imprimer tout
Application.ScreenUpdating = False
savSelection = [F5]
For Each c In [F5]
[F5] = c.Value
[ActiveSheet.ExportAsFixedFormat Type:=xlsTypePDF, Filename:=Chemin
Next c
[F5] = savSelection
End If
ActiveSheet.PageSetup.PrintArea = ""
End Sub

Fitgy · 6 Mai 2021

Re Bonjour à tous,

Je viens à l'instant de trouver ce qui n'allait pas... Ce n'est pas de fermé et de rallumé qui pose problème ni le fait que la cellule soit fusionné simplement dans ma cellule F5 c'est une liste de déroulante de nom et certaine contienne des caractères interdit pour la sauvegarde du fichier comme des \ ou / par exemple.
J'ai dû faire mes essais sur des noms qui n'en avait pas et bloqué sur ceux qui en avait ce qui explique qu'elle ne fonctionné que de temps en temps...

Merci Kiki29 pour ce lien qui est très intéressant je vais étudier tes codes.
Merci à tous pour votre aide

Etoto · 6 Mai 2021

Fitgy à dit:
Re Bonjour à tous,

Je viens à l'instant de trouver ce qui n'allait pas... Ce n'est pas de fermé et de rallumé qui pose problème ni le fait que la cellule soit fusionné simplement dans ma cellule F5 c'est une liste de déroulante de nom et certaine contienne des caractères interdit pour la sauvegarde du fichier comme des \ ou / par exemple.
J'ai dû faire mes essais sur des noms qui n'en avait pas et bloqué sur ceux qui en avait ce qui explique qu'elle ne fonctionné que de temps en temps...

Merci Kiki29 pour ce lien qui est très intéressant je vais étudier tes codes.
Merci à tous pour votre aide

De rien, je suis content que tu aies trouvé

Etoto · 6 Mai 2021

Etoto à dit:
De rien, je suis content que tu aies trouvé

Même si mon aide s'est avérée inutile.

Fitgy · 6 Mai 2021

Etoto à dit:
Même si mon aide s'est avérée inutile.

Ce n'est jamais inutile d'échanger sur un sujet en tout cas merci pour ton dévouement à avoir voulu m'aider et ta rapidité à répondre
Bonne fin de journée à toi

Etoto · 6 Mai 2021

Fitgy à dit:
Ce n'est jamais inutile d'échanger sur un sujet en tout cas merci pour ton dévouement à avoir voulu m'aider et ta rapidité à répondre
Bonne fin de journée à toi

Merci tu es gentil, bonne fin de journée (je t'avais dit par contre que le VBA c'est pas mon point fort)

Compte Supprimé 979 · 6 Mai 2021

Fitgy à dit:
Re Bonjour à tous,

Je viens à l'instant de trouver ce qui n'allait pas... Ce n'est pas de fermé et de rallumé qui pose problème ni le fait que la cellule soit fusionné simplement dans ma cellule F5 c'est une liste de déroulante de nom et certaine contienne des caractères interdit pour la sauvegarde du fichier comme des \ ou / par exemple.
J'ai dû faire mes essais sur des noms qui n'en avait pas et bloqué sur ceux qui en avait ce qui explique qu'elle ne fonctionné que de temps en temps...

Merci Kiki29 pour ce lien qui est très intéressant je vais étudier tes codes.
Merci à tous pour votre aide

Voilà pourquoi je vous avais demandé ce que contenait la cellule F5... je m'en doutais

Fitgy · 6 Mai 2021

BrunoM45 à dit:
Voilà pourquoi je vous avais demandé ce que contenait la cellule F5... je m'en doutais

Bien vue dommage que je n'ai pas eu vôtre réflexion plutôt ça m'aurais évité de faire rire mon chef pendant 1h

XL 2013 Impression pdf bug vba

Fitgy

XLDnaute Junior

Fitgy

Etoto

XLDnaute Barbatruc

Etoto

XLDnaute Barbatruc

Fitgy

XLDnaute Junior

Etoto

XLDnaute Barbatruc

Compte Supprimé 979

Guest

Fitgy

XLDnaute Junior

Discussions similaires