出産前後の痔にはご注意!

エクセルで、オプションボタンを配置しましたが、ボタンの大きさ自体を大きくする方法はありますでしょうか

オプションボタンを配置しましたが、ボタンが小さすぎて目立たないので
もっと大きくしたいのですが、色々試行錯誤したんぼですが。。。わからず。。。

お分かりの方、ご伝授宜しくお願い致します

「エクセルで、オプションボタンを大きく・・」の質問画像

A 回答 (3件)

VBAでは出来ません。


VB.NETなら、Paintイベントで自分でオプションボタン部品を描画することで可能ですが。

VBAで出来る方法としては、ピクチャーボックスに大きなオプションボタンの画像を表示させて、
クリックされる毎に表示するピクチャを切替えるのはどうですか?
    • good
    • 0

オプションボタン自体の大きさを変更するのは、私の知る範囲では無理だと思います。



ただ、ズームなどで200%や300%にすると、ボタンの大きさもそれなりに変わりますので、バランスを考えながら倍率を調節してみるのはいかがでしょうか。
    • good
    • 0

http://detail.chiebukuro.yahoo.co.jp/qa/question …

[コントロール ツールボックス]のオプションボタンはプロパティでフォントサイズの変更ができるみたいです。
こちらで解決しますでしょうか。

参考URL:http://detail.chiebukuro.yahoo.co.jp/qa/question …

この回答への補足

ご回答ありがとうございます
フォントサイズではなく、オプションボタン自体を大きくしたいのです
お分かりになりそうでしたらご伝授願いますでしょうか
宜しくお願い致します

補足日時:2012/04/18 17:37
    • good
    • 0

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人はこんなQ&Aも見ています

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Qチェックボックスの箱のサイズとフォントサイズは変更できるの?

こんにちわ。

エクセル2000でチェックボックスを作成したのですが、
やや、小さいのでサイズを大きくしたいのです。
ボックスサイズ、ボックスの横に入れる文字の
フォントサイズは大きくできるのでしょうか?
もし、できるのなら方法を教えてください。

よろしくおねがいします。

Aベストアンサー

コントロールツールボックスのチェックボックスならプロパティにFontがあるので変更できます。

フォームのチェックボックスやオプションボタンのフォントサイズは変更できなかったと思いますが、変更したように見せかけはできます。使用上、特に問題はないと思います。(だからダイアログにフォントがない?)

チェックボックスの位置によって、
(1)チェックボックス(四角)がセルの中央にある場合
 チェックボックスのテキストを必要な長さの空白にしてしまいます。
 チェックボックス(四角)の右横のセルにチェックボックスの説明のテキストを入れます。
 セルの書式設定でフォントが変更できます。
(2)チェックボックス(四角)をセルの境目などにセットする場合
 チェックボックスのテキストを必要な長さの空白にしてしまいます。
 図形描写からテキストボックスを選択し、チェックボックスの説明のテキストを入れます。
 テキストボックスは『線なし』にしておきます。2行で表示したりもできます。
 チェックボックスとテキストボックスを重ねて、見た目を調節します。
 テキストボックスを選択し、右クリック→順序→最背面へ移動 とします。

ご参考に。

コントロールツールボックスのチェックボックスならプロパティにFontがあるので変更できます。

フォームのチェックボックスやオプションボタンのフォントサイズは変更できなかったと思いますが、変更したように見せかけはできます。使用上、特に問題はないと思います。(だからダイアログにフォントがない?)

チェックボックスの位置によって、
(1)チェックボックス(四角)がセルの中央にある場合
 チェックボックスのテキストを必要な長さの空白にしてしまいます。
 チェックボックス(四角)の右横のセ...続きを読む

Q【Excel】ラジオボタンやチェックボックスの使い方

こんにちは
Excelのフォームを使って、セルにラジオボタンやチェックボックス、
ボタンなどを配置することができますが、形だけが配置されて、機能させることができません。

これらの使い方を教えてください。

ラジオボタンで選んだセルの内容を、別のセルに表示するといったことがやってみたいのですが、これでできますか。

Aベストアンサー

ラジオボタンの場合、
まず、グループを置いて
その上に複数のラジオボタンを置きます。
そして、その内の一つのラジオボタンの
コントロールの書式設定でリンクするセルを選ぶと
選んだラジオボタンによって数値がリンクしたセルに入ります。
その数値によって選ばれたラジオボタンが判るので、
そのセルの数値によって動作を変えるようにします。
例えば
3つのラジオボタンをセットして、それをR1にリンクさせたとします。
ラジオボタンの表示文字列は
A1,B1,C1
だとして、ラジオボタンをクリックするとD1にその選ばれたセルの内容を表示したいとします。
その場合
D1のセルに
=CHOOSE(R1,A1,B1,C1)
とすればいいです。
R1が1の時A1,2の時B1,3の時C1を選ぶという意味です。

