麻辣家族討論版版 » Excel程式區 » 十六進制轉十進制

返回列表下一主題上一主題發帖

[發問] 十六進制轉十進制

中學生 Rank: 2

帖子: 97
主題: 32
精華: 0
積分: 167
點名: 0
作業系統: WinXP
軟體版本: Office2003
閱讀權限: 20
性別: 男
註冊時間: 2011-3-22
最後登錄: 2017-8-16

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2012-3-6 21:31 | 只看該作者

[發問] 十六進制轉十進制

請問各位前輩

我用一個變數 iID 代表 cells(x,2) = 0x080150F4
利用Mid函數抓080150F4 要將其轉成10進制

Dim x as Integer
Dim iID as Long
iID = CSng("&H" & Mid(Cells(x, 2), 3))

這樣的結果出現型態錯誤

想請問一下，應該怎麼做才對
因為上面轉換方式是我google來的
但是我並不太懂CSng ("&H" ==> 這是指什麼??
每次做型態轉換時都必須這樣做嗎??

煩請前輩解惑~謝謝

樓主熱帖

收藏

　頭銜: 麻辣路人甲

大學生 Rank: 4

帖子: 967
主題: 0
精華: 0
積分: 1001
點名: 0
作業系統: WIN XP
軟體版本: OFFICE 2003
閱讀權限: 50
性別: 男
來自: 台北
註冊時間: 2010-11-29
最後登錄: 2022-5-17

2012龍年全勤獎章熱烈參與勳章

2^#

發表於 2012-3-6 22:27 | 只看該作者

回復 1# a703130

Dim x as Integer
Dim iID as Long
iID = CLng("&H" & Mid(Cells(x, 2), 3))

超級版主 Rank: 8 Rank: 8

帖子: 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兔年全勤獎章

3^#

發表於 2012-3-6 22:33 | 只看該作者

回復 1# a703130

工作表工程函數中有此函數
iID = Application.WorksheetFunction.Hex2Dec(Mid(Cells(x, 2), 3))

學海無涯_不恥下問

中學生 Rank: 2

帖子: 97
主題: 32
精華: 0
積分: 167
點名: 0
作業系統: WinXP
軟體版本: Office2003
閱讀權限: 20
性別: 男
註冊時間: 2011-3-22
最後登錄: 2017-8-16

4^#

發表於 2012-3-7 10:36 | 只看該作者

謝謝各位前輩~經過嘗試後都可以運作

靜思自在 : 【蒙蔽的自由】人常在什麼都可以自由自在的時候，卻被這種隨心所欲的自由蒙蔽，虛擲時光而毫無覺知。

返回列表下一主題上一主題