SNAPSHOT CATIA TO WORD

Messages postés
2247
Date d'inscription
lundi 29 mai 2006
Statut
Membre
Dernière intervention
29 mai 2008
- - Dernière réponse : totham
Messages postés
1
Date d'inscription
mardi 13 mars 2012
Statut
Membre
Dernière intervention
14 mars 2012
- 14 mars 2012 à 03:30
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/42061-snapshot-catia-to-word

Afficher la suite 
Drikce06
Messages postés
2247
Date d'inscription
lundi 29 mai 2006
Statut
Membre
Dernière intervention
29 mai 2008
5 -
Salut, pourquoi tu n'ouvres pas toi une appliaction word depuis la macro?
Drikce06
Messages postés
2247
Date d'inscription
lundi 29 mai 2006
Statut
Membre
Dernière intervention
29 mai 2008
5 -
On ne sait même pas à quoi ceci correspond:
Tu colles dans word serte, mais "selection", c'est quoi qui est sélectionné?
Selection.InlineShapes.AddPicture FileName:=ADR, LinkToFile:=False, SaveWithDocument:=True
zavier666
Messages postés
267
Date d'inscription
mardi 7 septembre 2004
Statut
Membre
Dernière intervention
30 avril 2009
-
Les sources concernant Catia sont rares donc merci!

A ce sujet, j'en ai posté quelques unes sur API @ la Loupe, rubrique Catia V5
http://xav.prog.power.free.fr

slts!
-------------------------------------------------
Toujours plus de VB6 et d'API => API @ la Loupe
http://xav.prog.power.free.fr
cs_Wanours
Messages postés
11
Date d'inscription
mardi 3 avril 2007
Statut
Membre
Dernière intervention
22 juillet 2009
-
En fait, dans mon travail, il m'est utile de pouvoir faire des impressions écrans rapidement de ce qui s'affiche dans Catia pour l'intégrer à un rapport par exemple.

Donc, il ne me sert à rien d'ouvrir un nouveau fichier word puisque je lance la macro que quand je bosse sur un rapport.

Mon objectif n'était pas de pouvoir créer une macro qui permet de faire une bibliothèque de printscreen dans word, mais d'insérer des images extraites de Catia dans mon document word.

Et je colle dans word à l'endroit ou se trouve le curseur, d'où le "selection", le fichier image stocké temporairement à l'adresse "ADR", sans lien avec le fichier "linkToFile:=false"
3dflix
Messages postés
44
Date d'inscription
dimanche 9 mars 2003
Statut
Membre
Dernière intervention
20 février 2013
-
Merci pour ton code.

Je m'en suis inspiré pour ecrire cela dans un module sous vba excel:

Sub SnapCatia()

Set CATIA = CreateObject("CATIA.Application")
Set MyViewer = CATIA.ActiveWindow.ActiveViewer

'-----Capture d'image
MyViewer.CaptureToFile catCaptureFormatJPEG, "G:\PrintScreen.jpg"

End Sub

Cela devrait permetre d'effectuer la capture directement depuis excel.
Or la capture en JPG est illisible.
C'est tu pourquoi?

(A savoir cette methode fonction pour toute les fonction mais pas pour la capture.)