Drawing Automation with VBA

Drawing Automation with VBA

Anonymous
Not applicable
17,543 Views
20 Replies
Message 1 of 21

Drawing Automation with VBA

Anonymous
Not applicable

Dear,

I got a macro job for creation the drawing for a part. I got a lot of problem.

 

1/ The first one is move view:

I already create a view (e.g. oIsoView), now I want to move it to the left.

I find the DrawingView.Position method, how can I use this method? I try many time, but it's not successful yet.

 

Do I need to use the SelectSet method??????

0 Likes
Accepted solutions (1)
17,544 Views
20 Replies
Replies (20)
Message 21 of 21

Anonymous
Not applicable

Dim pSymbl as string

pSymbl = "Ø"

 

Dim pGenDims As GeneralDimensions
pGenDims = .DrawingDimensions.GeneralDimensions

 

Dim pCnt As Integer

pCnt = pGenDims.Count ''Get the latest count of the dimension & edit the dimension immediatly after creation

pGenDims.Item(pCnt).Text.FormattedText = pSymbl & "<DimensionValue/>"

 

 

 

 

 

Please Accept as solution if you got succeeded.