你可以試試看 Range("A1").Formula = "=if(and(A2>A3,B3<=B2),"&...
@paicheng0111是的a工作表是原有的收據範例,b工作表是會員購買的紀錄。我在a工作表輸入會員號就可以在b工作表出尋找該會員全部明細紀錄。我目前要做近...
印象中應該是這樣 year = int(input()) if (year % 4 ==0 and year % 100 !=0) or year % 400=...
因為公式一中有ISERROR() =ISERROR(參數1) 如果參數1的值是錯誤(#N/A, #DIV/0!, #NAME?,...)的話,會回傳True
我會捨棄input #,改用Line input #用Line input #把單一行文字讀進變數中,再用Split()切割。 Sub InOutbound_D...
試試看用Range.font.Italic屬性檢查是否為斜體。 Sub 批次新增工作表() '先把現存sheet弄成一個array Dim sh...
你的公式 =IF(OR(ISERROR(D4-F4),ISBLANK(D4)),"-",D4-F4) 在OR()中加入另一個條件使成為...
據我所知,VBA = 閹割版的VB。因此不能製作EXE檔。
我個人不喜歡用SUBTOTAL函數。你可以參考這篇文章https://isvincent.pixnet.net/blog/post/45160967 看看是否要...