Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12768 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【8472】リストボックスのフォントサイズ Ko 03/10/18(土) 12:12 質問
【8473】Re:リストボックスのフォントサイズ INA 03/10/18(土) 13:20 回答
【8474】Re:リストボックスのフォントサイズ Ko 03/10/18(土) 14:21 質問
【8475】Re:リストボックスのフォントサイズ INA 03/10/18(土) 14:59 回答
【8479】Re:リストボックスのフォントサイズ Ko 03/10/18(土) 19:09 質問
【8483】Re:リストボックスのフォントサイズ INA 03/10/19(日) 0:01 回答
【8597】Re:リストボックスのフォントサイズ Ko 03/10/25(土) 17:28 質問
【8598】Re:リストボックスのフォントサイズ INA 03/10/25(土) 18:59 回答
【8787】Re:リストボックスのフォントサイズ Ko 03/11/3(月) 13:39 お礼
【8472】リストボックスのフォントサイズ
質問  Ko  - 03/10/18(土) 12:12 -
引用なし
パスワード
   ワークシート上のリストボックスのフォントサイズを変更するにはどうしたらよいでしょうか。
【8473】Re:リストボックスのフォントサイズ
回答  INA  - 03/10/18(土) 13:20 -
引用なし
パスワード
   Fontプロパティで設定できます。
【8474】Re:リストボックスのフォントサイズ
質問  Ko  - 03/10/18(土) 14:21 -
引用なし
パスワード
   ▼INA さん：
>Fontプロパティで設定できます。

ご回答ありがとうございます。
下記のようにFontプロパティを使い設定しようとしてみたのですがうまく出来ません。
自分が書いたマクロは、
　・
　・
　　Set TEN= ActiveSheet.Shapes.AddFormControl(xlListBox, 428, 39, 66, 130)
　　TEN.Name = "TEN_List"
　　TEN.Font.Size = 15　　←ここでエラーとなる
　　TEN.OnAction = "GetTEN"
　・
　・
というものです。
Fontプロパティはどうやって使ったら良いのでしょうか。ご教授下さい。
よろしくお願いします。
【8475】Re:リストボックスのフォントサイズ
回答  INA  - 03/10/18(土) 14:59 -
引用なし
パスワード
   何のリストボックスかわかりませんが、
コントロールツールボックスのリストボックスであれば、
右クリックしてプロパティを表示すると、Fontという項目があります。
その項目でフォントやサイズ等が選択できます。
【8479】Re:リストボックスのフォントサイズ
質問  Ko  - 03/10/18(土) 19:09 -
引用なし
パスワード
   今回作成したいリストボックスは、AddFormControlで作るMicosoft Excel コントロールです。
　セルを右クリックするとリストボックスが現れて値を選択できるというスクリプトを書いたのですが、シート全体を見渡すために縮小表示しているとリストボックスの文字が小さく読みにくいので何とか文字を大きくしようと努力しているところです。ユーザーフォームを使えば何とかなりそうですし機能的には問題ないのですが枠線やｘボタンがあるのであまり使いたくはないのです。Micosoft Excel コントロールでは出来ないのでしょうか。
　何かヒントがありましたら教えてください。
　
【8483】Re:リストボックスのフォントサイズ
回答  INA  - 03/10/19(日) 0:01 -
引用なし
パスワード
   >Micosoft Excel コントロール
EXCELのバージョンは何でしょうか？
Excel2000より前バージョンは、よく分からないのですが・・・
【8597】Re:リストボックスのフォントサイズ
質問  Ko E-MAIL  - 03/10/25(土) 17:28 -
引用なし
パスワード
   「Micosoft Excel コントロール」という名称は、Microsoft Visual Basicヘルプの中に出てきた名前で、一般的にどう呼ばれているのかはわかりません。EXCELのバージョンは、2002です。

　現在は、Micosoft Excel コントロールのリストボックスのフォントサイズを変更するのは保留して、ActiveX のリストボックスでやってみています。こちらではフォントサイズの変更は出来るのですが、リスボックスのクリックイベントの処理方法でつまづいています。各シート（同様式のシート３０枚ほどある）それぞれには、イベント処理（ListBox1_Click()）が記述できるのですが一括して処理する方法がわかりません。ご存知でしたら教えてください。
　
【8598】Re:リストボックスのフォントサイズ
回答  INA  - 03/10/25(土) 18:59 -
引用なし
パスワード
   >「Micosoft Excel コントロール」という名称は、
>Microsoft Visual Basicヘルプの中に出てきた名前で、
>一般的にどう呼ばれているのかはわかりません。
シート上で使用するコントロールは、ツールバーの名称を使うのが一般的です。　
コントロールツールボックスやフォームなどです。

>ActiveX のリストボックスでやってみています。
>こちらではフォントサイズの変更は出来るのですが、
>リスボックスのクリックイベントの処理方法でつまづいています。
>各シート（同様式のシート３０枚ほどある）それぞれには、
>イベント処理（ListBox1_Click()）が記述できるのですが一括して
>処理する方法がわかりません。

各シートモジュールで
Private Sub ListBox1_Click()
　Call Sample
End Sub

標準モジュールで
Sub Sample()
　Msgbox Activesheet.Name & "のリストボックスがクリックされました。"
End Sub

こんな感じでしょうか？
【8787】Re:リストボックスのフォントサイズ
お礼  Ko  - 03/11/3(月) 13:39 -
引用なし
パスワード
   INAさん、ありがとうございました。

なんとか思い通りに動くマクロに仕上がりました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12768 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free