如何判斷每一儲存格的屬性是否為數值?

各位先進大大~
小弟想寫一個兩個sheet的比對巨集，兩個sheet原則上是兩期的財務報表，即凡是屬於數值的儲存格分別比較在兩個sheet中是否有變動，所以要把數值類的儲存格區別出來，但要如何判斷每一儲存格的屬性是否為"數值"呢(或是"通用"，或是"文字"...)?
謝謝指教~

樓主熱帖

Hsieh

超級版主 Rank: 8 Rank: 8

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

2025年全勤獎章 2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

2^#

發表於 2010-8-27 17:04 | 只看該作者

回復 1# examsuper

set Rng=Cells.SpecialCells(xlCellTypeConstants, 1)

學海無涯_不恥下問

TOP

examsuper

小學生 Rank: 1

帖子: 14
主題: 6
精華: 0
積分: 25
點名: 0
作業系統: Windows XP
軟體版本: excel 2000
閱讀權限: 10
註冊時間: 2010-5-17
最後登錄: 2023-3-24

3^#

發表於 2010-8-30 14:02 | 只看該作者

謝謝版主回覆~
可是SpecialCells一次就選出所有符合的range，我其實是要兩個sheet相同位置的儲存格(例如 sheet1.cells(3,A)與sheet2.cells(3,A))再相減放到第三個sheet去顯示，所以SpecialCells的結果好像沒辦法運算；另外，SpecialCells好像也區分不出"數值"與"通用"耶~

TOP

Hsieh

超級版主 Rank: 8 Rank: 8

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

2025年全勤獎章 2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

4^#

發表於 2010-8-30 14:56 | 只看該作者

回復 3# examsuper

msgbox Range("A1").NumberFormatLocal

學海無涯_不恥下問

TOP

examsuper