Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


26712 / 76732 ←次へ | 前へ→

【55350】Re:TextBoxが1つのユーザフォーム
発言  ponpon  - 08/4/29(火) 23:32 -

引用なし
パスワード
   いろいろネットで調べましたが、
私には、わかりません。何か方法があるかもしれません。
識者の回答をお待ちください。

ちなみに、Lockを使えば 何とかなりました。

Private Sub UserForm_Initialize()
 With Me.CommandButton1
    .Caption = "入力不可"
    .Locked = True
 End With
End Sub

Private Sub TextBox1_AfterUpdate()
  
  If IsNumeric(Me.TextBox1.Value) Then
   With Me.CommandButton1
     .Caption = "入力可"
     .Locked = False
   End With
  End If
End Sub

1 hits

【55344】TextBoxが1つのユーザフォーム よちよち 08/4/29(火) 21:01 質問
【55345】Re:TextBoxが1つのユーザフォーム ponpon 08/4/29(火) 21:30 発言
【55348】Re:TextBoxが1つのユーザフォーム よちよち 08/4/29(火) 22:02 回答
【55350】Re:TextBoxが1つのユーザフォーム ponpon 08/4/29(火) 23:32 発言
【55355】Re:TextBoxが1つのユーザフォーム よちよち 08/4/30(水) 7:53 お礼
【55357】Re:TextBoxが1つのユーザフォーム Yuki 08/4/30(水) 8:35 発言
【55358】Re:TextBoxが1つのユーザフォーム ponpon 08/4/30(水) 13:07 発言
【55436】Re:TextBoxが1つのユーザフォーム よちよち 08/5/4(日) 10:25 お礼
【55354】Re:TextBoxが1つのユーザフォーム ichinose 08/4/30(水) 7:34 発言

26712 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free