Exporter une facture Excel en PDF dans un dossier spécifique avec pour nom le numéro de la facture

Рет қаралды 19,473

2 жыл бұрын

Salut!
Dans cette vidéo, nous verrons comment faire pour exporter un classeur en pdf à l'aide du vba.
Il suffira d'un simple click pour que le dossier soit crée et la facture sera immédiatement exportée avec pour nom le numéro de la facture en question.
▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬
👇 eBook offert 👇
📌Gérer vos données Excel : bit.ly/2X9PcnY
▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬
👇 Télécharge le fichier ici 👇
📌bit.ly/32WdreO
▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬
👇Lien des formations 👇
📌Tout comprendre sur les Tableaux Croisés Dynamique : bit.ly/3ArCEK5
📌Formation complet pour Apprendre Excel de A à Z : bit.ly/3w0rw3A
▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬
⬇⬇⬇Qui suis-je ? ⬇⬇⬇
🚨Je suis astuce Excel.🚨
j'ai crée cette chaîne pour vous présenter des astuces Excel très peu connue mais qui pourrait à 1000% vous rendre plus rapide, plus efficace et ainsi plus performant dans vos différentes tâches que vous soyez comptable, financier ou autre.
toutes ces astuces vous seront d'une grande aide au boulot, à l'école, à la maison ou dans vos projets personnels.
🔭 Vous découvrirez ici des astuces Excel et des formations Excel pour vous aider à apprendre Excel 💪.
🚨Ne vous enfaite pas si vous êtes débutant🚶 car nos astuces Excel et formation en tiendront compte pour que même un simple débutant pourra les reproduire et vous aurez chaque fois le lien de téléchargement du fichier en description de chaque vidéo.
🏮Donc dans cette chaîne nous allons apprendre Excel de A à Z grâce à des astuces et des formations et mini formations justes pour vous😌.
📢Alors abonnez vous à chaîne pour profiter de toutes ces astuces impressionnantes les unes des autres tout en activant la cloche 🔔 pour être informé lorsqu'une nouvelle vidéo sera disponible.
👉 De liker ( 👍 ) et la partager aux autres utilisateurs d'Excel
👉 Et n'hésitez pas à nous laisser vos impressions en commentaire.
▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬
***Me suivre...🚨
➡ Abonne toi ici :
⛳bit.ly/32JqMCG
▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬
🚨🚨 Mini formations Excel 👇⬇⬇⬇
🏮Excel image : • Excel-images
🏮la gestion de stocks automatique : • La gestion de stocks s...
🏮Les mises en formes conditionnelles : • Mise en formes conditi...
🚩le vba : • Excel Vba
🚩 Les macros Excel : • Macros Excel
🚩Les Factures Excel automatique : • Comment faire une fact...
#astucesexcel #factureexcel #excel_en_pdf #formationexcel #exceltopdf
▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬▬
⬇⬇⬇SUIVEZ-MOI ICI ⬇⬇⬇

Пікірлер: 254

@Astuces_Excel Жыл бұрын

🚨🚨🚨🚨🚨 👉🏼👉🏼Ne l'oublier surtout pas. *Il doit toujours avoir un espace avant le Under score( _).* Sinon vous risquez avoir un retour d'erreur avec *(:=)* comme les autres. Donc si vous avez par exemple mit *",_"* vous devez le remplacer par *", _"* pour que votre code puisse fonctionner normalement

@E.Yagamie Жыл бұрын

Merci bien ça marche

@dougsali7771 Жыл бұрын

Merci beaucoup ça m'a aider à comprendre mon erreur 🥰

@Astuces_Excel Жыл бұрын

Je vous en pris

@Astuces_Excel Жыл бұрын

Super

@duruptgauthan443 Жыл бұрын

Cela ne fonctionne toujours pas

@abdoulayediop108 2 жыл бұрын

Merci beaucoup

@Astuces_Excel 2 жыл бұрын

Je vous en pris

@willymontana6408 2 жыл бұрын

Un très grand merci,ce n'est plus excel avec vous c'est de l'art ,Alger te dit merci artiste

@Astuces_Excel 2 жыл бұрын

J'en suis très flatté 😊

@Astuces_Excel 2 жыл бұрын

Merci bien

@LezenoYR Жыл бұрын

C'est vraiment de l'art 👌👌

@Astuces_Excel Жыл бұрын

