12
返回列表 上一主題 發帖

COUNTA 或某些函數在VBA上使用的疑問

GBKEE

帖子
5923 
主題
13 
精華
1 
積分
5986 
點名
0  
作業系統
win10 
軟體版本
Office 2010 
閱讀權限
150 
性別
男 
來自
台灣基隆 
註冊時間
2010-5-1 
最後登錄
2022-1-23 

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
11# 跳轉到 »
發表於 2011-1-6 15:05 | 只看該作者
回復 10# hugh0620
Sub Ex()
Dim W%
W=10
Sheet1.Cells(4, 2) = Application.CountA(Sheet1.Range("A" & W & ":A65536"))
End Sub

TOP

C.F

帖子
28 
主題
9 
精華
0 
積分
45 
點名
0  
作業系統
Windows 
軟體版本
XP 
閱讀權限
10 
註冊時間
2010-5-10 
最後登錄
2024-8-20 
12#
發表於 2011-1-6 16:21 | 只看該作者
若單純要利用 Excel 的函數也可以用 WorksheetFunction.CountA 的方式哦~~

TOP

asus103

帖子
77 
主題
11 
精華
0 
積分
118 
點名
0  
作業系統
winXP 
軟體版本
office2007 
閱讀權限
20 
性別
男 
註冊時間
2010-12-24 
最後登錄
2011-3-2 
13#
發表於 2011-1-6 17:10 | 只看該作者
回復 2# Hsieh
請問一下版主大大
為什麼是用Application.CountA(Sheet2.[A7:A65536])
而不是用WorksheetFunction.CountA(Sheet2.[A7:A65536])
我在說明中只有看到下者
他們(Application和WorksheetFunction)之間都可以通用嗎?
還是有其它的限制
ASUS

TOP

lai.k.h

帖子
19 
主題
7 
精華
0 
積分
31 
點名
0  
作業系統
windows7 
軟體版本
office2007 
閱讀權限
10 
性別
男 
註冊時間
2011-1-13 
最後登錄
2019-12-27 

論壇贊助勳章
14#
發表於 2011-1-23 17:00 | 只看該作者
我也學到了,謝謝.

TOP

Hsieh

帖子
4901 
主題
44 
精華
24 
積分
4916 
點名
255  
作業系統
Windows 7 
軟體版本
Office 20xx 
閱讀權限
150 
性別
男 
來自
台北 
註冊時間
2010-4-30 
最後登錄
2024-11-24 

2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
15#
發表於 2011-1-23 22:41 | 只看該作者
回復 13# asus103


    http://gb.twbts.com/index.php/topic,1174.msg5880.html#msg5880
學海無涯_不恥下問

TOP

hugh0620
　暱稱: VBA向前衝

高中生Rank: 3Rank: 3

帖子
559 
主題
58 
精華
0 
積分
626 
點名
0  
作業系統
win8 
軟體版本
office2013 
閱讀權限
50 
性別
男 
來自
TW 
註冊時間
2010-11-22 
最後登錄
2024-6-14 
16#
發表於 2011-1-24 09:26 | 只看該作者
回復 13# asus103


    這是大大貼的網址~ 怕有人找不到那段解釋的文字~ 特地貼出來~

1. 注意 Match 是工作表函數的成員而不是VBA內建函數，所以需指明上層物件。
WorksheetFunction 的標準寫法是 Application.WorksheetFunction。

2. 注意你的程式位於一般模組還是物件模組。
一般模組：
在一般模組 (就是 Module1、Module2.. 那些) 裡是可以省略 Application 的。
(省略 Application 就不能省略 WorksheetFunction，意思就是不能只寫函數名稱)
物件模組：
但在物件模組裡就不能省略 Application 了，
因為物件模組預設的物件是該物件本身，
例如 Worksheet 模組的預設物件是 Worksheet；
UserForm 模組的預設物件就是 UserForm。由此可知，
若在 UserForm1 模組寫 WorksheetFunction (省略了 Application)，
VBA 會視為 UserForm1.WorksheetFunction，結果就會出錯了。
學習才能提升自己

TOP

        靜思自在 : 【時間成就一切】時間可以造就人格，可以成就事業，也可以儲積功德。
12
返回列表 上一主題