vba控制其他窗口內控制項

❶ vba如何控制外部程序上的控制項

別說vba，vb都難。外部程序是你的不？是的話就好辦了。可以發信息給你的程序，再讓程序控制控制項。

❷ VBA模塊內引用窗體控制項的問題，問題解決了再加分

1. label_pm 這個只是沒有賦值的變數，而且控制項好像不能這樣引用的。
2. 你可以試一下使用下面的方法（幫助文件）來進行控制項的使用，
3. 按照你的需求，需要在MenuMouseMove(ctl As Object) 這裡面訪問窗體里其他所有的的控制項，所以可能還需要一個窗體變數作為參數。我現在沒有VB，沒法替你驗證。

For Each MyControl In Controls
If (MyControl.Name Like "MultiPage*") Then
MsgBox MyControl.Name _
& ".Pages.Count = " _
& MyControl.Pages.Count
ElseIf (MyControl.Name Like "TabStrip*") Then
MsgBox MyControl.Name & ".Tabs.Count = " _
& MyControl.Tabs.Count
End If
Next

❸ 如何讓vba加入其它控制項

在窗體的工具窗口上右擊滑鼠，就會出現附加控制項，就可以插入你所需要的所有系統已注冊的控制項。
也可以加入自定義控制項，只要放在相應的路徑下，也是可以載入進來的。

❹ excel vba 用代碼在窗體中添加控制項

Private Sub Form_Load()
HScroll1.Max = 200 '最大值制
HScroll1.Min = 0 '最小值
HScroll1.Value = 100 '初始滾動值
HScroll1.LargeChange = 10 '大改變
HScroll1.SmallChange = 5 '小改變

End Sub

Private Sub HScroll1_Change()
Print HScroll1.Value
End Sub

不懂請追問，滿意請採納

❺ vba 什麼是窗體控制項與工作表控制項

窗體控制項是你按alt+f11進入vba編譯環境,添加的窗體上,用控制項工具箱做出來的回,驅動需要vba代碼控制,而工答作表控制項是在工作表上用視圖-控制項工具箱作出來的,雖然也是代碼驅動,但是代碼不在vba後台,需要在設計模式察看代碼才可以
圖形控制項可以設置一些個性化的圖標作為按鈕,用右鍵點畫出來的圖形,選擇指定宏,就可以獲得幾乎和後台窗體以及工作表控制項一樣的效果,不同的是,繪圖作出來的按鈕,對代碼的調用是一種鏈接關系.會隨文件路徑改變而受影響

❻ vba怎麼實現在一個窗口中調用另一個窗口中的數據，或者一個窗口中的數據怎麼在另一個窗口中表示

userform1 userfrom2

userfrom2 裡面有控制項 Label1 值是 「nihao」

userform1 編程回答

set a = new userform2

a.Label1.caption 取值

❼ vba中一個窗體中怎麼引用另一個窗體中對象

將要傳遞的變數設置成模塊級的公共變數，即在窗體外的模塊中定義變數。

❽ 如何使用VBA在其他工作簿中插入控制項並寫入代碼

希望樓主耐心揣摩,舉一反三
Sub建立窗體並運行()
DimTempFormAsObject'採用後期綁定
Application.VBE.MainWindow.Visible=False'防止窗口閃動
SetTempForm=ThisWorkbook.VBProject.VBComponents.Add(3)'建立窗體
WithTempForm
.Properties("Caption")="智能輸入"
.Properties("Width")=100
.Properties("Height")=100
EndWith
WithTempForm.Designer.Controls.Add("forms.ComboBox.1")'創建組合框
.Left=10
.Top=15
EndWith
WithTempForm.Designer.Controls.Add("forms.CommandButton.1")'創建一個按鈕
.Left=10
.Top=45
.Caption="輸入當前日期"
EndWith
WithTempForm.CodeMole'為窗體添加代碼
.InsertLines.CountOfLines+1,"PrivateSubUserForm_Activate()"
.InsertLines.CountOfLines+2,"Me.ComboBox1.List=Array(""一月"",""二月"",""三月"",""四月"",""五月"",""六月"",""七月"",""八月"",""九月"",""十月"",""十一月"",""十二月"")"
.InsertLines.CountOfLines+3,"Me.ComboBox1=WorksheetFunction.Text(VBA.Month(Date),""[DBNum1][$-804]0月"")"
.InsertLines.CountOfLines+4,"EndSub"
.InsertLines.CountOfLines+5,"PrivateSubComboBox1_Change()"
.InsertLines.CountOfLines+6,"IfTypeName(ActiveCell)=""Range""ThenActiveCell=Me.ComboBox1.Text"
.InsertLines.CountOfLines+7,"EndSub"
.InsertLines.CountOfLines+8,"PrivateSubCommandButton1_Click()"
.InsertLines.CountOfLines+9,"IfTypeName(ActiveCell)=""Range""ThenActiveCell=date"
.InsertLines.CountOfLines+10,"EndSub"
EndWith
VBA.UserForms.Add(TempForm.Name).Show'顯示窗體
ThisWorkbook.VBProject.VBComponents.RemoveTempForm'運行完畢刪除窗體
EndSub

❾ VBA窗體控制項放到了其它控制項中怎麼選中

找到工具欄設計模式圖標(類似一個窗體的那一個)按下去就是設計模式了，然後就能選取這個VBA窗體控制項了，再按一下就是退出設計模式。

❿ vba窗體控制項調用

在VBA窗口雙擊左側列復表框的制thisworkbook 在右邊窗口粘貼下面的代碼
Private Sub Workbook_Open()
userform1.show '如果你更改了窗體的名稱那就改為 窗體名稱.show
End Sub
這樣打開這個工作薄 就直接調用你建的窗體.
還有一種就是創建一個過程宏調用,可以寫在任意工作表的代碼中或者模塊中調用
sub 載入操作窗體()
userform1.show
end sub