if range("c" & i) <> "" then
if mid$(range("c" & i), 3, 1) <> "/" then
Msgbox "格式错误"
else
sString = sString & i & vbtab & range("c" & i) & vbcrlf
endif
endif
next
Msgbox sString
我来这里，一是做任务，而是提醒你，给楼上 满意答案....00
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024