cancel
Showing results for
Did you mean:
cancel
Showing results for
Did you mean:

SOLVED
Highlighted
Newbie

## Making complex hole patterns

For several customer we need to make complex hole patterns on a concave surface.

If we can use the fill feature we do, this save a hole lot of time.

But in some cases (al lot) we can't use the fill pattern, then this work is very time consuming and Creo will become a bottleneck.

I'm really looking for some help or ideas.

Below a hole pattern and picture for example.

X-start dimensionY-start dimensionQuantity of holes
2.54.336
3.7811.6310
4.0419.0315
3.9826.3821
3.9433.6727
4.0340.9332
3.9948.1938
3.9755.4344
4.0262.6749
469.9155
3.9877.1561
4.0284.3866
491.6172
3.9898.8578
4.02106.0783
4113.389
3.99120.5395
4.02127.76100
4134.99106
3.99142.22112

1 ACCEPTED SOLUTION

Accepted Solutions
Highlighted

## Re: Making complex hole patterns

Peter,

I created "some" files in Excel 2010 and CR2 M070 .

1.) table_pattern.xlsm

• using x and y values related to the 1st hole I was able to compute circle radius r (column D) and angle a related to the 1st hole (column E)
• using macro generate_coordinates I was able to generate radius r and angle a of all holes (the very first hole is pattern leader, its dimensions are not included in table)
```Sub generate_coordinates()'' generate_coordinates Makro'
'Dim i, j, k As Integer
Dim q As IntegerDim r As DoubleDim a As Double
k = 2
For i = 1 To 20q = Range("C" & Mid(Str(i + 1), 2)).Valuer = Range("D" & Mid(Str(i + 1), 2)).Valuea = Range("E" & Mid(Str(i + 1), 2)).Value
For j = 1 To qRange("H" & Mid(Str(k), 2)).Value = k - 2Range("I" & Mid(Str(k), 2)).Value = rRange("J" & Mid(Str(k), 2)).Value = aa = a + 360 / qIf a > 360 Thena = a - 360End Ifk = k + 1Next j
Next i
End Sub
```

• I copied generated output to table3.txt and replaced a) comma characters with decimal point b) tabs with spaces
• I copied modified contents of table3.txt to table3.ptb

2.) table_pattern.prt

• I used table3.ptb as driving table of pattern

MH

Martin Hanák
15 REPLIES 15
Highlighted

## Re: Making complex hole patterns

have you tried creating a sketch using those position as geometry points and then pattern the holes as points? You lose the tables but now points can be controlled my relations if you want to get it more automated.

Highlighted

## Re: Making complex hole patterns

What rules are driving the spacing and quantities?

Highlighted

## Re: Making complex hole patterns

You say that sometimes you are able to pattern the holes, have you figures out what determines success and failure of the pattern? I would look to figure out why sometimes it works and sometimes it doesn't before you try to come up with a preferred method.

Maybe relative accuracy?

## Re: Making complex hole patterns

Hi Son,

I like your answer but i 'm sorry to say that i have no clue how to perform this action.

I never worked that way.

Highlighted

## Re: Making complex hole patterns

Hi David,

The rules are as the table aboved is.

that's all i get from my customers, and i can't change a single thing.

i normally make the first hole with the hole feature.

and then with table pattern i make the rest of the holes.

Then with geometry pattern i rotated the individual hole around the Z-axis.

After +/- 10 pcd's Creo gets very slow.

Highlighted

## Re: Making complex hole patterns

Hi Dan,

The only time the fill pattern works if the spacing is equal, and the amount of holes is the same.

This happens 1 in the 25 times.

Highlighted

## Re: Making complex hole patterns

Do a search for "golf ball" and review a few of the links.

Those discussions my provide some insight.

Highlighted

## Re: Making complex hole patterns

Peter,

Have you tried working with surfaces?   (Many times I have seen Creo get bogged down with "solid feature" patterns.)

This will likely cause you to have many "merge" features in your tree,  but in the end you may end up with a part that regenerates much faster.

Here is how I would go about it...

-Copy the top surface of the plate (to create a surface)

-Extrude your first hole as a surface cylinder

- not a solid hole, and not a Hole Feature

- make your extrude long enough that it protrudes through both sides of the material thickness

-Pattern the Extruded surface cylinder

-Merge all of the surface cylinders to the top surface that you copied earlier

-Use a "Solidify Cut" feature to cut out all the holes at one time.

Not sure if its gonna cure your problem, but it might be worth a try.

Good Luck

Bernie

Bernie Gruman

Owner / Designer / Builder

www.GrumanCreations.com

Highlighted

## Re: Making complex hole patterns

Peter,

I created "some" files in Excel 2010 and CR2 M070 .

1.) table_pattern.xlsm

• using x and y values related to the 1st hole I was able to compute circle radius r (column D) and angle a related to the 1st hole (column E)
• using macro generate_coordinates I was able to generate radius r and angle a of all holes (the very first hole is pattern leader, its dimensions are not included in table)
```Sub generate_coordinates()'' generate_coordinates Makro'
'Dim i, j, k As Integer
Dim q As IntegerDim r As DoubleDim a As Double
k = 2
For i = 1 To 20q = Range("C" & Mid(Str(i + 1), 2)).Valuer = Range("D" & Mid(Str(i + 1), 2)).Valuea = Range("E" & Mid(Str(i + 1), 2)).Value
For j = 1 To qRange("H" & Mid(Str(k), 2)).Value = k - 2Range("I" & Mid(Str(k), 2)).Value = rRange("J" & Mid(Str(k), 2)).Value = aa = a + 360 / qIf a > 360 Thena = a - 360End Ifk = k + 1Next j
Next i
End Sub
```

• I copied generated output to table3.txt and replaced a) comma characters with decimal point b) tabs with spaces
• I copied modified contents of table3.txt to table3.ptb

2.) table_pattern.prt

• I used table3.ptb as driving table of pattern

MH

Martin Hanák
Announcements
Message from Brian Thompson (PTC General Manager and DVP) regarding Creo Business Continuity plans.