エクセルの学校：全文検索：Hyper Estraier：簡易リストボックス

Results of 1 - 1 of about 222 for 簡易リストボックス (0.005 sec.)

[[20040211174043]]: #score: 10961; @digest: 144c9fdbed298e838727ec667972cc34; @id: 5235; @mdate: 2005-09-12T16:24:56Z; @size: 2704; @type: text/plain; #keywords: ィウ (6592), 易リ (6456), ス直 (5863), ト格 (5466), nyuuryokukisoku (4557), 数s (4008), 簡易 (3432), ス] (3126), ミデ (3025), 度イ (2906), 加di (2525), myname (2419), shapes (2205), ウイ (1843), 列幅 (1840), イミ (1703), 拡大 (1559), トボ (1506), kamiya (1326), activesheet (1207), ディ (1131), リス (1105), ブセ (1058), ドウ (942), トメ (928), ボッ (893), 用語 (889), ト] (860), 規制 (814), スト (718), クス (717), ンド (624); 『簡易リストボックスの幅を拡大』（おれおれ）
簡易リストボックスでリストから選択するとき列幅にボックスの大きさが自動的に合わされ、長い文字だと一部分しか見えません。セル幅以上に拡大表示させたりするにはどうすればいいのでしょうか? ---- ショートカットメニューの「リストより選択」またはAlt+↓で表示されるものですよね。「簡易リストボックス」の用語どおり、おまけ機能的なものだと思うので、これ以上は欲張れないと思いますよ。入力のときだけ列幅を広げておくのでは不十分でしょうか。 (KAMIYA) ---- すみません、 [簡易リストボックス]は[入力規制のリスト]に私が勝手につけた名前です。 ↓[ライブラリ(e2k)簡易リストボックス] http://www.excel.studio-kazu.jp/lib/e2k/e2k.html [KAMIYA]さんの言われるように、列幅を最初から少し広めに取っておくしかないでしょう。（kazu） ---- おじゃまします。 http://park11.wakwak.com/‾miko/Excel_Note/12-01_nyuuryokukisoku.htm#12-01-12 こちらのマクロが使えるかもしれません（りな） ---- すいません、どなたかご教示願えませんでしょうか。上記、りなさんの回答のURLのマクロの中で、 Case "E1", "E2" ←ここを O列の13行からO列の62行までにするにはどのように書き換えればよろしいでしょうか。（まさ） ---- 対症療法的ですが、その前の行も手を加えます。 Select Case (.Row >= 13) * (.Row <= 62) * (.Column = 15) Case True アクティブセルのアドレス直接ではなく、アクティブセルの行番号、列番号から範囲内にあるかどうか判断させてみました。 (KAMIYA) ---- さっそくの回答ありがとうございます。うまくいきました、今後ともよろしくお願いします。（まさ） ---- 申し訳ありませんが再度質問させてください。上記の件は上手くいったのですが、ドロップダウンリストの番号のイミディウインドウで ?activesheet.shapes(1).name を見たところ、Drop Down 11 と、出たので Set s = ActiveSheet.Shapes("Drop Down 11")でよかったのですが上書き保存したら『指定したアイテムが見つかりませんでした』と怒られたので再度イミディウインドウで ?activesheet.shapes(1).name を見たところ、Drop Down 12 に変わっていました。これを回避する方法はありませんでしょうか。（まさ） ---- いったん保存したら変わらないような感じですが、下記を2行のDimステートメントの後に追加 Dim MyName As String MyName = ActiveSheet.Shapes(1).Name 変数sへのオブジェクト格納を下記のように変更 Set s = ActiveSheet.Shapes(MyName) でどうでしょう。 (KAMIYA) ---- 重ね重ねありがとうございます。上手くいきました。（まさ） ---- イミディウインドウで ?activesheet.shapes(1).name を見るってどうやるか分からないので教えてください。お願いします(山田) ---- VB画面で、Ctrlを押しながらG、あるいは、表示からイミディエイトウインドウを選択。?activesheet.shapes(1).name を入力後、エンター。 (ken) ---- ありがとうございます ...; http://www.excel.studio-kazu.jp/wiki/kazuwiki/200402/20040211174043.txt - [detail] - similar

PREV NEXT

訪問者：カウンタ