Qエクセルのチェックボックスで3つあるうち1つチェック入れたら自動的に残りにチェック出来ないようにするには

エクセルのチェックボックスで3つあるうち1つチェック入れたら自動的に残りにチェック出来ないようにするにはどうすればよいですか?今日始めてチェックボックスを触りました…

Aベストアンサー

チェックボックスにする必要あるのかな?
そうした、単一のものしか洗濯できないのであれば
ユーザインターフェースとしてはラジオボタン(オプションボタン)
の方が適切に思えるけれど・・・。

さて、質問の件ですが、チェックボックスのクリックイベントで
EnabledプロパティをFalseに設定するとチェックが出来なくなり
Trueにするとチェックが出来るようになります。

Qチェックボックスの択一選択方法教えてください。

osはwindows98 officeはxpです。
ワード文書内にチェックボックスが3つあるとします。
今は、3つ全部にチェックを入れる事ができてしまいます。。。。3つのチェックボックスのうち一つしかチェックが入らないようにするにはどうしたら良いのでしょうか?(例えば、1にチェックが入っていて、2にチェックを入れると、1のチェックが消え、2だけにチェックがはいるようにしたいのです)どなたかご存知の方、ぜひ教えてください。お願いします。

Aベストアンサー

こんにちは、s_yoshi_6です。先ほどはどうも。

もしも、ラジオボタン(丸いボタン。Wordではオプションボタンと言ってます)でよければ、「フォーム」ツールバーではなくて、「コントロールツールボックス」ツールバーの中にあります。

挿入したい所にカーソルを置いて、「オプションボタン」のボタンをクリックすると挿入されます。
ただそのままだと、挿入したオプションボタン全てで択一になりますので、もし例えば三択が複数ある場合などは、挿入したボタンを右クリック→プロパティのGroupNameのところに適当なグループ名を記入します。このGroupNameが同じものの中で択一になります。なおボタン名は、ボタンを右クリック→オプションボタンオブジェクト→編集で変更できますので、不要であればそこで削除して下さい。

編集が終わったら最後に「コントロールツールボックス」ツールバー(または外に1つ小さくパレットが出ていると思いますが)の「デザインモードの終了」ボタン(三角定規に鉛筆)をクリックして下さい。

このボタンには色々機能を持たせることができるのですが、そのへんになるとちょっと分かりません。もしチェックをつけるだけでよければ、ちょっと試してみて下さい。

こんにちは、s_yoshi_6です。先ほどはどうも。

もしも、ラジオボタン(丸いボタン。Wordではオプションボタンと言ってます)でよければ、「フォーム」ツールバーではなくて、「コントロールツールボックス」ツールバーの中にあります。

挿入したい所にカーソルを置いて、「オプションボタン」のボタンをクリックすると挿入されます。
ただそのままだと、挿入したオプションボタン全てで択一になりますので、もし例えば三択が複数ある場合などは、挿入したボタンを右クリック→プロパティのGroupNameのところ...続きを読む

Qコマンドボタンを押すたびに大きくなってしまう

エクセル2003を使っています。
コマンドボタンを設置したのですが、押すたびに大きくなってしまいます。
エクセルを閉じても同じです。
なぜでしょうか?不思議です。
何かわかる方ご回答よろしくお願い致します。

Aベストアンサー

そのボタンを右クリックして
 プロパティ または
 書式設定→プロパティ

を確認してください。
再現の条件がなかなかわからないのですが
フィルターをかけたときに高さが変化してしまうのだとすれば、
フィルターをかけたあとにすべての行を再表示する際に広がるのだと思います。

それを防ぐには
上記のプロパティで
「サイズを変更しない」にチェックを入れてください。
添付図の赤丸の部分です。

ActiveXコントロールだと
何らかの原因による不具合がおきている可能性もあります。
わたしはほとんど経験がないのですが、昔、2003版までだとActiveXコントロールサイズの不具合の報告も多々ありました。

*画像を添付し忘れたので再送

QエクセルVBAでOptionButtonのオンオフ取得

