Microsoft 365 Remplissage automatique d'une feuille à l'autre

[Todre]

Bonjour à tous,

Je possède un fichier Excel pour le suivi de mes véhicules. J'ai une feuille qui me sert d'ordre d'exécution que je dois donner à mon conducteur pour pouvoir aller au garage avec qui servira plus tard pour la facturation avec mes gestionnaires de flotte.
En parallèle, j'ai créer une feuille pour avoir un suivi perso de mes véhicules à l'année.
J'aimerai, lorsque je rempli ma feuille perso, que certaines infos (2 voir 3) viennent remplir la feuille 1 (l'ordre d'exécution). Lorsque je remplis une nouvelle ligne cela remplis de nouveau la feuille avec les nouvelles informations ainsi de suite comme ca je suis capable de sortir à tt moment un historique Excel de mes véhicules.
En prime, si je peux avoir un bouton "envoyer par mail en pdf" et "imprimer" ce serait top de chez top.
Pour info la feuille ordre d'exécution (feuille 1) va déjà chercher des infos dans des feuilles masquées suivant ma saisie.

Pouvez vous me dire si cela est possible ? Je ne peux pas mettre en partage le fichier, il contient beaucoup d'informations RGPD.

D'avance merci à vous pour votre aide

 

[Todre]

Bonjour,

J'ai un soucis d'un coup avec mon fichier qui fonctionnait très bien jusque maintenant, je n'ai rien changé

Erreur exécution 1004
dans le debogage, en jaune j'ai ca:
Ws1.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
Chemin & NFichier, Quality:=xlQualityStandard, IncludeDocProperties:=True

Merci de votre aide

 

[Phil69970]

Bonjour @Todre

mon fichier qui fonctionnait très bien jusque maintenant, je n'ai rien changé

Si cela fonctionnait hier et plus aujourd'hui il c'est donc qu'il s'est passé quelque chose.
Piste à explorer :
==> Il faudrait voir ce que vaut "Chemin" et il a peut être changé
Et d'une manière générale voir la valeur de :

Chemin & NFichier

 

[Todre]

Bonjour Phil, ravie de te voir de nouveau Je ne sais pas ce qu'il y a pu se passer, peut être une mise à jour sur le pc je vois que cela, il y a uniquement la génération du pdf qui ne fonctionne plus.

Quand tu dis voir la valeur de chemin&fichier, je fais comment ? 9 mois sans pb il faut que ca arrive maintenant

 

[Phil69970]

Voir post #43

As tu ce code ?

Chemin = Worksheets("Suivi véhicules").Range("E4") & "\" 'Chemin en dur dans la feuille

si oui regarde la valeur ==> Worksheets("Suivi véhicules").Range("E4")

 

[Todre]

Je peux mettre le code ici en entier ?

Si je mets la souris sur chemin, j'ai: motif dépot garage

 

[Phil69970]

C'est le code de cette sub qui m’intéresse

Sub ExportPDF()

Et particulièrement la partie mentionné dans mon post #49

 

[Phil69970]

Mettre le code entre balise le rends beaucoup plus digeste ....

Donc la solution se situe ici comme cela fait 3 posts que je te le dis !

Chemin = Worksheets("Suivi véhicules").Range("E4") & "\" 'Chemin en dur dans la feuille

Qu'est ce qu'il y a dans cette cellule :

Worksheets("Suivi véhicules").Range("E4")

 

[Todre]

Dans cette cellule on retrouve l'entête du tableau: Motif dépôt au garage

 

[Todre]

Pas du tout, ca fonctionne très bien depuis qu'on l'a fait ensemble c'est bien pour ca que je reviens sur le forum car cela ne fonctionne plus. J'ai gagné énormément de temps grasse à ton aide sur ce tableau.

 

[Phil69970]

Non on devrait avoir le chemin de onedrive

C'est écrit clairement dans le code et cela fait 9 mois que cela fonctionne comme cela ou alors cela fait 9 mois que cela ne fonctionne pas !!

Chemin = Worksheets("Suivi véhicules").Range("E4") & "\" 'Chemin en dur dans la feuille

Et quel valeur as tu dans cette cellule comme je te l'ai demandé

Qu'est ce qu'il y a dans cette cellule :

si oui regarde la valeur ==> Worksheets("Suivi véhicules").Range("E4")

 

[Phil69970]

Reprends/Regarde dans une ou plusieurs sauvegardes de x jours ou x mois ce que tu as dans cette cellule

 

[Phil69970]

Tu devrais avoir ceci ou similaire en E4

Tout le reste c'est de la prose inutile !!!!

Et c'est dans le code du post # 43 sauf le chemin mais c'est toi qui l'avait mis à l'époque !!!

 

[Todre]

Bon une fois de plus c'est good, merci à toi, je pense savoir, dans la semaine j'ai fait des tris dans les colonnes pour faire des extractions, et j'ai du supprimer la ligne "4" comme un con. Je viens de remettre le chemin où il fallait. Ca fonctionne ! Encore une fois, merci à toi. Quand on est mauvais on est mauvais