[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]
『数値を入力すると“○”等を表示させるには?』(yoshi)
数値(1,2,3・・・)を入力して同じセルの表示を“○”“×”“△”・・・とさせる方法はありますでしょうか。別のセルに表示させるのは関数を使えばよいと思うのですがお入力したセルに表示させる方法を探しています。セルの表示形式で3種類は可能だと思うのですが、それ以上の種類を表示させたいのですがどなたか教えていただけませんか。よろしくお願いいたします。
Private Sub Worksheet_Change(ByVal Target As Range) Dim C As Range Application.EnableEvents = False For Each C In Target Select Case C Case "1" C.Value = "○" Case "2" C.Value = "×" Case "3" C.Value = "△" End Select Next C Application.EnableEvents = True
End Sub
種類を増やしたい場合は、下記2行を増やして下さい。 Case "N"←Nを増やす C.Value = "X"←お好きな文字をどうぞ
(りんご姫)
入力規則のリストでの入力なら、LOOKUPさん提案の方法で応用できそうですが。 [[20040319230842]] 『プルダウンから』(Kenny) (みやほりん)(-_∂)b
[ 一覧(最新更新順) ]
YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki.
Modified by kazu.