2023年9月3日
利用控件生成二维码
摘要： Sub 生成二维码() Dim wb As Workbook Dim sht As Worksheet Set wb = Application.ThisWorkbook Set sht = wb.Worksheets(1) 'Randomize With sht '删除旧条码控件 .Shapes. 阅读全文
posted @ 2023-09-03 23:49 wangway 阅读(33) 评论(0) 推荐(0) 编辑