Zi Jie Yu wrote:
方便給我.xlsm (恕刪)


真是太謝謝了!!
我將檔案放在雲端上(不知道怎麼在這裡的貼文附上檔案),
雲端連結如下,
https://drive.google.com/open?id=1TBatwbh_fN16l87uyZ5Q1p0A_tDjBctX

若無法下載請再跟我說。謝謝。
多工作表時,有關計算的部份,需詳細指定工作表名稱
在不同工作表叫出userform,計算結果會不一樣

大家回答時,通常是以一個工作表方式回答的,所以有時必需自己理解,稍微修改程式碼
l = Application.CountA(Sheets("會計表單").Columns(m))

發問時,建議給檔案,因為資料的格式、數量、位置,都會影響程式、公式的寫法

就像我4樓的程式,只適用1樓的資料格式
高手牛小傑2樓的程式,只適用一個工作表
而且一些程式上的防呆,也要自己慢慢加上去
snare wrote:
多工作表時,有關計算(恕刪)


謝謝snare的提醒。

我後來再修改了下面一句程式碼,
For Each a In Range(Sheets("會計表單").Cells(2, m), Sheets("會計表單").Cells(l, m))
現在確定都可以抓到對的工作表了。

謝謝snare跟大家的協助。
幫你整理一下!



flyagnel wrote:
真是太謝謝了!!
Zi Jie Yu wrote:
幫你整理一下!


...(恕刪)


這樣又更簡潔易懂了,謝謝😊
文章分享
評分
評分
複製連結

今日熱門文章 網友點擊推薦!