返回列表 上一主題 發帖

表單出現424 此處需要物件

missbb

帖子
216 
主題
71 
精華
0 
積分
292 
點名
0  
作業系統
window xp 
軟體版本
2007 
閱讀權限
20 
性別
女 
註冊時間
2012-6-27 
最後登錄
2024-9-28 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2016-12-13 22:30 | 只看該作者

表單出現424 此處需要物件

大大, 正在處理表單設計, 但出現錯誤訊息, 真想不到如何理解及繼續. 求賜教!

Medical.zip (30.06 KB)
收藏 分享

missbb

帖子
216 
主題
71 
精華
0 
積分
292 
點名
0  
作業系統
window xp 
軟體版本
2007 
閱讀權限
20 
性別
女 
註冊時間
2012-6-27 
最後登錄
2024-9-28 
3#
發表於 2016-12-14 22:09 | 只看該作者
回復 2# c_c_lai

多謝指導.:lol

TOP

c_c_lai

帖子
2035 
主題
24 
精華
0 
積分
2031 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
100 
性別
男 
註冊時間
2012-3-22 
最後登錄
2024-2-1 
2#
發表於 2016-12-14 08:40 | 只看該作者
本帖最後由 c_c_lai 於 2016-12-14 08:42 編輯

回復 1# missbb
當一個變數宣告為整數 (Integer)、雙精準 (Double)、字串 (String) 等變數型態時，
在 Assign 值時， 不能加上 ".Value"， 否則會發生
執行階段錯誤 "424"： 此處需要物件
的訊息。
所以請將
  1. sbrAge.Value = ActiveCell.Offset(0, 5).Value
複製代碼
修正為
  1. sbrAge = ActiveCell.Offset(0, 5).Value
複製代碼
其他，如
  1. cboCountry = "Please select..."
  2.      .
  3.      .
  4. Range("d" & nr).Value = cboCountry.Value
複製代碼
是錯誤的寫法。 應修正成
  1. cboCountry = "Please select..."
  2.      .
  3.      .
  4. Range("d" & nr).Value = cboCountry
複製代碼
請自行一一修正你程式碼內的瑕玼。

TOP

        靜思自在 : 謊言像一朵盛開的鮮花，外表美麗，生命短暫。
返回列表 上一主題