エクセル関数教えてください。

質問

エクセル(EXCEL)で進捗管理を考えています。
横1列それぞれにひとつづつボタンをつけて、そのボタンを押すと、
ボタン内の文字列がかわる様にするのと
例：
------　------　-----
未完了＞処理中＞完了
------　------　-----
それぞれのステータスに合わせ横1列分セルの色を変化させる
関数構文を教えていただけますでしょうか。
例：
未完了(赤)：処理中(黄色)：完了(青)
そのままコピペできる形で教えていただけるとうれしいです。

勉強不足で申し訳ないのですがよろしくおねがいます。

回答No.1

めとろいと（@naktak）

未完了前と完了後にどういう動作をしたいのかは知りませんが・・・。
こんな事で良いのでしょうか。

【CommandButton1】
Private Sub CommandButton1_Click()
Call ChangeCaption(CommandButton1)

End Sub

【Module1】
Public Sub ChangeCaption(vObj_Button As CommandButton)
With vObj_Button
Select Case .Caption
Case "未完了"
.Caption = "処理中"
.ForeColor = RGB(255, 255, 0)

Case "処理中"
.Caption = "完了"
.ForeColor = RGB(0, 0, 255)

Case "完了"
.Caption = "未完了"
.ForeColor = RGB(255, 0, 0)

Case Else
.Caption = "未完了"
.ForeColor = RGB(255, 0, 0)

End Select
End With

End Sub

他に、『未完了』『処理中』『完了』以外に追加になる可能性や
文言が変わる可能性があるのなら、それなりのコーディングに変える必要があります。

お礼

ありがとうございます。たすかりました！

補足

ごめんなさい。。
再度質問させてください。
ボタンの文字カラーでなく列の色を変えるにはどうしたら
良いでしょうか。