Admin X

移除超連結:
1.) 在欄位輸入數值 1, 然後複製
2.) 選取含超連結的資料範圍
3.) 選擇性貼上，於[運算]下方選擇[加]

Del_Columns_of_Data_Recorders

REM Del Unnecessary Columns

Dim i As Integer

Columns(2).Delete

For i=3 to 61
Columns(i).Delete
Columns(i).Delete

Next i

REM Change Data Format to Third Decimal Places

Range("B2").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.NumberFormatLocal = "0.000_ ;[紅色]-0.000 "

指定日期為非周末

=IF(WEEKDAY(TODAY(),2)>=6,IF(WEEKDAY(TODAY()-1,2)>=6,TEXT(TODAY()-2,"yyyymmdd"),TEXT(TODAY()-1,"yyyymmdd")),TEXT(TODAY(),"yyyymmdd"))