Excel VBA質問箱 IV

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

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


66085 / 76734 ←次へ | 前へ→

【15215】Re:入力制限
回答  IROC  - 04/6/17(木) 16:00 -

引用なし
パスワード
   このようにできます。

Private Sub TextBox1_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
  If IsNumeric(TextBox1.Text) = True Then
    TextBox2.Text = TextBox1.Text * 500
  Else
    MsgBox "X"
    TextBox1.Text = ""
  End If
End Sub

1 hits

【15211】入力制限 miko 04/6/17(木) 15:01 質問
【15214】Re:入力制限 ちゃっぴ 04/6/17(木) 16:00 回答
【15237】Re:入力制限 miko 04/6/17(木) 17:57 お礼
【15215】Re:入力制限 IROC 04/6/17(木) 16:00 回答

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