投稿日 | : 2005/09/15(Thu) 20:38 |
投稿者 | : 花ちゃん |
Eメール | : |
URL | : |
タイトル | : Re: VBAで「型が一致しません」 |
> Private Sub DateCheck(TBOX As TextBox)
> If Not IsDate(TBOX.Text) Then MsgBox ("正しい日付を入力してください")
> 'TBOX.Select
> End Sub
下記のようにObject型に変更して見てください。
Private Sub DateCheck(TBOX As Object)
If Not IsDate(TBOX.Text) Then MsgBox ("正しい日付を入力してください")
'TBOX.Select
End Sub
>
> もひとつ。不正日付のテキストボックスの文字を反転させたいのですが、SelStart,SelLengthが
> 無いので、どうしたらよいでしょうか?
ありますよ。自動メンバ表示で出てきますよ。
TextBox2.SelStart
TextBox2.SelLength