Excel VBA質問箱 IV

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

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


13466 / 76732 ←次へ | 前へ→

【68771】Re:ユーザーフォムのテキトボックスの空白の計算
お礼  きしやん  - 11/4/15(金) 21:40 -

引用なし
パスワード
   neptune さん
早速のご回答ありがとうございます。
なにせ超初心者のためfunctionプロシージャの使い方が全くわかりません。
具体的な使い方をご教授願えれば幸いです。

▼neptune さん:
>▼きしやん さん:
>そういう時はfunctionプロシージャを使いましょう。
>
>空白だけ判断してます。
>textboxにはsingle型を適用できる範囲の数値又は空白のみが入っていることが前提。
>
>Public Function ValueCheck(ByRef pT As MSForms.TextBox) As Single
>  If pT.Text = "" Then
>    ValueCheck = 0
>  Else
>    ValueCheck = CSng(pT.Text)
>  End If
>End Function
>
>使い方
>>  t1 = TextBox2
>  t1 = ValueCheck(TextBox2)
>
>・・・テストしてませんのでおかしかったら適当に修正して下さい。

0 hits

【68768】ユーザーフォムのテキトボックスの空白の計算 きしやん 11/4/15(金) 20:07 質問
【68770】Re:ユーザーフォムのテキトボックスの空白の計算 neptune 11/4/15(金) 21:09 回答
【68771】Re:ユーザーフォムのテキトボックスの空白の計算 きしやん 11/4/15(金) 21:40 お礼
【68775】Re:ユーザーフォムのテキトボックスの空白の計算 neptune 11/4/16(土) 13:24 回答
【68772】Re:ユーザーフォムのテキトボックスの空白の計算 kanabun 11/4/15(金) 21:57 質問
【68773】Re:ユーザーフォムのテキトボックスの空白の計算 kanabun 11/4/15(金) 22:12 発言
【68774】Re:ユーザーフォムのテキトボックスの空白の計算 kanabun 11/4/16(土) 9:35 発言
【68777】Re:ユーザーフォムのテキトボックスの空白の計算 sasa 11/4/16(土) 15:43 回答
【68778】Re:ユーザーフォムのテキトボックスの空白の計算 kanabun 11/4/16(土) 17:21 発言
【68779】Re:ユーザーフォムのテキトボックスの空白の計算 sasa 11/4/16(土) 18:49 回答
【68780】Re:ユーザーフォムのテキトボックスの空白の計算 きしやん 11/4/16(土) 20:46 お礼

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