[[20110619221905]]　『オプションボタンのCaptionをセルの値にしたい』（やま）　ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

　

『オプションボタンのCaptionをセルの値にしたい』（やま）

セルA1に「東京」と入力してある場合にセルの値から
Captionに「東京」と表示されるようにしたいのですが、可能でしょうか。

---

 上がActiveXコントロール、下がフォームツールの例

 Sub BtnCaption()
    With Sheets("Sheet1")
        .OLEObjects("OptionButton1").Object.Caption = Range("A1").Value
        .OptionButtons("Option Button 1").Caption = Range("A1").Value
   End With
 End Sub

 ぶらっと立ち寄り

---

コメント返信：

---

[ 一覧(最新更新順) ]

---

YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.