① VBA中控制項無法添加到工具箱中
1添加的方法是在VB工具箱中單擊文本框控制項,
然後在主界面上拖動,再修改屬內性multiline為true,
再修改scrollbars屬性值為2,就可以了容。
2表示垂直滾動條,要是選1的話是水平滾動條,
選3表示既有水平滾動條又有水平滾動條
② 怎麼利用PowerPoint中的VBA製作選擇題
1、運行PowerPoint2003,單擊「文件」-「保存」命令,彈出「另存為」對話框,文件名設為「測驗」,單擊「保存」命令。
2、單擊「插入」-「文本框」-「水平」命令,這時滑鼠變成「1」字型,在編輯區內單擊滑鼠左鍵拖動滑鼠拉出一個方框,在框內輸入第一題的題目「1.人造地球衛星的軌道半徑越大,則」。
3、下面我們來製作選項。單擊「視圖」-「工具欄」-「控制項工具箱」命令,彈出「控制項工具箱」,單擊「控制項工具箱」上的「選項按鈕」控制項,滑鼠變成十字型,按下滑鼠左鍵拖動滑鼠拉出一個方框。單擊「控制項工具箱」上的「屬性」命令,彈出「屬性」對話框,把「名稱」改為「ti1」,把「caption」改為「A.速度越小,周期越小」,其它設為默認。
圖2
其餘的三個選項的名稱分別為「ti2」、「ti3」、「ti4」,「caption」分別為「B.速度越小,周期越大」、「C.速度越大,周期越小」、「D.速度越大,周期越大」。
4、「下一題」按鈕的製作。單擊「控制項工具箱」中「命令按鈕」控制項,這時滑鼠變成十字型,如前在編輯區內拖拉出一個方框,松開滑鼠方框會變成一個按鈕。選中它,單擊滑鼠右鍵,在彈出的快捷菜單中選擇「屬性」命令,把「命令按鈕」屬性中的「caption」設為「下一題」。
這樣,第一題的界面就製作完成了。第二題我們可以按照第2-4步做出來,只是要把題目、各個選項值換一下,另外需要添加一個文本框命令,其名稱設為「sum」,命令按鈕的名稱改為「得分」。
三、添加代碼
1、單擊「控制項工具箱」上「查看代碼」控制項,彈出「Microsoft visual basic」編輯器,單擊「插入」-「模塊」命令,彈出「模塊」編輯窗口,在「模塊」編輯窗口輸入「public fen(2) as integer」。
2、選中第一題中「下一題」按鈕,單擊「控制項工具箱」上「查看代碼」控制項,彈出「Microsoft visual basic」編輯器,在「Private Sub CommandButton1_Click()」和「End Sub」之間輸入
If ti2.Value = True Then
fen(0) = 2
Else
fen(0) = 0
End If
With SlideShowWindows(1).View
.GotoSlide (2)
End With
3、選中最後一題中「得分「按鈕,單擊「控制項工具箱」上「查看代碼」控制項,彈出「Microsoft visual basic」編輯器,在「Private Sub CommandButton1_Click()」和「End Sub」之間輸入
If ti3.Value = True Then
fen(1) = 2
Else
fen(1) = 0
End If
Dim i, s
s = 0
For i = 0 To 2
s = s + fen(i)
Next
sum = s
好了,退出「Microsoft visual basic」編輯器,按F5試一下效果吧,怎麼樣,是不是和原來設計的一樣呢。
③ WPS office個人版的WPS演示里,那個控制項工具箱為什麼是灰色的怎麼才能用啊
您使用的應該是WPS個人版。目前個人版不提供VBA環境,所以無法使用控制項工具箱。專VBA環境只在WPS專業版中提供。要屬用此功能,必須先自己安裝VBA,如果你的電腦沒有安裝VBA,則WPS的「控制項工具箱」處於不可用狀態。 但是,可能是由於版權等原因,WPS官方網站並沒有提供VBA的安裝程序。如果要安裝,可以利用AUTOCAD安裝盤,在安裝時只選擇「VBA」即可,另外,也有熱心的網友提取出了VBA的獨立安裝程序,大家可以自己在WPS OFFICE論壇中搜索一下。VBA安裝完成後,在WPS文字的工具欄空白區域右擊滑鼠,即可調出「控制項工具箱」。
④ VBA 中的控制項無法添加到工具箱中
說明你的電腦中沒復有這個ActiveX控制項制,你可以從別的電腦上拷貝來一個,需要注冊,注冊方法可以從網上查(加一句代碼的事)
你還要考慮到你的軟體發布給別人用,他的電腦上有沒有這個控制項,防止沒有,建議你發布的時候把這個控制項文件打包進去,並且程序中加上控制項注冊的代碼.
⑤ vba開發怎麼調出工具箱
EXCEL中插入一個用戶窗體後,工具箱會自動出現。如果沒有出現或關閉了,請在菜單 視圖 工具箱 打開
⑥ 如何用vba實現在EXCEL固定區域坐標內點擊單元格,顯示日期控制項
第一首先要用
Private
Sub
Worksheet_Change(ByVal
Target
As
Range)
觸發事件。第二要用到日期控制項:方法一:先將控制項工具箱調出來。視圖-工具欄-控制項工具箱。
在控制項工具箱上最下面那個按鈕是其他控制項,打開它螞寬,找到Microsoft
Date
and
Time
Picker
Control,
這個就是日歷控制項。然後在一個單元格上拖畫一個框,日歷控制項就出來了。
然後在控制項工具箱上退出設計模式,日歷控制項就能使用了。
在你所要用到的單元格內畫出,大小要和單元格一樣;
選中控制項,右鍵單擊選擇數敏菜單「設置控制項格式」,在"屬性"選項中選擇「大小、位置均隨單元悶畢亮格而變」,確定;
右鍵單擊控制項選擇菜單「查看代碼」,進入VBA後,鍵入以下代碼:
Private
Sub
DTPicker1_Change()
Sheet1.Cells(1,
1)
=
CStr(DTPicker1)
End
Sub
Private
Sub
DTPicker1_Click()
Sheet1.Cells(1,
1)
=
CStr(DTPicker1)
End
Sub
返回到Excel,調整單元格大小使控制項完全顯示;
退出設計模式,OK。如果沒有這個控制項可以自己去網上下載個控制項或者用方法2. 方法2:在EXCEL窗口中執行「視圖」→「工具欄」→「控制項工具箱」添加「日歷控制項11.0」
⑦ 如何使用wps的控制項工具
1、如何獲取安裝權來限自
1)WPS Office 中VBA部分僅在WPS企業版中提供。
2)若您是WPS企業版用戶,可在WPS中登錄您的企業賬號,或輸入序列號激活WPS,獲取VBA支持庫的安裝許可權。
2、啟用宏
登錄企業賬號或輸入序列號激活WPS後,點擊「啟用宏」按鈕,獲取VBA安裝許可權,進一步安裝VBA。
3、已有VBA安裝包
若您已有VBA安裝包,安裝完成後,重新啟動WPS即可使用。
WPS目前已支持VBA 7.1版本