PTT數位生活區 / Visual_Basic

[VBA ] 計算個數

看板Visual_Basic作者 (Mark)時間8年前 (2016/03/04 23:59), 8年前編輯推噓0(0推 0噓 4→)
留言4則, 2人參與, 最新討論串1/1
各位大大好: 我目前在E3~E169450的數字分別是1~845。我現在想算出每個數字各幾個 想請各位幫忙看我的程式問題出在哪? 謝謝各位 Sub abc() For aaa = 3 To 848 Cells(aaa, 8).Value = Application.CountIf(Sheet1.Range("E3:E169450"), "aaa-2") Next End Sub E 補充 1 1 1 2 2 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 163.22.18.73 ※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1457107164.A.A16.html
→
03/05 00:56, , 1F
03/05 00:56, 1F
→
03/05 00:57, , 2F
利用WorksheetFunction使用工作表函數
03/05 00:57, 2F
※ 編輯: markbaseball (163.22.18.73), 03/05/2016 10:03:08 ※ 編輯: markbaseball (163.22.18.73), 03/05/2016 10:07:25
→
03/05 10:42, , 3F
那麼改這樣試試看
03/05 10:42, 3F
→
03/05 22:46, , 4F
可以了!感謝你
03/05 22:46, 4F
‣ 更多 markbaseball 的文章
文章代碼(AID): #1MsR3SeM (Visual_Basic)
Visual_Basic 近期熱門文章
更多 近期熱門文章 >>
PTT數位生活區 即時熱門文章
更多 即時熱門文章 >>
‣ 更多 markbaseball 的文章
文章代碼(AID): #1MsR3SeM (Visual_Basic)