Discussion :

[Rekin85]

Bonjour,

Je suis peut-être assez bon programmeur en Delphi et Asm, mais en macro libreoffice je suis presque nul.

Si une solution existe à mon problème, je suis content. Voilà, j'ai un dossier calc avec plusieurs feuilles, je voudrais pouvoir donner les noms des feuilles qui m'intéressent au départ de ma macro et celle-ci les "attrape" l'une après l'autre et les concatène à la suite dans la même exportation en fichier PDF.
Je sais le faire pour chaque feuille séparément : c'est à dire que si j'indique 3 feuilles sur les n du dossier, j'obtiens trois fichiers PDF différents... Je fais fausse route. Je voudrais que les 3 feuilles en question "atterrissent" dans un unique fichier PDF.

Merci de me dire si c'est possible ou pas.

[Rekin85]

J'ai essayé la solution proposée ici par Philippe Tulliez le 19/11/2020, malheureusement le langage macro de LibreOffice ne veut pas du mot Type

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Sub tt()
  Dim Name As String
  Name = Replace(ThisWorkbook.FullName, ".xlsb", "")
  Sheets(Array("Dossier", "Balance", "Client", "ParamList")).Select
  With ActiveSheet
  .ExportAsFixedFormat Type:=xlTypePDF, Filename:=Name
  .Select
  End With
End Sub

[Rekin85]

A l'impossible nul n'est tenu...

Je précise ma question : Sur la première feuille de mon dossier, j'ai placé un bouton qui appelle la macro désirée. Dans cette macro, je précise les noms des seules pages que je veux exporter. Résultat, les pages désignées et elles seules sont exportées dans un fichier PDF. Ce qu'il me faudrait c'est une routine qui fait l'exportation à l'aide du tableau des pages et du chemin d'enregistrement.

Je remercie déjà beaucoup toutes celles et tous ceux qui on prit la peine de me lire.

[Mobydick_62]

Bonjour,

- 1 : le code que tu mets en exemple et du Basic de la suite Microsoft (excel) donc difficilement compatible avec le Basic de LibreOffice ou OpenOffice.

-2 : Si tu veux vraiment qu'on t'aide mets en pièce jointe ton fichier. Si celui-ci contient des données personnelles, tu les remplace par quelques données "bidon". C'est important car cela nous permet d'avoir la structure de ton classeur et surtout cela nous évite de créer un nouveau classeur avec des feuilles, des données..... et tout çà pour écrire une macro. (perte de temps..)

Cordialement

[Rekin85]

Merci beaucoup pour cette réponse

Je joins un "squelette" de dossier calc qui comprend 3 feuilles. Sur la première feuille j'ai placé un bouton qui doit lancer la macro d'exportation. Cette dernière est vide, mais j'aimerais que la partie main permette d'indiquer que je veux par exemple exporter la feuille1 avec la feuille3 puis lancer le traitement.

Je n'ai besoin que de la partie qui fait l'exportation avec la destination. Pour cette dernière je me débrouillerai pour récolter le path nécessaire.

Encore merci

Example_macro_to_export_PDF.ods

[Mobydick_62]

Bonjour,

En pièce jointe le fichier contenant la macro.
Le clic sur le bouton ouvre une boite de dialogue qui permet de sélectionner les feuilles à exporter.
L'enregistrement du PDF se fait par défaut par le système, dans la mesure où tu dis que tu vas gérer le Path.

Example_macro_to_export_PDF.ods

Cordialement

[Rekin85]

Grand MERCI Mobydick_69 !

C'est pile poil ce qu'il me fallait , encore merci. Je ne pataugerai plus dans la choucroute, enfin ...

Je vais peaufiner cette macro pour la rendre propre à mes désirs, notamment sur les choix d'archivage : nom du fichier et chemin de sauvegarde;

Ah que je suis content... Je vais aussi profiter pour apprendre (un peu) des tours de main d'un expert.

[Rekin85]

Bonsoir à tous et plus particulièrement à Mobydick_62 à qui je dois adresser de vives excuses car j'ai affublé le 62 de son pseudo d'un 69 inapproprié. Milles excuses

Je reviens sur ce post pour signaler que l'excellente macro qui m'a été proposée, si elle répondait exactement à ce que j'avais demandé (je me suis relu et c'est de ma faute car je n'ai pas été assez précis) finalement n'est pas tout à fait correspondante à mes désirs. Encore milles excuses de ma part. Alors elle fonctionne très bien si les feuillets du dossier calc n'ont qu'une page chacun ...

J'ai donc développé mon dossier calc exemple afin qu'il contiennent plus de feuillets (5) avec chacun des nombres de pages différents (entre 1 et 4). Donc dans le dialogue de choix des feuillets, si je choisis par exemple le feuillet 2 qui possède 3 pages et le feuillet 5 qui a 2 pages, je dois obtenir un seul pdf qui contiendra les 5 pages au total et dans le bon ordre... Ai-je été assez clair ?

Maintenant, je ne sais pas si ce que je demande est possible (???).

Example_macro_to_export_PDF.ods

D'autre part, la boite de choix au lancement de la macro serait plus judicieuse pour mes futurs utilisateurs si elle proposait des cases à cocher plutôt que des ctrl+click

MERCI pour vos réponses ou suggestions.

[Rekin85]

Hum... Bonjour à toutes et tous.

J'ai attendu, attendu, mais la solution n'est jamais venue... On m'a toujours dit qu'en programmation, rien n'est impossible...
Je sais pour l'avoir trouvé et essayé qu'il existe une solution pour exporter un seul feuillet en pdf :

Example_macro_to_export_Calc_sheet_to_PDF.ods

Alors je me suis dit que si je maîtrisais le code LibreOffice, je ferais ainsi :

1/ Choisir les feuillets à exporter (ceci est fait...)
2/ Créer un feuillet (de passage) supplémentaire à la fin du document calc
3/ Y copier-coller les uns à la suite des autres les feuillets sélectionnés en 1. Cela nécessite que l'on respecte les sauts de pages de chacun...
4/ Procéder à l'exportation PDF du feuillet ainsi créé
5/ Détruire le feuillet de passage

Possible ? Un ami m'a prêté l'excellent ouvrage de Bernard Marcelly et Laurent Godard : Programmation OpenOffice.org 3 . J'y ai lu que chacune des opérations de mon plan sont possibles. Mais cela ne fait pas un "tout", il faut les procédures et dispositions qui permettent de relier tout cela; et je l'avoue, cela dépasse mes compétences actuelles. (A 78 ans je n'ai plus la "gnaque" nécessaire pour "avaler" ce nouveau language. )

Merci pour votre attention.

[Rekin85]

Bien :

- Sœur Anne ne vois-tu rien venir ?
- Non maîtresse, je ne vois que la route qui serpente au soleil et qui poudroie...

Je pressens que mon problème n'est pas insoluble.... A y bien regarder, il ne me manque plus que la possibilité de copier-coller les feuillets en respectant les zones d'impression de chacun.

Enfin, je remercie bien les amis qui ont pris soin de lire mes questions, mais qui malheureusement n'ont pas eu de solution.