TS et pdf en vba

armelle · Message non lu par **armelle** » 27 janv. 2010, 21:42

bonsoir
je fais une petite appli pour récupérer les .dft et les convertir en pdf en VBA Excel .
Pour cela j'ai trouvé le code de Lolo sur ce forum qui m'a beaucoup aidé car je ne connais pas le langage spécial TS.
Il me reste 2 points à résoudre :

quand je fais :
'ouvrir le doc dft
Set doc = TopApp.Documents.Open(MaSelec, "", False)
cela ouvre le doc mais ouvre aussi la fenêtre Fichier/ouvrir
ceci ne m'intéresse pas puisque dans mon code je lui dit déjà quel fichier je veux ouvrir (à chaque fois je fais annuler sur cette fenêtre et cela m'ouvre bien le fichier voulu).
je veux donc empêcher l'ouverture de cette fenêtre

2èment:
'L'imprimer si le format est identique au format sélectionné
If doc.Drawings.Item(1).PaperFormat = 5 Then
j'ai mis systématiquement 5 mais je ne sais pas à quel format cela correspond (sauf que sur les essais que j'ai réalisé cela à l'air de fonctionner) et je voudrais avoir plus d'infos sur ces formats pour éviter des plantages

Voilà si quelqu'un a des infos à propos de ces 2 sujets...

+ : je suis nouvelle sur ce forum car pas utilisatrice directe de TS et ya-t-il un endroit , un tuto pour récupérer des exemples de syntaxe et de code VBA par rapport à TS

Merci d'avance

armelle · Message non lu par **armelle** » 31 janv. 2010, 19:26

bonsoir le forum

en fait pour le 1 er problème , cette fenêtre s'ouvrait parce que j'avais copié des fichiers provenant d'un autre poste si je teste sur les postes des utilisateurs directs c'est ok

Reste le 2ème : les différents formats d'impression de TopSolid en vba

je poste une nouvelle discussion à ce sujet mais si quelqu'un veut répondre sur celui ci c'est toujours actif
et si quelqu'un a le code pour masquer cette fenetre cela sera toujours intéressant d'apprendre

Kevin · Message non lu par **Kevin** » 24 mai 2010, 09:04

Bonjour Armelle,
Ton appli m'intéresse car je souhaite faire exactement la même chose que toi, afin d'avoir toujours des plans "à jour" puis fusionner les .pdf pour une impression recto-verso... mais je ne connais pas le VBA

Pourrais-tu mettre ton code sur le forum pour qu'on puisse s'en inspirer ?!?
Merci

Marceau · Message non lu par **Marceau** » 09 juin 2010, 18:12

Bonjour tous,

Les macros c'est bien, mais pourquoi faire du code quand TopSolid et PDFCreator font déjà très bien les choses ?...

En passant par la case Outils/Options/Impressions multiples, en choisissant l’imprimante par défaut « PDFCreator », et en cochant la case « Utiliser en mode impression forcé
Puis en utilisant l'impression multiple, on obtient bien le même résultat.

Bien sûr il faut bien configurer PDFCreator pour qu'il ne pose pas de questions à la création de chaque fichier.

Et pour la fusion de tous les plans en un seul fichier il le fait aussi

tibo.v1 · Message non lu par **tibo.v1** » 10 juin 2010, 08:09

bonjour,
je penses que ce qui est rechercher avant l'impression en PDF c'est la selection en automatique des fichiers.
imagine dans un dossiers tu as 50 draft et dans c'est 50, il y a 20 draft qui vont ensemble, 10 autres ensembles et le reste forment un 3ème ensemble et bien se serait de dire grace a la macro de mettre en PDF les 20 drafts et ceci en appuyant que sur 1 bouton.

voila je penses que c'est le but