Merci bien

@user-tl1zc9mb4q 4 ай бұрын

vraiment de l'art

@LezenoYR 2 жыл бұрын

Merci Astuce Excel pour cette vidéo. Ça a l'air vraiment si simple de créer un bouton d'export en pdf

@Astuces_Excel 2 жыл бұрын

Merci à vous

@dougsali7771 Жыл бұрын

je te dis

@Astuces_Excel Жыл бұрын

merci

@lenabletry7849 2 жыл бұрын

GENIAL !!! tout fonctionne à merveille :) Merci aux autres commentaires contenant des erreurs m'ayant permis de rectifier les miennes :)

@Astuces_Excel 2 жыл бұрын

Super

@lenabletry7849 2 жыл бұрын

@@Astuces_Excel Petite question, après avoir réalisé plusieurs tentatives afin d'ajouter en plus du n° de facture le nom du client, mes formules ne fonctionnent pas ex : ChDir "C:\Users\Sk8eu\Desktop\steph\facture\" & "\" ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _ Filename:="C:\Users\Sk8eu\Desktop\steph\facture\" & "\" & Range("H3").Value & Range("G8").Value & ".pdf", _ Quality:=xlQualityStandard, _ Je ne comprends pas mon erreur pouvez vous m'éclairer ?

@Astuces_Excel 2 жыл бұрын

C'est une erreur dans votre code

@Astuces_Excel 2 жыл бұрын

Je ferai une vidéo mercredi pour vous montrer comment faire

@lenabletry7849 2 жыл бұрын

@@Astuces_Excel ^^ un grand merci à vous ! Je n' en n'attendais pas tant !

@LezenoYR 2 жыл бұрын

Très bien expliqué

@Astuces_Excel 2 жыл бұрын

Merci

@astucedujour8359 2 жыл бұрын

Vous êtes trop fort

@Astuces_Excel 2 жыл бұрын

Merci

@dougsali7771 Жыл бұрын

vraiment

@NelKenangue 3 күн бұрын

vraiment très bon

@NelKenangue 3 күн бұрын

un grand merci à vous

@Astuces_Excel 3 күн бұрын

Je vous en pris

@user-ts1nb5cc7c Жыл бұрын

Merci

@Astuces_Excel Жыл бұрын

Je vous en pris

@E.Yagamie 2 жыл бұрын

Merci pour cette astuce Excel pour créer un PDF avec le vba

@Astuces_Excel 2 жыл бұрын

De rien

@konearouna381 Жыл бұрын

J'ai beaucoup aimé celle-ci

@Astuces_Excel Жыл бұрын

Merci

@NelKenangue 3 күн бұрын

moi aussi

@astucedujour8359 2 жыл бұрын

C'est vraiment magnifique

@Astuces_Excel 2 жыл бұрын

Merci

@NelKenangue 3 күн бұрын

je t'assure

@octobrerouge2420 11 ай бұрын

bonne continuation

@Astuces_Excel 11 ай бұрын

Merci

@NelKenangue 3 күн бұрын

vraiment

@iscicilma3695 2 жыл бұрын

Très belle astuce excel merci

@Astuces_Excel 2 жыл бұрын

Je vous en pris

@peshdjeug9120 2 жыл бұрын

Très belle astuce Excel merci

@Astuces_Excel 2 жыл бұрын

Merci

@rasimhadji8333 Жыл бұрын

très sympa partage , merci beaucoup

@Astuces_Excel Жыл бұрын

Merci à vous 😊

@NelKenangue 3 күн бұрын

vraiment

@NelKenangue 3 күн бұрын

Exceptionnel

@Astuces_Excel 3 күн бұрын

Merci

@astucedujour8359 2 жыл бұрын

Merci beaucoup Astuce Excel

@Astuces_Excel 2 жыл бұрын

Je vous en pris

@dougsali7771 Жыл бұрын

Super

@Astuces_Excel Жыл бұрын

Merci

@mamadydiakite6478 8 ай бұрын

Bonjour. Merci pour la bonne video. Je l'ai mise en fonction et ça marche normal. Mon ambition, ce de pouvoir imprimer un ensemble de bulletins de notes dans un meme dossier ave pour le nom le matricule de l'eleve. Merci

@Astuces_Excel 8 ай бұрын

Super

@pasteurmanasseliongo 7 ай бұрын

