[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『簡易リストボックスの使用方法』(あゆ&ゆか)
はじめまして、初めて質問させていただきます。
本HPのライブラリを拝見し、簡易リストボックスの使用方法がわかりました。
そこで、質問です。
「元の値」を
1:東京都
2:千葉県
3:神奈川県
とした場合に、「1:東京都」を選択したらセルに「1」のみが入力されるようにはできないでしょうか。
もしできない場合、「入力時メッセージ」に
1:東京都
2:千葉県
3:神奈川県
と表示させ、元の値は単純に
1
2
3
とするつもりなのですが、複数のセルに様々な「入力時メッセージ」を設定しても、表示はされても表示位置がすべて同じになってしまいます。
セルにカーソルをあてたときに、すぐそばにメッセージが出るようにはできないでしょうか。
どうかご教授よろしくお願いいたします。
以下のLOOKUPさんの紹介手法が参考になると思います。 [[20040319230842]] 『プルダウンから』(Kenny) (みやほりん)(-_∂)b『簡易リストボックスの使用方法』(あゆ&ゆか)
「たとえば、A〜CでプルダウンをA1に作り、B1に結果を出す。 」
とありますが、プルダウンが現れるセルと同一のセルに結果を出したいのですが。
方法はありますでしょうか。
どうぞよろしくお願いいたします。
>申し訳ありません。今までのログを消してしまいました。 復元は、kazuさんにしてもらうとして、、、
みやほりんさんが、下記の過去ログを紹介していました。 [[20040319230842]] 『プルダウンから』(Kenny)
(キリキ)(〃⌒o⌒)b
vbaです。
シートモジュールに貼り付けてください。
Private Sub Worksheet_Change(ByVal Target As Range) With Target If .Cells(1, 1).Address(0, 0) = "A1" Then Application.EnableEvents = False .Value = Left(.Value, 1) Application.EnableEvents = True End If End With End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range) With Target If .Cells(1, 1).Address(0, 0) = "A1" Then With .Validation .Delete .Add Type:=xlValidateList, Formula1:="=$B$1:$B$3" End With End If End With End Sub (seiya)
先に紹介されている過去ログの最後のLOOKUPさんの手法をお試しください。 入力規則の元のリストとなるセル範囲で表示形式の書式設定でユーザー定義の 書式文字列を 1:東京都::: 2:千葉県;;; 3:神奈川;;; と設定し、セルにはそれぞれ1、2、3 と入力しておきますと、 プルダウンリストには表示形式による表示が優先表示され、 選択確定時にはリストに実際に入力されている値が表示されます。 (みやほりん)(-_∂)b #間違って書き込みを消してしまった場合は、むしろ放っておいてください。 #常連有志が書き込み復活してくれる場合があります。
遅くなりました、復元しました。 (kazu)2006/02/04 13:31
先日は、皆様ありがとうございました。
恐縮ですが、また「リストボックス」について質問させていただきます。
リストボックスの幅は変えられるのでしょうか。
セルそのものの幅を変えない限り、リストボックスでプルダウンしたリストの文字が
全て表示されません。
ところが、いくつか作成したリストボックスのうち、あるセルだけは幅は短くても
構わないのに、他のリストボックスより幅が広くなってたりします。
何か法則でもあるのでしょうか。
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.