gra********

2022/1/25 12:38

11回答

Excelで文字入力をする際に、ボタン一つで変更するようなマクロコードはありますか。 例:ボタン[青]を押したらフォントの色が青になり入力できるようになる。

Excelで文字入力をする際に、ボタン一つで変更するようなマクロコードはありますか。 例:ボタン[青]を押したらフォントの色が青になり入力できるようになる。 マクロではなくても構いませんが、ブックは共有して使うため、出来るだけ事前の設定は無しで出来るようにしたいです。

Excel | Visual Basic・47閲覧・xmlns="http://www.w3.org/2000/svg">50

ベストアンサー

0
Ｅｘ３

2022/1/25 12:48

例えばこんな感じ・・・。 Option Explicit Private vbcol As Long Sub Sheet2_ボタン1_Click() vbcol = vbBlue Call celin End Sub Sub Sheet2_ボタン2_Click() vbcol = vbYellow Call celin End Sub Sub celin() ActiveCell.Font.Color = vbcol SendKeys "{F2}" End Sub

Ｅｘ３

2022/1/25 14:45

Sub Sheet2_ボタン1_Click() celin RGB(255, 0, 255) End Sub Sub Sheet2_ボタン2_Click() celin RGB(0, 255, 126) End Sub Function celin(vbcol As Long) ActiveCell.Font.Color = vbcol SendKeys \u0022{F2}\u0022 End Function の方が楽だったかも。

ThanksImg質問者からのお礼コメント

ありがとうございます。 こちらを参照にさせていただきます。

お礼日時：1/25 15:19