Ce tutos est très cool mais explique aussi comment archiver dans Excel

@Astuces_Excel 7 ай бұрын

Merci 😊

@Astuces_Excel 7 ай бұрын

Déjà fait

@Astuces_Excel 7 ай бұрын

Ici le lien Facture excel automatique: kzfaq.info/sun/PLVxlSdcmxRT9BRoBckeUWvfWyGx0zt7BE

@NelKenangue 3 күн бұрын

il l'a déjà fait

@user-tl1zc9mb4q 5 ай бұрын

great

@Astuces_Excel 3 ай бұрын

Thanks

@stephanedeman7409 Жыл бұрын

Super merci et si on veut enregistrer en pdf avec la date et l'heure de la sauvegarde?

@Astuces_Excel Жыл бұрын

Dans ce cas il vous suffit d'associer la fonction "maintenant"

@ABDOUABDOU-lw2re 2 жыл бұрын

Bonjour. Super tutoriel, merci beaucoup. Est ce qu'on peut les factures excel dans un dossier excel ou les copies avec un nom spécifique. Et merci d'avance

@Astuces_Excel 2 жыл бұрын

Oui c'est possible

@Astuces_Excel 2 жыл бұрын

Et je l'ai déjà expliqué dans la vidéo suivante

@adjoumaniabenan2336 10 ай бұрын

Top

@Astuces_Excel 8 ай бұрын

Merci bien

@NelKenangue 3 күн бұрын

très top même

@Astuces_Excel 3 күн бұрын

@NelKenangue merci

@sospliage6194 2 ай бұрын

tous fonctionne bien mon problème c est que je veux enregistrer une feuil sur un autre onglé il y a une solution ?

@aloisgodard1348 Жыл бұрын

Merci pour cette macro, par contre dans mon cas le fichier ne se crée pas si la cellule spécifiée pour le nom contient une formule. Ni si j'utilise la commande "maintenant" Par contre ca fonctionne bien quand je specifie une cellule avec du texte. Mais du coup c'est tjs la même valeur... et j'ai besoin que ce soit une date definie par une formule specifique. Avez vous une explication ?

@Astuces_Excel Жыл бұрын

Salut Tout d'abord pour vos commentaire. Un utilisateur avait déjà posé cette préoccupation concernant la date sur la facture Je vous laisse donc le lien de la vidéo explicative

@aloisgodard1348 Жыл бұрын

@@Astuces_Excel Merci pour votre réponse, mais de quel lien video parlez vous ? Je n'ai pas retrouvé la question de l'autre utilisateur, à part celle ou vous parlez de la commande "maintenant" qui ne fonctionne pas de mon coté

@Astuces_Excel Жыл бұрын

@@aloisgodard1348 Le lien de la vidéo : kzfaq.info/get/bejne/r7OiY7Vim7Wng6c.html

@portal91300 2 жыл бұрын

Bonjour, Je comprends pas la ligne Dossierexistant=GetAttr(dossier) And vbDirectory « dossier » entre parenthèses n’est renseigné nul part à part ici. Je comprends pas qu’est-ce que la ligne de code traite ici

@Astuces_Excel 2 жыл бұрын

Regardez la première vidéo kzfaq.info/get/bejne/hrxmZaRlts3Ghmg.html

@idrissadamba2493 6 ай бұрын

Merci beaucoup. Peut-on avec macro imprimer un nombre (32) de bulletins scolaires regroupés en PDF ? Bonsoir.

@Astuces_Excel 6 ай бұрын

Je vous en pris

@Astuces_Excel 6 ай бұрын

Oui c'est possible

@idrissadamba2493 6 ай бұрын

Avant tout, je vous remercie de votre réaction. Sur ce, je sollicite votre intervention, expert. Avec impatience.@@Astuces_Excel

@mamadydiakite6478 8 ай бұрын

Merci pour cette video bien détaillée et explicite. Mon problème persiste. Quand je mets l'espace entre la virgule et le Under score(, _), le message d'erreur n'apparait plus à la fin de la ligne. Mais lorsque je saisis la derniere ligne (openafterpublish:=false) ou il n'ya pas de under sore a la fin de la ligne et que je tape entrée, le message d'erreur réapparaît. Que faire alors. Je compte sur vous> Merci a Astuces Excel

@Astuces_Excel 5 ай бұрын

Merci Consulter le premier commentaire épinglé de la vidéo Vous y trouverez les différentes solutions

