[算表] Textbox輸入分數後無法使用int讀取整數

看板Office作者shezion (= =)時間8年前 (2017/07/29 02:01)推噓1(1推 0噓 1→)

留言2則, 2人參與討論串1/1

軟體:EXCEL 版本:2013 大家好，又遇到難題上來請求各位大大的幫忙了。最近在VBA表單上做了一個文字方塊，文字方塊的內容是要輸入分數型態或整數的資料；(1)當輸入的資料是分數且超過1以上，用Int()搭配If判斷式將整數部分存放在a1儲存格，分數部分放在b1儲存格。(2)當輸入資料是分數且小於1，則把分數放在a1儲存格。(3)當輸入資料剛好是整數時，則將整數放在a1儲存格。但是每次執行都會在int()跳出資料型態錯誤。請問有沒有甚麼辦法可以讓textbox的數入的內容可以判別分數型態資料? ex: z = textbox1.value 'key in 的資料，ex 1 1/2 x = int(textbox1.value) '取整數後的資料 <-該行出現型態錯誤 if z < > x then if z < 1 then range("a1") = z else range("a1") = x range("b1") = z - x endif else range("a1") = x endif -- 桃~● ╱ . ◢██◣ 探猶　俺園 ╱ ╱ █ ◥▋ 主公！救我！囊如中在實畫. . ＋ ╱ ╱ ╱ ◣◤□︵□▋ / 取取百至家 ◆●●●Φ▃▃▃▃▃●█◤◥\ ▆_◤▃●~▃▃▃▃￠物敵萬名 . . . . ◥\ ◤█◤ ╱ ╱ ~● 之軍歸 ψfishhzy123 . . ▆▆◤ ╱ crabwind改洨 -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.40.166.232 ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1501264905.A.2FC.html