if mid$(range("c" & i), 3, 1) <> "/" then
Msgbox "格式错误"
else
sString = sString & i & vbtab & range("c" & i) & vbcrlf
endif
endif
next
Msgbox sString
欢迎分享,转载请注明来源:内存溢出
if mid$(range("c" & i), 3, 1) <> "/" then
Msgbox "格式错误"
else
sString = sString & i & vbtab & range("c" & i) & vbcrlf
endif
endif
next
Msgbox sString
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)