- 博客(1)
- 收藏
- 关注
原创 Excel中vb利用——汉字首字母
Excel中vb利用——汉字首字母Option ExplicitFunction PY(TT As String) As VariantDim i%, temp$ PY = "" For i = 1 To Len(TT) temp = Asc(Mid$(TT, i, 1)) If temp > 255 Or temp < 0 Then
2016-11-18 16:33:20 599
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人