Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

25928 / 76736

←次へ　｜　前へ→


	【56145】Re:ﾃｷｽﾄﾎﾞｯｸｽの入力について

kanabun - 08/6/4(水) 17:39 -


	引用なし

	パスワード

▼DA さん：
おじゃまします。

>入力はスムーズに行くのですが、確定した後、もう一度ﾃｷｽﾄﾎﾞｯｸｽをｸﾘｯｸしてENTERを押したり、他のﾃｷｽﾄﾎﾞｯｸｽをｸﾘｯｸすると０：００に戻ってしまうのですが・・・

数値だけのときだけ、変換するように条件をつけたらどうでしょう

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
　With TextBox1
　　　If IsNumeric(.Text) Then
　　　　　.Text = Format$(.Text, "0:00")
　　　End If
　End With
End Sub

0 hits

▼

【56106】ﾃｷｽﾄﾎﾞｯｸｽの入力について DA 08/6/2(月) 11:14