Continue to Site

Eng-Tips is the largest engineering community on the Internet

Intelligent Work Forums for Engineering Professionals

  • Congratulations waross on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

place capture in clipboard in stead of writing it to file VBA macro

Status
Not open for further replies.

sihox

New member
Apr 19, 2010
3
NL
hey all,

I have a vba macro which modifies the graphical properties of some parts in a hughe assy. when this is done I want to make a capture of this situation and paste it in powerpoint presentations. about this final actions I have 2 querries:

1. is there a way to place the capture on the clipboard in stead of writing it to a file using the capturetofile command. such that I can just use CTRL+V where I want it. when doing the capture action manually this is pretty straight forward but I couldnt figure it in VBA.
2. I placed the tree and compass in hide however in the lower right corner of the screen I still have that small axis system visible. is there any way of Hidding it or cropping it out?

any help is greatly appreciated.
Cheers,
Thomas
 
Replies continue below

Recommended for you

Hi,

1. There is a macro on this forum using paste directly in powerpoint, use search function to find it.
2. Maybe something like this ?

Code:
'change the picture size, which is by default active window size
Set win = CATIA.ActiveWindow
curH = win.Height 'save current window's Height
curW = win.Width 'save current window's width

sLF = Chr(10)
 win.Height = InputBox ("Here you can change the picture Height, the starting point is upper left corner", "Change picture Height", win.Height )
If win.Height = "" Then
    Exit Sub
End If

sLF = Chr(10)
 win.Width = InputBox ("Here you can change the picture Width, the starting point is upper left corner", "Change picture Width", win.Width )
If win.Width = "" Then
    Exit Sub
End If

Regards
Fernando

 
whoow, awesome thanks Fernando!
That was exactly what I was looking for, works like a charm!
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Top