ワークシート上に貼り付けてあるオプションボタンの状態の取得ですが、フォームのオプションボタンなら
例えば、
MsgBox ActiveSheet.OptionButtons("Option Button 44").Value で、オンなら1、オフなら-4146が返ります。
またActiveSheet.OptionButtons("Option Button 44").Value=xlOnで オンに出来ます。

ところがフォームじゃないコントロールツールボックスのオプションボタンは
MsgBox ActiveSheet.Shapes("OptionButton30").Valueでも
MsgBox ActiveSheet.Controls("OptionButton30").Valueでもエラーになります。
どうやって取得すればいいのでしょうか?
どうやてOn Off を指示すればいいのでしょうか?

Aベストアンサー

同一ワークシート内にオプションボタン1つ、コマンドボタン一つを配置して、コマンドボタンに、現在のオプションボタンの値をMSGBOXで表示させ、その後OFF(False)にするようなサンプルを作って、Excel2000で試してみました。

Private Sub CommandButton1_Click()
MsgBox OptionButton1.Value
OptionButton1.Value= False
End Sub

というコードです。
とりわけ問題なく動作しました。
LinkCellを指定するかどうか、複数配置かどうかで微妙に動作が異なるようです。

参考までに。

QエクセルのIF関数で、文字が入力されていたならば~

エクセルのIF関数で文字が入力されていたならば~、という論理式を組み立てたいと思っています。

=IF(A1="『どんな文字でも』","",+B1-C1)

A1セルに『どんな文字でも』入っていたならば、空白に。
文字が入っていなければB1セルからC1セルを引く、という状態です。

この『どんな文字でも』の部分に何を入れればいいのか教えてください。

またIF関数以外でも同様のことができれば構いません。

宜しくお願いします。

Aベストアンサー

=IF(ISTEXT(A1),"",B1-C1)

でどうでしょうか?

QExcel ラジオボタンのリセットを作りたい

http://www3.plala.or.jp/hkyoji/javascript/javano6.htm
上記サイトのようなラジオボタンをEXCELで作りましたが、
リセットするボタンの作り方がわかりません。
調べてもWebでのことしかでてきません。
ご教授よろしくお願いします。

Aベストアンサー

こんばんは。

通常では、ラジオボタン(Excelでは、オプションボタン)のリセットはしません。それは、必ず、ひとつが必ず「オン」 になるようになっているからです。あえて作るなら以下のようになります。


Private Sub CommandButton1_Click()
 For Each cnt In ActiveSheet.OLEObjects
  If TypeOf cnt.Object Is MSForms.OptionButton Then
    cnt.Object.Value = False
  End If
 Next
End Sub

Q【Excel VBA】マクロでExcel自体を終了させたい

環境:WindowsXP、Excel2003

マクロでエクセルを終了(ブックを閉じて、アプリケーション自体も終了)させたいのですが、以下のコードではアプリケーションが閉じてくれません。

ThisWorkbook.Close
ExcObj.Quit
Application.Quit

どこか悪いところはありますでしょうか?

よろしくお願いします。

Aベストアンサー

普通に考えれば質問者のコードで上手くいきそうですが
hana-hana3さんの回答にもあるようにThisWorkBook.Closeでコード終了となりますので
Application.QuitをThisWorkBook.Closeの前にもってこないといけません。
Application.Quitはそれがあるプロシージャのコードが全て終わるまで
その実行を保留するちょと特別動作をします。

'-------------------------------------
 Application.Quit
 ThisWorkbook.Close
'-------------------------------------
 
 

QEXCELファイルのカレントフォルダを取得するには?

EXCELファイルのカレントフォルダを取得するには?

C:\経理\予算.xls

D:\2005年度\予算.xls

EXCEL97ファイルがあります。

VBAで
  カレントフォルダ名
(C:\経理\,D:\2005年度\)
を取得する事は可能でしょうか?

CURDIRでは上手い方法が見つかりませんでした。

Aベストアンサー

こんばんは。
Excel97 でも、同じですね。以下で試してみてください。

Sub test()
'このブックのパス
a = ThisWorkbook.Path
'アクティブブックのパス
b = ActiveWorkbook.Path
'Excelで設定されたデフォルトパス
c = Application.DefaultFilePath
'カレントディレクトリ
d = CurDir
MsgBox "このブックのパス   : " & a & Chr(13) & _
   "アクティブブックのパス: " & b & Chr(13) & _
   "デフォルトパス    : " & c & Chr(13) & _
   "カレントディレクトリ : " & d & Chr(13)
End Sub


このQ&Aを見た人がよく見るQ&A

人気Q&Aランキング