[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『ユーザーフォーム上のリストボックスについて』(miruku)
お世話をお掛けします
ご教授頂けたら幸いです
下記の様にリストボックスにシート名に配置してますが
リストボックスが長くなります
物理的に短くすると 横スクロールバーが出来てしまいます
横スクロールバーを消せれば 何でもいいですが
シート名も 日本語で5文字程度です
Private Sub UserForm_Initialize()
Dim y_sh As Worksheet
For Each y_sh In Worksheets
ListBox1.AddItem (y_sh.Name)
Next y_sh
End Sub
< 使用 Excel:Excel2010、使用 OS:Windows7 >
(まっつわん) 2017/10/19(木) 16:18
変わらなかったです
PT長さと 範囲が違うみたいです
まっつわん様
有難う御座います
別に全部表示されなくてもいいのです
14インチ ラップトップで100%表示状態で
標準の Sheet1と言う名前が13mmくらいで表示されています
しかし このリストボックス 画面上実寸で100mmぐらいの長さにしても
横のスクロールが出てしまいますので 配置のシート名の取り方が 悪いのかと考えております
(miruku) 2017/10/19(木) 17:10
または、ご提示のコードだと1列だけに見えますが、実は数列使っている(ColumnCountが1でない)、とか?
(???) 2017/10/19(木) 17:44
上手にColumnWidthsの値が反映されてなかったみたいです
50と入力した所49.95ptと自動修正されて
スクロールが消えました
有難う御座いました
狐につままれた気分です
(miruku) 2017/10/19(木) 17:56
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.