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跟大家的協助。