-macro- Sélection de colonne dans création de tableau

moogu -  
Bonjour,

je travaille actuellement sur des tableaux de caractéristique des arbres, je souhaitais savoir si il était possible à l'aide d'une macro de faire l'action suivante.

Sur le fichier excel :

supprimer certaine ligne qui ce retrouve à différents emplacement mais garde la même dénomination, puis enregistrer le nouveau tableau en pdf

pour un fichier c'est réalisable à la main mais j'ai environ 300 fichiers à traités... et je commence tout juste la macro, si quelqu'un aurait une idée ???

merci,

cordialement,

2 réponses

  1.  Morgothal
    Bonjour,
    Pour enregistrer en PDF : 

    Sub Enreg_Pdf()
Dim LaDate As String, LeRep As String
LaDate = Format(Date, "yyyymmdd")
LeRep = ThisWorkbook.Path & "\PDF\"  ' à adapter
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
    LeRep & ThisWorkbook.Name & "_" & LaDate & ".pdf", Quality:= _
    xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _
    From:=1, To:=1, OpenAfterPublish:=False
End Sub

    Je n'ai pas compris ce que devais faire la première partie de la macro ...
    1. moogu Auteur
      Bonjour,

      en effet je n'ai pas été très clair, désolé,

      du coup je me retrouve avec plusieurs dossier de fichiers comme ci-contre :
      https://www.cjoint.com/?0Cvi2G7Mqjx

      je dois dans un premier temps, tous les enregistrer en pdf telle quel :
      exemple : https://www.cjoint.com/?0Cvi4BXdZv3

      dans un deuxième temps,

      - à partir de l'original, je dois modifier la police sur tous le document (en Verdana)

      - je dois supprime les lignes et contenu suivant :

      CONCLUSION
      DIAGNOSTIC
      OBSERVATIONS
      ETALEMENT MOYEN PRECONISE
      SURFACE TERRIERE
      COEFFICIENT D'ELANCEMENT
      DIAGNOSTIC HAUTEUR
      DIAGNOSTIC ÂGE
      ÂGE ONTOLOGIQUE

      - supprimer le mots TABLEAU de tous les documents

      - passer en corps 12 les titres suivants :

      DETERMINATION BOTANIQUE
      AUTECOLOGIE
      EXPERTISE

      - passer les lignes suivante en fond vert et texte en blanc :

      ORGANES OBSERVATIONS
      PARAMETRES CARACTERISTIQUES
      PARAMETRES DE L'ARBRE OBSERVATIONS / RELEVES

      - passer toute les colonnes de gauches en fer à gauche (voir exemple)

      puis enregistrer en pdf,

      genre mission impossible pour moi qui débute tous juste dans la macro,
      j'espère qu'une âme courageuse pourra m'aider

      exemple fichier excel : https://www.cjoint.com/?0CvluTRRZcs
      exemple résultat final : https://www.cjoint.com/?0CvlvP7XztI

      en vous remerciant d'avance pour vos réponse,

      bien cordialement,

      fab

      p.S merci à morgothal pour ce premier élément de réponse