close
Excel VBA是自修而來的,目的是來解決工作上的應用需求,也不算什麼專家,單純地想到什麼就尋求解決方法而己。所以持續增加中....
ActiveWorkbook.Name '取得工作中檔案檔名
Filename = ActiveWorkbook.Name
Worksheets.Count '活頁簿工作表總數
A= Worksheets.Count
找到空白列寫法
A = Range(Sheets("table").Columns("b").Find("").Address).Row
日期格式的寫法(指定要的格式寫法)
today = Format(Date, "YYYYMMDD")
today1 = Format(Date, "ee/MM/DD")
TodayA = Format(Date, "ee/MM/DD")
week = Weekday(Date, vbMonday)
全站熱搜
留言列表