ユーザーフォームに配置したラベルの文字をプロパティのキャプションで指定するのではなく、セルの値を取得して表示させたいことありませんか？
そしてさらに、2つのセルの値を足した合計値をラベル表示させられたら、もって便利ですよね。
単純な足し算・引き算・掛け算・割り算ならば、難しいことは全くないので基本となる加減乗除した値をラベルのキャプションに書き換えるVBAコードをご紹介します。
ラベル名＝セル番地 加減乗除 セル番地
ラベル名をセルの値の合計値で書き換えたいならば、単純に「セル番地」「加減乗除」「セル番地」で完成です。
ここでは、ユーザーフォームに配置したラベルをクリックすると計算したセルの値がラベルに表示されるようにします。
普段のエクセル関数と全く同じなのでとても簡単ですよ。
足し算
VBAコード
Private Sub Label1_Click()
Label1.Caption = Range(“A1”) + Range(“A2”)
End Sub
解説
- ラベル1がクリックされたら
- ラベル1のラベル名をセルA1とセルA2を足し算した値にする
- マクロ記録終了
引き算
VBAコード
Private Sub Label1_Click()
Label1.Caption = Range(“A1”) – Range(“A2”)
End Sub
掛け算
VBAコード
Private Sub Label1_Click()
Label1.Caption = Range(“A1”) * Range(“A2”)
End Sub
割り算
VBAコード
Private Sub Label1_Click()
Label1.Caption = Range(“A1”) / Range(“A2”)
End Sub
波乗りアヒルとこのように解説の必要がなくてもVBAに取り組もうという方ならば大丈夫ですよね。
関連記事
-
エクセルVBAのメッセージ文章をセルの値にリンクさせる簡単な方法
エクセルでメッセージボックスを利用して「〇〇しますか？」と問うた時に、「はい」「いいえ」を選択できますが、固定した文章ではなくセルの値によって質問内容が変更… -
エクセルVBAで条件に一致する複数セルを見つけて背景色の変更方法
表の中で特定の値を目立たせるためにセルの背景色を変更したいと思った事ありませんか？ Excel-VBAを使えば、一瞬で見つけ出して目立つように色を変更することができるF… -
もし～だったらの条件分岐エクセル関数IFをVBAで代用する方法
条件分岐というと難しいですが、もし～だったら、そうでなかったらってよくありませんか？ そしてエクセル関数でも使うIF関数をエクセルVBAでも高頻度で使うので、基本… -
エクセルINT関数をVBAで小数点以下切り捨てを繰り返し処理方法
エクセル関数を使って小数点以下を切り捨てする作業をVBAを使って複数行一括処理したいと思ったことありませんか？ Application.RoundDownと繰り返し処理を合わせて使え… -
2つのセルの値を足し算など加減乗除してラベル名に表示させるVBA
ユーザーフォームに配置したラベルの文字をプロパティのキャプションで指定するのではなく、セルの値を取得して表示させたいことありませんか？ そしてさらに、2つのセ…
新着ページ
よく見られているページ
紅葉スポット
記事が見つかりませんでした。