質問: エクセルvba「スピンボタンで小数を扱う」 エクセルvba「スピンボタンで小数を扱う」 エクセルvbaの初心者です。 スピンボタンとテキストボックスを組み合わせて使う際、「0.1、0.2・・・1.0、1.1・・・」というような数の増加を表示したいのですが、どのようなコーディングが必要でしょうか。 試行錯誤しておりましたがどうしても出来ませんのでご質問させて頂きます。
回答: スピンポタンのsmallchangeプロパティは、long型ですから、そのままでは扱えません。 ですから、表示を10分の1にするしかありません。なお、前回の質問も、以下でみれば分かるはずです。 '//フォームモジュール private sub spinbutton1_change() with textbox1 textbox1.text = format$(spinbutton1.value / 10, "0.0") end with end sub private sub userform_initialize() with spinbutton1 .min = 0 '最小値 .max = 100 '最大値 .smallchange = 1 '1の場合は本来不要 .value = 0 '初期値 'プロパティで設定すれば、上記の4つの項目の設定は不要 textbox1.text = format$(.value, "0.0") '初期値が0以外は、本来不要 end with end sub