2019年1月18日
20190118_xlVBA多表合并
摘要： Public Sub simple() Set wb = ActiveWorkbook Set sht = ActiveSheet msg = MsgBox("程序准备清除活动工作表内容？按是确认，按否退出！", vbYesNo, "Tips") If msg = vbNo Then Exit Sub msg = MsgBox("请您确认是否对本文件做好了... 阅读全文
posted @ 2019-01-18 21:54 wangway 阅读(214) 评论(0) 推荐(0) 编辑