@marcl301 2 жыл бұрын

Super tuto, merci à vous. Si je souhaite mettre mon fichier sur un autre pc, comment adapter le code pour qu'il n'y ai pas de bug ? Pour que le code soit valide sur n'importe quel pc, si je souhaite enregistrer sur mon "bureau" par exemple. Merci

@Astuces_Excel 2 жыл бұрын

Salut

@Astuces_Excel 2 жыл бұрын

Ce code marchera sur tous les autres PC

@Astuces_Excel 2 жыл бұрын

Ne surtout pas oublié la modifications faite vers la fin de la vidéo (6:20)

@Astuces_Excel 2 жыл бұрын

Et vous pourriez l'urtiliser sur toutes vos machines

@marcl301 2 жыл бұрын

@@Astuces_Excel Un tout grand Merci. Continue c'est super instructif.

@madgic111 4 ай бұрын

bonjour. Joli tuto, mais ça ne fonctionne pas sur excel pour Mac OS.

@NelKenangue 3 күн бұрын

bonne chance au utilisateur de Mac 😅

@boulanouarbounif9391 Жыл бұрын

comment annuler mon export du dossier avec vbYesNo

@BernardJoubert-md4hm 29 күн бұрын

Bonjour et merci pour cette astuce. J’ai une erreur de compilation Type:=xlTypePDF,_ Il me dit Attendu : identificateur Sur toutes les lignes avant MsgBox qui restent en rouge ? Merci de votre aide Bernatd

@Astuces_Excel 29 күн бұрын

Je vous invite à lire le commentaire épinglé

@BernardJoubert-md4hm 29 күн бұрын

Merci pour votre réponse ! J’ai rajouté un espace avant underscore Ça marche mieux maintenant ! Bravo

@Astuces_Excel 29 күн бұрын

@BernardJoubert-md4hm Super

@Astuces_Excel 29 күн бұрын

@BernardJoubert-md4hm Ravi d'avoir pu vous aider 😊

@93DJmix 2 жыл бұрын

Bonjour, j'ai un problème. Si je appuie sur annuler ou la croix rouge de la fenêtre. Ma facture s'enregistre tout de même. Comment y remédier ?

@Astuces_Excel 2 жыл бұрын

Bonjour, ça affiche Pdf créer mais celui n'est pas réellement crée lorsque vous cliquez sur annulé ou sur la croix

@tfk7141 Жыл бұрын

Bonjour, Pouvez-vous m'éclaircir sur un point svp ? Tout d'abord merci pour vos vidéos. J'ai un message d'erreur qui s'affiche sur visual basic lorsque je mets les deux points et égal := dans la formule. Du coup la macro ne fonctionne pas D'avance merci

@Astuces_Excel Жыл бұрын

Oui c'est une erreur dans votre code

@Astuces_Excel Жыл бұрын

Regardez le commentaire épinglé

@duneconstructions301 9 ай бұрын

@@Astuces_Excel Bonjour j'ai aussi le même problème les := font planter

@laminekonate5266 Жыл бұрын

Merci bien pour l'explication. Mais le soucis que j'ai c'est que lorsque le dossier est créé et on enrégistre une autre facture dans le meme dossier, il écrase l'antécédant. comment remedier à cela. Merci

@Astuces_Excel Жыл бұрын

S'il écrase le précédent cela signifie tout simplement que le précédent avait le même nom que le nouveau.

@Astuces_Excel Жыл бұрын

Le problème vient donc du nom que vous donnez à vos fichier. Si la cellule dans laquelle le code doit récupérer le nom du pdf contient la même valeur alors il est tout à fait normal que celle ci soit écrasée.

@Astuces_Excel Жыл бұрын

Vous devez donc faire en sorte que la valeur de votre cellule de nom puisse varier à chaque nouvelle facture.

@thomashost7338 2 жыл бұрын

Bonjour Merci pour la vidéo mais je rencontre une erreur : ActiveSheet.ExportAsFixedFormat, _ Type:=xlTypePDF, _ Filename:=Chemin & Range("D4").Value & ".pdf", _ quality:=xkqualitystandard, _ includedocproperties:=True, _ ignoreprintareas:=False, from:=1, to:=1, _ openafterpublish:=True, _ Erreur de compilation : Attendu : Paramètre nommé Merci

