No.2ベストアンサー
- 回答日時:
スピンポタンの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
ご回答頂きありがとうございます。
Wendy02様、tinu2000様共に前回の質問もごらん頂きありがとうございました。
お二方のご回答はおおよそ同じ内容と判断致しましたので、先に回答して頂きましたWendy02様のご回答をベストアンサーに致しました。
No.3
- 回答日時:
前述の質問の続きと見なして。
UserForm1のコード
---------------------- ここから
Option Explicit
Private Sub UserForm_Initialize()
With Me.SpinButton1
.Min = 1
.Value = .Min
End With
Me.TextBox1.Value = Format(Me.SpinButton1.Value / 10, "0.0")
End Sub
Private Sub SpinButton1_Change()
Me.TextBox1.Value = Format(Me.SpinButton1.Value / 10, "0.0")
End Sub
ThisWorkbook のコード
---------------------- ここから
Option Explicit
Private Sub Workbook_Open()
UserForm1.Show
End Sub
ご回答頂きありがとうございます。
Wendy02様、tinu2000様共に前回の質問もごらん頂きありがとうございました。
お二方のご回答はおおよそ同じ内容と判断致しましたので、先に回答して頂きましたWendy02様のご回答をベストアンサーに致しました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) エクセルで指定したセルの増減ボタンを作りたい 2 2022/12/02 11:03
- Excel(エクセル) エクセルで保存時に全部のシートの最終行をコピーして数値で貼り付けたい 3 2023/08/14 15:49
- Excel(エクセル) エクセルでcsvファイルを開いてVBAを使いたい 7 2022/04/28 11:12
- Excel(エクセル) エクセルでのVBA 2 2022/08/03 06:48
- Visual Basic(VBA) エクセルVBA Workbook変数に変数を使ったファイル名を格納したい 5 2023/06/13 14:46
- Excel(エクセル) 【VBA】エクセルで選択した範囲の値のみをクリップボードにコピーするコードについて 3 2023/03/08 17:41
- Excel(エクセル) エクセルにサムネイル画像組み込み 2 2022/09/02 17:13
- Access(アクセス) Accessのクエリの結果を、既存のエクセルに追加したい 2 2022/07/31 22:44
- Visual Basic(VBA) Excel VBA 最終行を取得しVlookup関数をコピーする方法をコーディングで教えてください。 3 2023/05/11 13:14
- Visual Basic(VBA) エクセルVBAについて 2 2023/01/31 16:21
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
ExcelVBAでテキストボックスの表示形式を小数点第二位まで表示する方法
Visual Basic(VBA)
-
EXCEL VBE ユーザフォームのスピンボタンの増減値
Excel(エクセル)
-
スピンボタンで小数点
Visual Basic(VBA)
-
-
4
Excel vba ユーザーフォームテキストボックス内の小数点表示
Visual Basic(VBA)
-
5
ユーザーフォームを表示中にシートの操作をさせるには
Excel(エクセル)
-
6
ラベルを表示したり非表示にしたりしたい
Visual Basic(VBA)
-
7
Excelのtextboxへの入力で小数点以下に0が続く場合でも正しく表示したい
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
クライアントに出すメールで、...
-
「ありますか」と聞く場合、Is...
-
「データ」のスペルはdataとdat...
-
チェーンソーの耐用年数
-
一般常識が無さすぎて自信をな...
-
FOB、C&F、CIFの違い...
-
大学教授に質問したいことがあ...
-
独身男性はどうやって性欲をお...
-
Yahoo知恵袋の回答が心無いもの...
-
3X掛ける2という計算について
-
教えてGOOのようなサイトってほ...
-
Next stage マスターテスト
-
ステーキ、300グラム?
-
何度も同じ事を言わせる人は何...
-
教えてgooの民度の低さやばくな...
-
質問の意図がよく分からないと...
-
【ISO?】標準類とは何ですか?
-
本当に下らないのですが、オ、...
-
活線メガって?
-
「あなたの想像に任せるわ。」...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
クライアントに出すメールで、...
-
「データ」のスペルはdataとdat...
-
チェーンソーの耐用年数
-
何度も同じ事を言わせる人は何...
-
「ありますか」と聞く場合、Is...
-
独身男性はどうやって性欲をお...
-
就活生です。 「チームで成し遂...
-
太陽光発電での全量売電から余...
-
丁寧語の「ご質問」「お問い合...
-
接骨院の受付事務 訳が分から...
-
FOB、C&F、CIFの違い...
-
Yahoo知恵袋の回答が心無いもの...
-
一般常識が無さすぎて自信をな...
-
一坪何m2?
-
1合って何リットル?
-
IT素人が全然関係ない部署から...
-
【ISO?】標準類とは何ですか?
-
LINEで、質問されたから答えた...
-
5段階評価の分析法
-
「行かなきゃ」と「行かないと...
おすすめ情報