Page 646 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ INDEX ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼プルダウンの移動バーの大きさについて チャオ 03/1/28(火) 14:44 ┗Re:プルダウンの移動バーの大きさについて JuJu 03/1/28(火) 16:54 ┗Re:プルダウンの移動バーの大きさについて チャオ 03/1/28(火) 17:55 ┗Re:プルダウンの移動バーの大きさについて ポンタ 03/1/29(水) 8:44 ┗Re:プルダウンの移動バーの大きさについて チャオ 03/1/29(水) 16:08 ┗Re:プルダウンの移動バーの大きさについて ポンタ 03/1/29(水) 17:17 ┗Re:プルダウンの移動バーの大きさについて チャオ 03/1/29(水) 19:55 ┗Re:プルダウンの移動バーの大きさについて ポンタ 03/1/29(水) 20:20 ┗Re:プルダウンの移動バーの大きさについて チャオ 03/1/30(木) 14:58 ─────────────────────────────────────── ■題名 : プルダウンの移動バーの大きさについて ■名前 : チャオ ■日付 : 03/1/28(火) 14:44 -------------------------------------------------------------------------
フォームのコモンボックスなどで、プルダウンをしたときに 件数が多いと、スクロールバーのスクロールボックスが すごく細くなってしまい、ドラッグするのがむつかしくなります。 スクロールボックスを、件数に関係なく固定の大きさにはできないでしょうか。 よろしくお願いしますm(_ _)m |
チャオさん、こんにちはぁ >フォームのコモンボックスなどで、プルダウンをしたときに >件数が多いと、スクロールバーのスクロールボックスが >すごく細くなってしまい、ドラッグするのがむつかしくなります。 >スクロールボックスを、件数に関係なく固定の大きさにはできないでしょうか。 コンボボックス(ドロップダウンリスト)のことですか? あの幅は全体件数に対して表示(又はスクロール)件数の比で決まってます。 (Windowsの標準仕様ですので、あまり弄ると親和性の悪い画面になる可能性あり) 一般的にコンボボックスはある程度少ない要素を選択するのを前提に考えられてます。 リストボックスや、コンボボックスを2つ以上に分けて絞り込む等、そういう対応にはできませんか? ではではぁ |
お返事ありがとうございます。 やはり無理でしょうか。 番号順にならんでいる番号を選択するので、その幅さえ ドラッグしやすい大きさなら数が多くても選択はできるのですが。 何せ件数が、1000件単位とかになるので>< 仕様上、コンボボックスを分けるのは、無理のようです。 操作性には少し目をつむるかもです。 |
>番号順にならんでいる番号を選択するので、 コンボボックスの項目には数字しかないということですか? 私ならテキストボックスとスピンボタンを使います。 意味が違ったらスミマセン。 |
説明が中途半端ですみません。 0001 名前AAA 0002 名前BBB 0015 名前CCC 0018 名前DDD ..... 1000 名前XXX というように、名前に番号が付いているということです。 しかも、番号は飛び飛びなので、何番が何行目という指定もできません。 スクロールボックスをひっぱらなくても、スクロールバーを押しつづければ スクロールするので問題ないといえば、ないのですが。 できるのであれば、見栄えと操作性のために スクロールボックスをドラックしやすい大きさに固定したいのですが できませんでしょうか。 |
すっかり忘れたんですけど、コンボボックスには、 ListRows っていうプロパティがあるので、 それを100とかにしてみたらどうでしょう? |
たしかに、ブルダウンの表示行数を増やすと 結果的に、表示できている割合が増えるので スクロールボックスの大きさも大きくなりますが 画面の見た目上などで、そう多い件数を表示することも できませんし、件数が2000、3000と増えていくと 結局小さくなってしまいます。 全体の件数と表示可能な件数を調整してみようと思います。 ありがとうございました。 |
実はもう1つ考えたのがあるんです。 #3236で書いたテキストボックス+スピンボタンです。 ユーザーフォームにTextBox1、SpinButton1、SpinButton2、SpinButton3を作ります。 SpinButton1 をクリックすると項目1個前、または1個後ろの項目が表示されます。 SpinButton2 をクリックすると項目10個前、または10個後ろの項目が表示されます。 SpinButton3 をクリックすると項目100個前、または100個後ろの項目が表示されます。 よかったら、お試しください。 Private Sub SpinButton1_Change() TextBox1.Value = Worksheets("Sheet1").Cells(SpinButton1.Value, 1) With Application .EnableEvents = False SpinButton2.Value = Int(SpinButton1.Value / 10) SpinButton3.Value = Int(SpinButton1.Value / 100) .EnableEvents = True End With End Sub Private Sub SpinButton2_Change() On Error Resume Next SpinButton1.Value = SpinButton2.Value * 10 + SpinButton1.Value Mod 10 End Sub Private Sub SpinButton3_Change() On Error Resume Next SpinButton1.Value = SpinButton3.Value * 100 + SpinButton1.Value Mod 100 End Sub Private Sub UserForm_Initialize() ComboBox1.ListRows = 100 SpinButton1.Max = Worksheets("Sheet1").Range("A65536").End(xlUp).Row SpinButton2.Max = Int(Worksheets("Sheet1").Range("A65536").End(xlUp).Row / 10) SpinButton3.Max = Int(Worksheets("Sheet1").Range("A65536").End(xlUp).Row / 100) End Sub |
どうにか、ListRowsで調整することで、なんとかなりました。 ありがとうございました。 |