Drawing Scale - Want Colon, No Slash

[Anonymous]

Dearest Inventor Gurus,

A longstanding but minor irritation for my drafting department has been the slash in the scale call-out in drawing views. We feel it should be a colon. "SCALE 1 / 2" vs. "SCALE 1 : 2" Now, I know I can go and change the list of Preset Values scales in the Standard Styles, but that is not a true solution as the Detail views slip through the cracks. As desirable as it is to keep the scale a base two, sometimes it is necessary to throw a three in there such as 1 : 6, 1 : 36, or others not in that default scale drop down menu. When that happens and a detail view is placed, the slash will pop up again as 1 / 3 or 1 / 18. The idea of having an exhaustive Preset Values list is a bit ridiculous to me. Also, I would rather not change from the base international standard ANSI because that affects a multitude of aspects that have been painstakingly set over the years - not a great trade off. But if that is the only option, I would consider it. Being at my wit's end I pose this question to you, great minds:

Is there some way I can burrow into the APT ANSI 2013 (yes, that's a year in our standard T.T) and get it to default with a colon in a given scale rather than a slash?

I would also accept an iLogic solution.

The image below is where I'm at now. The Preset Values list has been trimmed down from including 1 / 2, and 1 / 4.

[Cadmanto · Accepted solution]

My suggestion would be to either do what it seems you have already started except do it in your drawings templates, or maybe take the link I am providing with the illogic rule and tweak it to do what you need it to do.

https://forums.autodesk.com/t5/inventor-forum/change-drawing-scale-with-ilogic-upon-parameter-change...

If this solved your issue please mark this posting "Accept as Solution".

Or if you like something that was said and it was helpful, Kudos are appreciated. Thanks!!!! 

     

[PaulMunford]

I don't understand the problem. You can put whatever you like in the default scale list in the styles and standards manager.

You can also type any scale you like into the scale box when creating a view.

What am I missing?

[Cadmanto]

Paul,

I agree with you, but I think the poster is looking for an easier method that is basically a one stop shop to change the method without creating all scales needed to be the colon.

If this solved your issue please mark this posting "Accept as Solution".

Or if you like something that was said and it was helpful, Kudos are appreciated. Thanks!!!! 

     

[Anonymous]

---

@Cadmanto wrote:

Paul,

I agree with you, but I think the poster is looking for an easier method that is basically a one stop shop to change the method without creating all scales needed to be the colon.

---

That is correct. I'm looking to get rid of the slash in the scale once and for all.

Right now it seems that iLogic is the way to go. I'll see if I can use iLogic to find the slash character and replace it with a colon. Thanks for the code snippet!

[Anonymous · Accepted solution]

All,

Here's the code I generated to get the job done. I eventually had to forego any attempt at text replacement and simply redefined how scale is stated. Set trigger to Before Save Document.

'This code formats the scale in the view call-out to "1 : 2" or "2 : 1" style with the colon vs a slash for example

Dim oDoc As DrawingDocument
oDoc = ThisDoc.Document
Dim oSheets As Sheets
Dim oSheet As Sheet
Dim oViews As DrawingViews
Dim oView As DrawingView

oSheets = oDoc.Sheets
For Each oSheet In oSheets

	oViews = oSheet.DrawingViews
	For Each oView In oViews
	
		Scale = oView.Scale
		ScaleRecip = 1/Scale
		
		Try
			If ScaleRecip > 1 Then
			oView.ScaleString = "1 : " & ScaleRecip
			Else
			oView.ScaleString = Scale & " : 1"
			End If
		Catch
		End Try

	Next
Next

[Anonymous]

One thing I noticed was that if you place a view with an odd scale like 7 or 11 (some people I know do this - God knows why) and then create a detail view off of it, then the scale comes in not as a clean 1 : 3.5 but as 1 : 3.48.... It has a lot of following digits. I threw a rounding function into the code and set it to one decimal. I felt that was enough accuracy but two decimals was tempting. 

'This rule formats the scale in the view call-out to "1 : 2" or  "2 : 1" style with a colon vs a slash for example
Dim oDoc As DrawingDocument
oDoc = ThisDoc.Document
Dim oSheets As Sheets
Dim oSheet As Sheet
Dim oViews As DrawingViews
Dim oView As DrawingView

oSheets = oDoc.Sheets
For Each oSheet In oSheets

	oViews = oSheet.DrawingViews
	For Each oView In oViews
	
		Scale = oView.Scale
		ScaleRecip = 1/Scale
		
		Try
			If ScaleRecip > 1 Then
			oView.ScaleString = "1 : " & Round(ScaleRecip, 1)
			Else
			oView.ScaleString = Round(Scale, 1) & " : 1"
			End If
		Catch
		End Try

	Next
Next