Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11559 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【15437】テキストﾎﾞｯｸｽの計算 kitano 04/6/24(木) 19:28 質問[未読]
【15442】Re:テキストﾎﾞｯｸｽの計算 IROC 04/6/24(木) 20:16 回答[未読]
【15450】Re:テキストﾎﾞｯｸｽの計算 kitano 04/6/25(金) 12:16 質問[未読]
【15451】Re:テキストﾎﾞｯｸｽの計算 IROC 04/6/25(金) 12:29 回答[未読]
【15454】Re:テキストﾎﾞｯｸｽの計算 kitano 04/6/25(金) 14:25 お礼[未読]
【15457】Re:テキストﾎﾞｯｸｽの計算 kitano 04/6/25(金) 16:11 発言[未読]
【15458】Re:テキストﾎﾞｯｸｽの計算 IROC 04/6/25(金) 16:22 回答[未読]
【15461】Re:テキストﾎﾞｯｸｽの計算 kitano 04/6/25(金) 16:48 質問[未読]
【15463】Re:テキストﾎﾞｯｸｽの計算 つん 04/6/25(金) 17:48 回答[未読]
【15464】Re:テキストﾎﾞｯｸｽの計算 kitano 04/6/25(金) 18:22 お礼[未読]
【15465】Re:テキストﾎﾞｯｸｽの計算 IROC 04/6/25(金) 19:04 回答[未読]
【15466】Re:テキストﾎﾞｯｸｽの計算 kitano 04/6/25(金) 19:28 お礼[未読]
【15468】Re:テキストﾎﾞｯｸｽの計算 IROC 04/6/25(金) 19:35 回答[未読]
【15469】Re:テキストﾎﾞｯｸｽの計算 ウシロメタさ 04/6/25(金) 19:46 発言[未読]
【15437】テキストﾎﾞｯｸｽの計算
質問  kitano E-MAILWEB  - 04/6/24(木) 19:28 -
引用なし
パスワード
   ﾃｷｽﾄﾎﾞｯｸｽ1に入力した数値とﾃｷｽﾄﾎﾞｯｸｽ2に入力した数値の計算をフォームの中で出来ますか？例えばﾃｷｽﾄﾎﾞｯｸｽ1に入力した数値-ﾃｷｽﾄﾎﾞｯｸｽ2に入力した数値＝ﾃｷｽﾄﾎﾞｯｸｽ3に答えを出せませんか、どなたかよろしくお願いします
【15442】Re:テキストﾎﾞｯｸｽの計算
回答  IROC  - 04/6/24(木) 20:16 -
引用なし
パスワード
   ユーザーフォーム上のテキストボックスですよね？

textbox3.text = textbox2.text - textbox1.text

で出来ますよ。

但し、数値以外のものが入力されると
エラーになりますので、
そのあたりは入力制限の処置が必要でしょう。
【15450】Re:テキストﾎﾞｯｸｽの計算
質問  kitano E-MAILWEB  - 04/6/25(金) 12:16 -
引用なし
パスワード
   よかったら例として教えてもらえませんか。お願いします
【15451】Re:テキストﾎﾞｯｸｽの計算
回答  IROC  - 04/6/25(金) 12:29 -
引用なし
パスワード
   >textbox3.text = textbox2.text - textbox1.text

と書きましたけど・・？

ご自分ではどのくらい出来るのですか？
ＶＢＡの使い方を一から教えて欲しいということでしょうか？
だとすれば掲示板では難しいので、
VBA入門のホームページなどを参考にしては如何でしょうか？
【15454】Re:テキストﾎﾞｯｸｽの計算
お礼  kitano E-MAILWEB  - 04/6/25(金) 14:25 -
引用なし
パスワード
   IROC さん、ありがとうございました。
出来ました。どうもおせわになりました。
【15457】Re:テキストﾎﾞｯｸｽの計算
発言  kitano E-MAILWEB  - 04/6/25(金) 16:11 -
引用なし
パスワード
   IROC さん、何回もすいません。後1つ質問させて下さい。
Textの中に常時0を表示したい場合は、どのようにすれば、言いですか
【15458】Re:テキストﾎﾞｯｸｽの計算
回答  IROC  - 04/6/25(金) 16:22 -
引用なし
パスワード
   >Textの中に常時0を表示したい場合は、どのようにすれば、言いですか

常時0　というのは表現がおかしくないですか？

常時0 ならラベルで良いと思います。
【15461】Re:テキストﾎﾞｯｸｽの計算
質問  kitano E-MAILWEB  - 04/6/25(金) 16:48 -
引用なし
パスワード
   すいません質問内容がおかしくて
先ほど教えていただいた
textbox3.text = textbox2.text - textbox1.text
でtextbox2かtextbox3が空白の時エラーがでます

フォームを立ち上げたときtextboxの中に0を表示できませんか
【15463】Re:テキストﾎﾞｯｸｽの計算
回答  つん E-MAIL  - 04/6/25(金) 17:48 -
引用なし
パスワード
   kitano さん、こんにちは

横から失礼します。

>textbox3.text = textbox2.text - textbox1.text
>でtextbox2かtextbox3が空白の時エラーがでます
>フォームを立ち上げたときtextboxの中に0を表示できませんか

フォームの、Initializeイベント内で、

TextBox3.text = 0

のように書けば、それは出来ますけど、
そういうエラー処理は、上記の計算をするタイミングでされる方がいいと思います。
フォームの表示時に、｢0」を入れておいても、ユーザーに消されてしまえばそれまでですものね。
あるいは、TextBoxのChangeイベントで、空白になった場合は「0」を入れる処理を追加するとか……こっちのが簡単かな
【15464】Re:テキストﾎﾞｯｸｽの計算
お礼  kitano E-MAILWEB  - 04/6/25(金) 18:22 -
引用なし
パスワード
   始めまして、つん さん、どうもありがとうございます。
TextBox5.Text = 0のほうでの0表示ができましたが
TextBoxのChangeイベントで、空白になった場合は「0」を入れる処理を追加する方法をがんばってみます。どうもお世話になりました。
【15465】Re:テキストﾎﾞｯｸｽの計算
回答  IROC  - 04/6/25(金) 19:04 -
引用なし
パスワード
   計算をコマンドボタンで実行するようにすれば、
簡単なのですが、
入力に応じて随時処理したいのであれば、
BeforeUpdateイベントは如何でしょうか？
【15466】Re:テキストﾎﾞｯｸｽの計算
お礼  kitano E-MAILWEB  - 04/6/25(金) 19:28 -
引用なし
パスワード
   IROC さん、たびたびアドバイスありがとうございます。
【15468】Re:テキストﾎﾞｯｸｽの計算
回答  IROC  - 04/6/25(金) 19:35 -
引用なし
パスワード
   以下のようにすれば、 0 は気にしないで大丈夫です。

Private Sub TextBox1_Change()
　　TextBox3.Value = Val(TextBox1.Value) - Val(TextBox2.Value)
End Sub

Private Sub TextBox2_Change()
　　TextBox3.Value = Val(TextBox1.Value) - Val(TextBox2.Value)
End Sub
【15469】Re:テキストﾎﾞｯｸｽの計算
発言  ウシロメタさ  - 04/6/25(金) 19:46 -
引用なし
パスワード
   テキストボックスのプロパティで
valueを0に設定すれば
フォーム出現時に毎度「０」になります
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
11559 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free