是不是應該每一個 CHECKBOX CLICK ACTION 也要把所有東西顯示回來先才再跟據所有 CHECKBOX 情況再做動作呢?如果你不想 EXCEL 閃...
Sub test() arr = WorksheetFunction.Transpose(Columns("j")) For i = 1...
B tab 內所有數字前後均有一個不明符號,用 trim 和 clean 等也不能清除.你可用 len 去看看共有14個字符,即是除原本12個數字外加兩個字符....
這樣? Range("A1:B" & 50 + 4 & ",M2:M" & 50 + 4).Se...
Private Sub workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) s...
自己再改改吧 Sub test() Dim brr arr = Range("a2:o" & [c1048576].End(xlUp...
你 get 完後的 .responseText 已經是"Not Found The requested URL /tw/zh/tracking.htm...