Continue to Site

Eng-Tips is the largest engineering community on the Internet

Intelligent Work Forums for Engineering Professionals

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

Set Font size and color in drawing table

Status
Not open for further replies.
sri91

sri91

Mechanical
Aug 29, 2019
43
Hi Everyone,
I am trying to set the parameters 'Font size' and 'color' in the texts of a drawing table.
I am using the below code.
What ever the text size I give, it is taking zero(0).

Can you please suggest me.


drwTbls(drwTblNum).SetCellString rowCount, 2, wrksht.Cells(j, 1)
drwTbls(drwTblNum).SetCellAlignment rowCount, 2, CatTableMiddleCenter
Set currText = drwTbls(drwTblNum).GetCellObject(rowCount, 2)
currText.SetParameterOnSubString catFontSize, 0, 0, 0.075
Dim txtProps1 As DrawingTextProperties
Set txtProps1 = currText.TextProperties
currText.SetFontSize 0, 0, 0.095
currText.TextProperties.Color = vbGreen


Thanks in advance
SURYASRI
 
Replies continue below

Recommended for you

Sort by date Sort by votes
Hi Little,
Even though I have given the update, it is not setting the font size.
Still it is changing to zero only.
Please help.

drwTbls(drwTblNum).SetCellString rowCount, 5, Right(wrksht.Cells(j, 2), 5)
drwTbls(drwTblNum).SetCellAlignment rowCount, 5, CatTableMiddleCenter
Set currText = drwTbls(drwTblNum).GetCellObject(rowCount, 3)
Dim ifs As Double
ifs = 0.075
currText.SetFontSize 0, 0, ifs
colo = currText.TextProperties.Color
currText.TextProperties.Update

Thanks
SURYASRI
 
Upvote 0 Downvote
Oh, as far as I remember you have to specify font not by size, but by it's index in dropdown menu as displayed in the UI: 1, 2, 3 etc.
 
Upvote 0 Downvote
Hi Little,
I am getting error for the below code.
 
Upvote 0 Downvote
Hi Little,
I am getting error for the below code.

currText.TextProperties.Font 0, 0, 0.095

In the UI in catia text properties are in inches like 0.095, 0.075, 1.2 inch etc...
Please check the attached picture for the UI.
Please do the needful help.

Thanks
SURYASRI
 
 https://files.engineering.com/getfile.aspx?folder=3661a123-461a-4422-99e4-499801cf70b4&file=Capture.JPG
Upvote 0 Downvote
Status
Not open for further replies.

Similar threads

dddn
  • Locked
  • Question
Drawing dimensions Set Value
Replies
5
Views
178
NP_1612
NP_1612
fall fever
  • Locked
  • Question
Design Table
Replies
1
Views
126
Wuzhee
Wuzhee
Rich68
  • Locked
  • Question
2d Catalog Components orientation in drawing view
Replies
3
Views
173
Little Cthulhu
Little Cthulhu
CarlosR2022
  • Locked
  • Question
3Dx SectionService Runtime-Error '430' when set the object
Replies
0
Views
137
CarlosR2022
CarlosR2022
CarlosR2022
  • Locked
  • Question
How to set Window State for 3Dx Experience (Desktop)?
Replies
0
Views
150
CarlosR2022
CarlosR2022

Part and Inventory Search

Sponsor

Back
Top Bottom