Récupérer les données d'un tableau source

Question

Bonjour,

Je vous sollicite aujourd'hui, car je n'arrive pas de tout à faire entendre à Excel mon projet. ( Excel est des fois capricieux)

Je m'explique :

J'ai une page source avec un tableau qui s'intitule : rapport de chantier. Ce rapport est rempli chaque semaine, pour le calcul des heures de chantiers (temps de trajet, repas, temps de travail)...

Je souhaite créer un bouton macro qui effectue les tâches suivantes :

1 - Sauvegarde des données dans la feuille N° 1 à la suite : Les couleurs sur le tableau et la feuille correspondent aux données que je souhaite garder.
2 - Impression du tableau rapport de chantier en format PDF
3 - Suppression des données dans le rapport de chantier
4 - Sauvegarde

De cette façon, j'ai un historique de jour en jour et semaine en semaine, des rapports de chantier, et à chaque fois que je clic sur le bouton cela, remet le tableau rapport de chantier prêt à remplir.

Je vous remercie d'avance pour vos miracles :)

Voici le Fichier : https://www.cjoint.com/c/IJlmjPHCkMT

cs_Le Pivert · Answer

Bonjour,

voilà un début: enregistrer en PDF.

Faire Alt F11 pour accéder à l'éditeur

Insérer un module pour y mettre ce code

Aller sur le bouton(forme grise) clic droit: Affecter une macro et sélectionner SavePDF


Option Explicit
Sub SavePDF()
Dim chemin As String
Dim nom As String
Dim p As Range
Set p = ActiveSheet.Range("A1", "AC23") 'a adapter
chemin = ThisWorkbook.Path & "\"
nom = "Rapport-de-chantier-vierge_semaine " & ActiveSheet.Range("AA6") 'numéro semaine
 p.ExportAsFixedFormat Type:=xlTypePDF, Filename:=chemin & nom & ".pdf", _
                                            Quality:=xlQualityStandard, IncludeDocProperties:=False, _
                                            OpenAfterPublish:=False
End Sub
 

enregistrer sous:  classeur prenant en charge les macros et fermer

Voilà c'est opérationnel le pdf sera dans le même dossier que le classeur

Hela2004 · Answer

Bonsoir, 

Merci pour l'impression PDF, a vrai dire ce n'est pas trop celui là qui me pose problème, même si j'appréci votre code, et je le garde pour plus tard. 

La difficulté que je rencontre, c'est de sauvegarder des données précises dans le tableau, suite après suite. 

Merci beaucoup pour votre intervention

Hela2004 · Answer

Merci cs_Le Pivert, je vais regarder ce que ça donne et tenter de repartir de ton code pour faire le reste. 

Je te redis si j'y suis arrivé.

Hela2004 · Answer

Rebonjour,

C'est quasiment parfait, il faut juste que je change le code de réinitialiser car cela efface même les cellules avec les calculs. 

Tu m'as déjà bien aidé ^^

Hela2004 · Answer

Merci à toi, j'ai quelques réglages final à faire, mais tu à fait les 3/4. Je vais finir le reste, je devrais pouvoir y arriver. Je reviendrai si jamais ^^

En tout cas un grand merci à toi, pour avoir passé du temps à me répondre.

Récupérer les données d'un tableau source

5 réponses

Discussions similaires

Newsletters