Trim out Hyphen

[Anthony]

Both work really well. Thanks a million! Unfortunately, we
have parts that have multiple Hyphens:

Example:

PN:
-----------------
1-34-523-23

Is there a way to eliminate the Hyphens all together?

Desired outcome:

PN:

 

[mt]

Both work really well. Thanks a million! Unfortunately, we
have parts that have multiple Hyphens:

Example:

PN:
-----------------
1-34-523-23

Is there a way to eliminate the Hyphens all together?

Desired outcome:

PN:

 

[Ruskin Hardie]

retPart = ""
For myLoop = 1 to Len(Trim(part_num))
If Mid(part_num, myLoop, 1) = "-" Then
retPart = retPart & " "
Else
retPart = retPart & Mid(part_num, myLoop, 1)
End If
Next myLoop
part_num = retPart