摘要: 1. 获取表头的列号,可直接调用函数,传入参数,因为是表头,a56爆大奖在线娱乐rowID为 1 2. 获取第一列中行表头的所在行,传入参数时,colID 为 1 '获取列号 Public Function Find_Col_ID(ByVal rowID, ByVal objWorkBook, ByVal objW 阅读全文
posted @ 2022-04-20 10:27 妖怪梧桐 阅读(1192) 评论(0) 推荐(0) 编辑
摘要: 1.插入按钮1,选择对应执行的macro->Select_file 2.插入按钮2,选择对应执行的macro->Temp_file Sub Select_file() fileselection ActiveSheet.Range("b3") End Sub Sub Temp_file() file 阅读全文
posted @ 2022-04-20 10:27 妖怪梧桐 阅读(250) 评论(0) 推荐(0) 编辑
摘要: '获取当前路径p = ThisWorkbook.Path MsgBox (p)'获取上一级路径 p = Mid(p, 1, InStrRev(p, "\")) MsgBox (p) 阅读全文
posted @ 2022-04-20 10:26 妖怪梧桐 阅读(1640) 评论(0) 推荐(0) 编辑