SolidWorks图号名称分离宏--不依赖空格或特殊符号

s78763036

看论坛的分离宏都是以零件名中的空格或者斜杠为准进行分割，如果零件名不包含这些就无法分离，现在我自己琢磨了一个方法，不需要这些特殊符号，经测试可以准确识别分离以下几种情况：
1图号+名称的情况 ，例如：ABC123固定板，分离成图号：ABC123，名称：固定板
2名称+图号的情况， 例如：固定板ABC123，分离成图号：ABC123，名称：固定板
3纯名称，不包含图号的情况，例如：固定板，将全部写入“名称”属性
4纯图号，不包含名称的情况，例如：ABC123，将全部写入“图号”属性
以下为代码，写的不规范美观，但是能用

游客，如果您要查看本帖隐藏内容请回复

补充内容 (2019-12-2 11:13):
今天发现代码里有错误，现在修改如下：把13行删除，改成以下代码
   e = Right(c, 7)
If e = ".SLDPRT" Or e = ".SLDASM" Or e = ".sldprt" Or e = ".sldasm" Then
   G = Left(c, B - 7)
Else
   G = c
End If

补充内容 (2019-12-2 22:22):
最新宏代码在157楼

s78763036

s78763036

xiabulai

夕梦恋

s78763036

gdzsh

w6304013

qxzch

qxzch

Francis

ryouss