エクセルの入力について

質問

エクセルで下記のような事はできますか？マクロのマの字も知らない私でも簡単にできる方法があれば是非教えてください。
まずＡ１のセルをアクティブにすると犬、猫、鳥のどれを入力するか選べて、犬を選ぶとＡ２のセルにはポチと自動的に入り、猫を選ぶとＡ２はタマになり、鳥だと九ちゃんと入力される
というような感じにしたいのですが・・・

回答No.3

TTak · ベストアンサー

VBAを使わずにできます
1) まずデータベースを作ります。
　　セルC1に犬、C2に猫、C3に鳥
　　セルD1にぽち、D2にたま、D3に九ちゃん
　と入力します。
2)セルA1をクリックして、メニューから[データ]＞[入力規制]を選択します
3) 表示されたデータ入力規制ダイアログの"設定"タブにある"入力値の値"のドロップダウンリストから"リスト"を選択し、その下の"元の値"の所に
=$C$1:$C$3
と入力し、[OK]をクリックしてダイアログを閉じます。
4)セルA2に
=INDEX(D1:D3,MATCH(A1,C1:C3,))
と入力します。

これで、お望みのことはできます。

お礼

望み通りのことが簡単に出来ました。嬉しいです。有難うございました。

回答No.5

nihonjinn

どれもマクロを使わないで出来ると思います。
>Ａ１のセルをアクティブにすると犬、猫、鳥のどれを入力するか選べて
これはデータ→入力規則のリストで設定してやればいいと思います。
>犬を選ぶとＡ２のセルにはポチと自動的に入りーーー
例えばC列に犬、猫、鳥ーーといれ、D列にはA列に対応してポチ、タマ、九ちゃん－－と入れてリスト範囲の名前を「リスト」とでも名前を付けておきます。リストは昇順で並べ替えしておいてください。Sheet1のA2には
=IF(ISNA(VLOOKUP(A1,リスト,2,0)),"",VLOOKUP(A1,リスト,2,0))
と入れればいいです。

お礼

有難うございました。
きっと難しい方法で私には出来ないと思い込んでいましたが・・。皆さんに感謝いたします。

回答No.4

maruru01

こんにちは。maruru01です。

どこか邪魔にならない場所（別のシートでもOK）に、3行2列の範囲で、

犬　ポチ
猫　タマ
鳥　九ちゃん

と表を入力します。
そうしたら、1列目（犬、猫、鳥）の3つのセルを選択して、[Ctrl]を押しながら[F3]を押すと、[名前の定義]ダイアログボックスが表示されますので、名前を適当に付けて[OK]します。
（仮に、「種類」とします。）
今度は、表全体（3行2列）を範囲選択して同様に、[Ctrl]＋[F3]で[名前の定義]ダイアログボックスを表示し、名前を適当に付けます。
（仮に、「名前」とします。）
そうしたら、A1を選択して、メニューの[データ]→[入力規則]で、[データの入力規則]ダイアログボックスを表示します。
そこで、[設定]タブをクリックして、
[入力値の種類]：「リスト」
[元の値]：「=種類」
と設定して[OK]します。

次に、A2に、

=IF(LEN(A1)=0,"",VLOOKUP(A1,名前,2,FALSE))

と入力します。

これで、A1を選択すると、セルの右端にプルダウンボタン（▼）が表示され、クリックすると、「種類」のデータ（犬、猫、鳥）がリスト表示され、値を選択出来ます。
A1でどれかを選択すると、対応する名前（ポチ、タマ、九ちゃん）が自動的に表示されます。

お礼

ｍａｒｕｒｕ０１さん、ありがとうございました。

回答No.2

junijuni

結論から言うとできます、が簡単かなぁ…。
まず、A1をアクティブにすると…ですが、
A1を選択して、「データ」－「入力規則」でデータの入力規則ダイアログを表示させましょう。
入力値の種類を「リスト」にして、
元の値に「犬,猫,鳥」と入力。
ドロップダウンリストから選択する、がチェックになってることを確認しましょう。

で、犬を選ぶとA2に…は、
A2に以下の式を入力すればOKです。
=IF(A1="犬","ポチ",IF(A1="猫","タマ",IF(A1="鳥","九ちゃん","")))

応用は…頑張ってください。

お礼

頑張ります。有難うございました。

回答No.1

shigechama

初心者なので、もっといい方法があったらごめんなさい。

Ａ１に犬、Ａ２に猫、Ａ３に鳥と入力しておけば、
Ａ４以下のセルをアクティブにして右クリックでリストから選択を選ぶと
犬、猫、鳥と表示されるので、必要なものを選択すると、
それが表示されます。

Ｂ１にポチ、Ｂ２にタマ、Ｂ３に九ちゃんと入力しておきます。
Ｂ４にＶＬＯＯＫＵＰ関数を使って、
検索値をＡ４、範囲をＡ１からＢ３で絶対参照（Ｆ４）、
列番号を２、検索の形を０にしておき、下までコピーします。
Ａ４以下に犬と入れればＢ４以下にポチ（猫や鳥も同様）と表示されます。

お礼

早速のお答え有難うございました。