テキストボックスかコンボボックスを条件としたい

質問

フォーム上のコントロールを取得する時に、
「テキストボックスかコンボボックスなら」としたいのですが、ＶＢＡコードがわかりません。

************************************************************
Sub Sample()
Dim myCtrl As Control
Dim myForm As String

myForm = "フォーム1"

For Each myCtrl In Forms(myForm).Controls
If myCtrlのタイプがテキストボックス Or コンボボックス Then
Debug.Print myCtrl.Name
End If
Next

End Sub
************************************************************

に修正していただけますか？

ControlType プロパティを使うと思うのですが、使い方がわかりません。
ご回答よろしくお願いします。

回答No.1

nicotinism · ベストアンサー

この辺をよく読んでみて
http://okwave.jp/qa/q7685952.html
考える。

お礼

For Each ctl In Form_F上.Controls
If (ctl.ControlType = acTextBox) Or (ctl.ControlType = acComboBox) Then
Debug.Print ctl.Name
End If
Next ctl
で、うまくいきました。ありがとうございました。