|
>え〜?
>どういうコード書かはりました?
>
>Me.Controls("TextBox" & i).Value = ""
>
>の「TextBox」を「ComboBox」にしたらええだけと思うんですが・・
>
>「コンパイルエラー」って、どういうメッセージでした?
>「変数が定義されてません」とかだったら、
>ComboBox を「””」で囲ってないとか????
お手数おかけします><
下記のように書いてみたのですが、「プロシージャが大きすぎます」というコンパイルエラーでした。><
-------------------------------------------------------
Dim i As Long
For i = 1 To 10
If Me.Controls("Textbox" & i).Value = "" Then
MsgBox "入力されていない箇所があります"
Exit Sub
End If
Next i
For i = 1 To 10
If Me.Controls("ComboBox" & i).Value = "" Then
MsgBox "入力されていない箇所があります"
Exit Sub
End If
Next i
-------------------------------------------------------
|
|