@Astuces_Excel 2 жыл бұрын

Bonjour Sur quelle ligne apparaît l'erreur ?

@thomashost7338 2 жыл бұрын

@@Astuces_Excel J'ai trouvé il y avait une , (virgule) en trop sur la première ligne et sur la dernière ligne j'ai du supprimer , _ à la fin.

@Astuces_Excel 2 жыл бұрын

Super

@dougsali7771 Жыл бұрын

Moi aussi j'ai eu cette erreur au début Mais comme il l'a dit dans le commentaire c'était un souci d'espace J'ai inséré les espaces avant les "_" et ça marche maintenant

@Astuces_Excel Жыл бұрын

Super

@diordjite4933 2 жыл бұрын

Salut j’ai un problème le fichier pdf que je viens écrase l’ancien ..pouvez-vous m’aider ?

@Astuces_Excel 2 жыл бұрын

Salut

@Astuces_Excel 2 жыл бұрын

S'il écrase l'ancien c'est sûrement parceque le nouveau fichier a le même nom que l'ancien

@Astuces_Excel Жыл бұрын

Est-ce bon maintenant ?

@user-kl1bq9bv2z Жыл бұрын

Bonsoir, Merci pour vos tutos, super bien faits et simples à comprendre. J'ai cependant un souci, ça me crée bien le dossier mais pas le pdf… J'ai lu tous les commentaires et refait ma commande plusieurs fois, mais je ne trouve pas mon erreur (J'ai bien mis les espaces avant les under scor) Sub Export_en_Pdf() NomDossier = Application.InputBox("Nom du dossier", "Création du dossier", "entrer le nom du dossier") Chemin = "C:\Users\jeux\Desktop\GOLD'N ARIEGE\FACTURES DE VENTE 2023\" & NomDossier & "\" On Error Resume Next Dossierexistant = GetAttr(dossier) And vbDirectory If Dossierexistant = False Then MkDir (Chemin) End If ActiveSheet.ExportAsFixedFormat _ Type:=xlTypePDF, _ Filename:=Chemin & Range("E3").Value & ".pdf", _ quality:=xkqualitystandard, _ includeproperties:=True, _ ignoreprintareas:=False, from:=1, to:=1, _ openafterpublish:=False MsgBox ("Le Pdf a été créé") End Sub Merci pour vos lumières !

@Astuces_Excel Жыл бұрын

Merci pour les encouragement Je vais consulter votre code.

@Astuces_Excel Жыл бұрын

Je vois c'est un problème de saisie Vous avez saisie "includeproperties" au lieu de "includedocproperties".

@Astuces_Excel Жыл бұрын

Désolé d'avoir mit du temps avant de lire votre commentaire. Et encore merci pour vos message d'appréciations. Voir des commentaire comme ça qui me montrent que mes vidéos aident des gens m'encourage vraiment à continuer. Merci bien☺

@user-kl1bq9bv2z Жыл бұрын

@@Astuces_Excel Merci ! Pourtant j'ai vérifié plusieurs fois... je bigle :)

@user-kl1bq9bv2z Жыл бұрын

@@Astuces_Excel Avec plaisir !

@bracogoal3507 Жыл бұрын

Salut boss pour nous qui avons un Mac on a un message d'erreur

@Astuces_Excel Жыл бұрын

Lequelle ?

@NelKenangue 3 күн бұрын

ASSIA

@lauredandjinou1073 Жыл бұрын

J'ai le même soucis ! Le dossier est créé mais pas le fichier pdf ! Ainsi dire le dossier créé est vide

@Astuces_Excel Жыл бұрын

Vous avez sûrement fait une erreur d'orthographe lors de la saisie du code

@Astuces_Excel Жыл бұрын

Vérifiez juste votre code Surtout au niveau de la création du PDF pour vérifier que les mots sont bien saisis

@E.Yagamie Жыл бұрын

Chez moi ça marche Avez-vous fait comme il l'a expliqué dans la vidéo ?

@Astuces_Excel Жыл бұрын

Super merci du retour

@Astuces_Excel Жыл бұрын

Est-ce bon ?

@enzobouyer5783 2 жыл бұрын

Salut, j'ai un problème quand je suis rendu a type:=xltypePDF , il ne m'accepte pas les deux point et le égale. Un message d'erreur s'affiche " Erreur compilation Attendu expression ". Tu aurais pas une solution pour résoudre ce problème. Merci

@Astuces_Excel 2 жыл бұрын

Vérifiez juste votre code

@Astuces_Excel 2 жыл бұрын

Les autres ont eu le même souci. Ils avaient juste fait une erreur dans le code

@Astuces_Excel 2 жыл бұрын

Certain avait ajouté le Under score (_) à la fin de la dernière ligne D'autre avait une virgule (,) ou un under score (_) en trop

@Astuces_Excel 2 жыл бұрын

Je vous conseille de supprimer le code et de le réécrire en faisant attention aux virgules et under score

@khiatamal9282 2 жыл бұрын

Même chose pour moi.

@ayoub176 2 жыл бұрын

Merci bien , mais ca ne marche pas pour moi j'ai trouvé des erreur dans les lignes suivants type:=xltypePDF,_ Filename:= Chemin &range("G13").Value&"PDF",_ quality:=xlqualitystandard,_ includedocproperties:=true,_ igonreprintareas:=false,from:1, to:=3,_ openafterpublish:=False

@Astuces_Excel 2 жыл бұрын

Salut

@Astuces_Excel 2 жыл бұрын

Désolé pour le retard j'ai été absent pendant quelques temps

@Astuces_Excel 2 жыл бұрын

Avez-vous pu y remédier ?

@khiatamal9282 2 жыл бұрын

Bonjour, moi aussi, erreur message: « Attendu: identificateur » := qui sont sélectionnés

@Astuces_Excel 2 жыл бұрын

Salut ! Lisez le premier commentaire épinglé. Vous y trouverez la solution

@user-kz1ie2dd1w 8 ай бұрын

Bonjour, en ce qui me concerne, il me dit que le pdf a été créé mais il n'y a ni dossier , ni pdf, pouvez-vous m'aider ?

@Astuces_Excel 8 ай бұрын

Merci Bonjour

@Astuces_Excel 8 ай бұрын

Vérifier juste votre code il doit y avoir une erreur

@user-kz1ie2dd1w 8 ай бұрын

J'ai vérifié et réécrit tout le code mais le problème persiste. Il me créé bien un dossier à l'endroit souhaité mais pas le PDF @@Astuces_Excel

@Astuces_Excel 8 ай бұрын

Faites voir votre code

@Astuces_Excel 8 ай бұрын

@@user-kz1ie2dd1w Copiez votre code et collez le ici en commentaire pour que je consulte

@briceobiangndong4960 2 жыл бұрын

Astce excel il crée pas de pdf juste le dossier

@Astuces_Excel 2 жыл бұрын

Salut Vous avez sûrement fait une erreur dans votre code Vérifiez votre code

@Astuces_Excel Жыл бұрын

Est-ce bon maintenant ?

@samlerocher6233 2 жыл бұрын

Très belle vidéo, mais j'ai un souci avec la partie Type:=xltypePDF, _ Ça me met erreur de compilation. Aidez moi à résoudre ce problème svp

@Astuces_Excel 2 жыл бұрын

Bonjour Il faut juste revérifier votre code Certains aussi ont eu ce problème et c'était à cause d'une erreur de saisie dans leur code

@Astuces_Excel 2 жыл бұрын

Certain avait ajouté le Under score (_) à la fin de la dernière ligne D'autre avait une virgule (,) ou un under score (_) en trop

@Astuces_Excel 2 жыл бұрын

Je vous conseille de supprimer le code et de le réécrire en faisant attention aux virgules et under score

@TheAmine79 2 жыл бұрын

Moi aussi j'a le même problème

@Astuces_Excel 2 жыл бұрын

Lisez le premier commentaire épinglé et vous aurez votre solution

@arnaud5117 2 жыл бұрын

Bonjour franchement j'ai lu tous les commentaires mais j'ai une erreur la même que tout le monde voici mon code est ce que quelqu'un peux le corriger ou me donner le sien svp Type:=xltypePDF,_ Filename:= Chemin &range("G13").Value&"PDF",_ quality:=xlqualitystandard,_ includedocproperties:=true,_ igonreprintareas:=false,from:1, to:=3,_ openafterpublish:=False

@arnaud5117 2 жыл бұрын

il ne prends pas le :=

@Astuces_Excel 2 жыл бұрын

Faites voir tout le code. Du Sub au End

@arnaud5117 2 жыл бұрын

@@Astuces_Excel Sub Export_en_pdf() NomDossier = Application.InputBox("Nom du dossier", "Création du dossier", "Entrer le nom du dossier") chemin = "C:\\swnt02\FR-Commun\Arnaud\Test excel\" & NomDossier & "\" On Error Resume Next Dossierexistant = GetAttr(dossier) And vbDirectory If Dossierexistant = False Then MkDir (chemin) End If ActiveSheet.exportasfixedformat_ type:=xltypePDF,_ Filename:=Chemin &range("A8").Value1&".pdf",_ quality:=xkqualitystandard,_ includedocproperties:=true,_ ignoredprintareas:=false,from:=1,to:=1,_ openafterpublish:=False MsgBox ("le PDF a été crée") End Sub

@arnaud5117 2 жыл бұрын

Il ne prends pas le := ca me marque erreur de compilation expression attendue

@Astuces_Excel 2 жыл бұрын

Comme je le disais il y'a bien un problème dans votre code

@MrMicpid Жыл бұрын

J'ai un souci avec l'execution de la macro. Le dossier se crée mais pas le PDF ? Voici mon code : Sub enregistrerFormatdf() NomDossier = Application.InputBox("Nom du dossier", "Création du dossier", "Entrer le nom du dossier") Chemin = "C:\GestionCimetiere\test\Fiches\" & NomDossier & "\" On Error Resume Next Dossierexistant = GetAttr(dossier) And vbDirectory If Dossierexistant = False Then MkDir (Chemin) End If ActiveSheet.ExportAsFixedFormat _ Type:=xlTypePDF, _ Filename:=Chemin & Range("F4").Value & ".pdf", _ quality:=xlQualityStandard, _ includedocproperties:=True, _ ignoreprintaeras:=False, from:=1, to:=1, _ openafterpublish:=True MsgBox ("La fiche a été enregistrée") End Sub

@Astuces_Excel Жыл бұрын

Bonjour, Vous avez sûrement fait une erreur dans le code

@Astuces_Excel Жыл бұрын

Vu que le code est plutôt court je vous conseille d'effacer et de reprendre.

@Astuces_Excel Жыл бұрын

Parce que si le pdf ne se crée pas c'est à cause d'une faute d'orthographe. Et repérer cela est souvent très fastidieux raison pour laquelle je vous recommande de reprendre tout simplement. Ou alors vous devez vérifier que chaque mot de votre code a été correctement saisi.

@Astuces_Excel Жыл бұрын

Est-ce bon maintenant ?

@marieprat4020 2 жыл бұрын

Bonjour, Type:=xlTypePDF,_ Filename:=Chemin &range("H3").Value & ".pdf",_ quality:=xkqualitystandard,_ includedocproperties:=true,_ ignoreprintareas:false, from:=1, to:=1,_ openafterpublish:=false Ca me met un message d'erreur avec les deux points et le égal

@Astuces_Excel 2 жыл бұрын

Merci bonjour, Au niveau du la cinquième ligne vous devez également avoir(":=") c'est-à-dire ceci : "ignoreprintareas:=False"

@marieprat4020 2 жыл бұрын

@@Astuces_Excel bonjour, j'ai rajouté mais ça ne marche toujours pas. le ":=" est considéré comme un message d'erreur

@Astuces_Excel 2 жыл бұрын

OK, Laquelle de ces lignes est surlignée dans le code ?

@marieprat4020 2 жыл бұрын

@@Astuces_Excel toutes

@Astuces_Excel 2 жыл бұрын

@user-xb7ni8tk5d 6 ай бұрын

Bonjour, Merci pour cette super astuce, en la créant, j'ai tous les ":=" en erreur. Pouvez vous me dire d'ou ca peut provenir. Merci ActiveSheet.ExportAsFixdFormat_ Type:=xlTypePDF,_ Filename:=Chemin & range("F10")&"_"&Range("B6").Value&".pdf",_ quality:=xkqualitystandard,_ includedocproperties:=true,_ ignoreprintareas:=False,from:=1,to:=1,_ openafterpublish:=False

@Astuces_Excel 6 ай бұрын

Merci bien Lisez le commentaire épinglé et vous comprendriez

@user-xb7ni8tk5d 6 ай бұрын

Merci@@Astuces_Excel

@Astuces_Excel 6 ай бұрын

@user-xb7ni8tk5d je vous en pris