返回列表 上一主題 發帖

[發問] (謝謝H大大的幫忙)如何選取Activex控制項的TextBox1(完成)

av8d

帖子
712 
主題
281 
精華
0 
積分
1019 
點名
0  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2025-5-22 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2012-6-16 17:53 | 只看該作者

[發問] (謝謝H大大的幫忙)如何選取Activex控制項的TextBox1(完成)

本帖最後由 av8d 於 2012-6-16 18:48 編輯

選擇自訂表單的TextBox1
TextBox1.SetFocus

選擇Activex控制項的該如何寫?
收藏 分享

av8d

帖子
712 
主題
281 
精華
0 
積分
1019 
點名
0  
作業系統
Windows 10 
軟體版本
Office 2019 
閱讀權限
50 
性別
男 
註冊時間
2011-6-30 
最後登錄
2025-5-22 
3#
發表於 2012-6-16 18:37 | 只看該作者
本帖最後由 av8d 於 2012-6-16 18:47 編輯

回復 2# Hsieh


    謝謝大大~寫在按鈕中可以~如果寫在開啟後執行則出現錯誤
Private Sub Workbook_Open()
    Sheets("Index").Select
    TextBox1.Activate
End Sub

找到了~好像是要這樣

ActiveSheet.OLEObjects("Textbox1").Activate

TOP

Hsieh

帖子
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#
發表於 2012-6-16 18:30 | 只看該作者
回復 1# av8d


    TextBox1.Activate
學海無涯_不恥下問

TOP

        靜思自在 : 【時間如鑽石】時間對一個有智慧的人而言，就如鑽石般珍貴；但對愚人來說，卻像是一把泥土，一點價值也沒有。
返回列表 上一主題