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)

 


arrow
arrow
    全站熱搜
    創作者介紹
    創作者 羅傑小沙 的頭像
    羅傑小沙

    羅傑小沙

    羅傑小沙 發表在 痞客邦 留言(0) 人氣()