例えばA1セルに「1」を入力するとB2セルに「いちご」と表示され、
「2」と入力すれば「ぶどう」と表示されるような、
数字を入力するとその数字に該当した文章を表示させる関数はないでしょうか?
ちなみに文章は70パターンほどあります。

なにとぞご教示のほど宜しくお願い致します。

このQ&Aに関連する最新のQ&A

A 回答 (4件)

こんにちは!


すでにNo.1さんが回答されていますので
参考程度に読んでください。

↓の画像の表の場合ですが、
A列に数値を入力するとB列に品物が表示されるようにする場合です。

B1セルに
=IF(A1="","",VLOOKUP(A1,$E$1:$F$8,2,0))
としてオートフィルで下へコピーではどうでしょうか?

以上、参考になれば幸いです。m(__)m
「Excel関数」の回答画像2
    • good
    • 0
この回答へのお礼

ご回答拝読致しました。大変参考になりました。

貴重なお時間を割いてのご回答、誠に感謝致しております。

また機会がありましたら宜しくお願い致します。

お礼日時:2009/05/27 11:53

(1)


これストレートに回答したらLOOKUP関数の利用ですよ、ありがとう、となる。しかし私はそういうのだけで終わりたくない。
70パターンもある文章の1つが決まったとして、そのコードが、即座に出てくるのですか。
もちろん多数の文字の入力の手間を省くために、別ブック(手控えメモなど)を見て、番号を探し、その番号を入力すると30文字の文字列が1度にセルに入って、助かるというケースはある。
ーー
(2)
むしろ質問者には、直ぐ手に負えないかもしれないが、多段式のコンボなどで、例えば、まづ
あいさつ文
専門分野1
専門分野2
・・
とかを(会社など従事者の)常識(本を調べるようではこの方式は不適)で選ばせ
「あいさつ文」が選ばれたら
春、夏、秋、冬を選ばせ、その後具体的文章を示し、最終決定する。酔うな方法を考えると良い。
(3)
またはVBAの知識が必要だが、先頭の一部の語句を入れると、それに続く文章を候補に出すとか、を考えると良い。
(4)
70が35ぐらいなら、入力規則ーリストで35行(1画面に出せる限界)のリストから選ぶほうが、良いかも知れない。
    • good
    • 0
この回答へのお礼

ご回答拝読致しました。大変参考になりました。

貴重なお時間を割いてのご回答、誠に感謝致しております。

また機会がありましたら宜しくお願い致します。

お礼日時:2009/05/27 11:52

あなたは70パターンの文章とそれが何番であるかを全部憶えて、バ


シッと入力できるんですか。私は無理でした。

で、tom04さんの回答のF列みたいに一覧を作りますね。それでB列に
「入力規則」を設定します。種類はリストで「元の値」はF列に作っ
た一覧を指定し、「ドロップダウンリストから選択する」とすれば
何も暗記する必要が無くなります。

vlookup関数は、リストから選択した文章が何番なのか探す時に使う
のがいいですよ。
「Excel関数」の回答画像3
    • good
    • 0
この回答へのお礼

ご回答拝読致しました。大変参考になりました。

貴重なお時間を割いてのご回答、誠に感謝致しております。

また機会がありましたら宜しくお願い致します。

お礼日時:2009/05/27 11:52

こんちゃ。



http://www.yoshikawa.co.jp/ybs/skilup/ybs0308.htm

VLOOKUP関数でいけるんじゃないっすか?
    • good
    • 0
この回答へのお礼

ご回答拝読致しました。大変参考になりました。

貴重なお時間を割いてのご回答、誠に感謝致しております。

また機会がありましたら宜しくお願い致します。

お礼日時:2009/05/27 11:53

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

このQ&Aを見た人が検索しているワード

このQ&Aと関連する良く見られている質問

Q歯を削るときなんで痛く感じるのですか? 歯を削るだけなら痛くないのに

歯を削るときなんで痛く感じるのですか?
歯を削るだけなら痛くないのに

Aベストアンサー

歯は基本的に硬組織と呼ばれる硬い結晶で出来ています。一番表面はエナメル質と呼ばれ この硬い結晶成分のみでできています。この部分は削っても痛みは全くありません。
2層目は象牙質(dentin)と呼ばれやや硬い組織で出来ています。そして歯の中央・最深部は歯髄・いわゆる神経と呼ばれる軟組織(普通の神経・血管組織)となっています。
この2層目の象牙質には 歯髄から細い繊維が入り込んでいてエナメル質直下まで 神経組織が伸びています。従って 歯を削る時にこの象牙質を削ると いっしょに神経組織まで削ってしまう事になり 強い痛みを発する事になるんです。普通 象牙質だけを削るよりも、この神経繊維の末端・つまりエナメル質と象牙質の境目を削る時の方がはるかに強く痛みを感じますねぇ~ 痛みを感じない部分から突然痛みを感じる部分に入った瞬間に急激な痛み・あの独特の痛みがあるわけです。
もちろん 歯を削る時の痛みは、神経だけの問題ではありません。タービンと呼ばれる機器・ドリルによって削る事が多いですが、この切削具の振動・回転する摩擦熱等が歯の知覚組織に伝わる事も痛みの原因となります。最近では、タービンを使わないレーザー光線による切削も多くなり、削る時の痛みは大幅に軽減されています。また、機器の振動を抑える工夫もなされており、機器の振動と似た振動を他の箇所に与える事により、痛みの閾値を上げてしまう(わかりやすく言うと 振動で神経を麻痺させて痛みを感じにくくする事)方法も行われています。

さて、通常の治療で歯を削る時は、神経のある歯(虫歯が小さい場合)や 神経を取る処置の場合、麻酔を使うことがほとんどでしょう。
えまく麻酔が効けば 痛みは全く感じなくなります。ただ、歯科の麻酔は歯の神経を麻痺させねばなりません。歯の神経の出口は 歯の根の先端・つまり骨の中にあるんです。
これを麻酔することはなかなかに難しい事なんです。普通 顎の骨は硬く厚い骨が多く なかなか麻酔薬が内部に浸潤してくれません。かなりの力を入れて圧力をかけないと 硬い骨を通り越してくれませんので、歯科の麻酔はそれだけでも痛いのです(^o^;...この時 骨の厚さによって麻酔が効く効かないが別れますね~
実は同じように 歯のエナメル質の厚さによっても削る時の痛みに差があるのです。例えば同じ歯でも、切端部・先っぽの方はエナメル質が厚いので少々削っても痛みません。逆に根元に近い部分はエナメル質が薄く 象牙質がすぐ直下にあるために痛みが感じやすいと言えます。
また、年齢によっても痛み方に大きな差があります。歯は生えたばかりはまだ幼弱で 歯髄が大きく象牙質が薄いのです。それだけ削る時に神経に近くなってしまい痛みが出やすいですねぇ~
逆に生えてから何十年も経った歯は・・・・つまり老人の歯は 多少削っても痛みません。これは長い間に神経が退化したり象牙質が石灰化して硬化したために 痛みを感じる神経が退化して・あるいは無くなってしまったからです。麻酔を使わずにどんなに削っても 全く痛まないことも しばしばあります。

いずけにしても痛みの感じ方には大きな個人差があります。痛いと感じたなら 左手を挙げて・・・・・ヽ(;^^)/ まぁ、歯科医師にお伝え下さい。

歯は基本的に硬組織と呼ばれる硬い結晶で出来ています。一番表面はエナメル質と呼ばれ この硬い結晶成分のみでできています。この部分は削っても痛みは全くありません。
2層目は象牙質(dentin)と呼ばれやや硬い組織で出来ています。そして歯の中央・最深部は歯髄・いわゆる神経と呼ばれる軟組織(普通の神経・血管組織)となっています。
この2層目の象牙質には 歯髄から細い繊維が入り込んでいてエナメル質直下まで 神経組織が伸びています。従って 歯を削る時にこの象牙質を削ると いっしょに神経組織...続きを読む

Q個々のセルに入力した数字の合計を別のセルに一桁ずつ表示する方法

こんばんは。いつも大変お世話になります。
なかなか良い関数の使い方が思いつかず、また皆様のお知恵を貸していただければと思い、質問させて頂きます。

E1に「3」、F1に「5」、G1に「7」 今日の売上値とする
H1に「9」、I1に「7」、J1に「5」 昨日の売上値とする
※ G1,J1は百の位 F1,I1は千の位 E1,H1は万の位です
この合計値をA1(万の位)、B1(千の位)、C1(百の位)にそれぞれ出したいのです。
この場合だとA1に「13」、B1に「3」、C1に「2」となります。

上記のような事をしたいのですが、可能でしょうか?
申し訳ありませんが、何とぞよろしくお願いします。

Aベストアンサー

こんばんは

何通りか記載します

1案 一旦文字列にしてから計算

A1 =INT(((E1&F1&G1)+(H1&I1&J1))/100)
B1 =INT(MOD(((E1&F1&G1)+(H1&I1&J1)),100)/10)
C1 =MOD(((E1&F1&G1)+(H1&I1&J1)),10)

実際は入力エラーチェックの式を付加する必要があります。

2案 こちらは数値に忠実な処理

A1 =INT((SUM(E1,H1)*100+SUM(F1,I1)*10+SUM(G1,J1))/100)
B1 =INT(MOD(SUM(E1,H1)*100+SUM(F1,I1)*10+SUM(G1,J1),100)/10)
C1 =MOD(SUM(E1,H1)*100+SUM(F1,I1)*10+SUM(G1,J1),10)

3案 配列数式

A1 =INT(SUMPRODUCT(E1:J1*{1,0.1,0.01,1,0.1,0.01}))
B1 =INT(MOD(SUMPRODUCT(E1:J1*{0,1,0.1,0,1,0.1}),10))
C1 =MOD(SUMPRODUCT(E1:J1*{0,0,1,0,0,1}),10)

こんばんは

何通りか記載します

1案 一旦文字列にしてから計算

A1 =INT(((E1&F1&G1)+(H1&I1&J1))/100)
B1 =INT(MOD(((E1&F1&G1)+(H1&I1&J1)),100)/10)
C1 =MOD(((E1&F1&G1)+(H1&I1&J1)),10)

実際は入力エラーチェックの式を付加する必要があります。

2案 こちらは数値に忠実な処理

A1 =INT((SUM(E1,H1)*100+SUM(F1,I1)*10+SUM(G1,J1))/100)
B1 =INT(MOD(SUM(E1,H1)*100+SUM(F1,I1)*10+SUM(G1,J1),100)/10)
C1 =MOD(SUM(E1,H1)*100+SUM(F1,I1)*10+SUM(G1,J1),10)

...続きを読む

Q歯を削る(レーザー、カリソルブ、水流、ドリル)比較について

【質問・要点】
昨日、インレーが取れました。そこで、少し削って新しいインレーを入れると思うのですが、以下4つを考えたのですが、いったい、どれが最も良い治療法なのでしょうか?

レーザー
カリソルブ
水流で削る
ドリルで削る

【一応私が考える判断基準】
最も歯を削る体積が小さい治療法、
術後、2次齲蝕が最も少ない治療法
最も痛くない治療法

他に、もっと良い治療法やアドバイスがあれば、ご教示、何卒、宜しくお願い致します。

Aベストアンサー

歯科医です。
>レーザー
>カリソルブ
>水流で削る
>ドリルで削る
沢山質問されていますが
ここでまとめて。
まず、レーザーでインレーが入れられるほど削るのはできないです。削除量が圧倒的にすくなくて、綺麗な形態に削ることができないから。
カリソルブも同様です。
水流で削るのは歯に対して現在そういう器具はありません。
ドリルで削る・・・・ドリルというのは恐らくエアタービンもしくはエンジンのどちらかをさしておられる
のでしょうか。タービンで削ることが一番でしょうね。

インレーがはずれたのではなく
新しい虫歯であるのなら削除量のことを考える余地があります。しかし
何分にもすでにインレーの体積分は歯が失われているので
削除量を少なくする事に意義は見出せません。
さらに虫歯になっていなければ大抵の場合はほとんど削らなくてもよいでしょう。
取れたところがさらに虫歯になっているのであれば
削除量云々言う前に
虫歯をとりさることが肝要です。二次カリエスにならないためにはこれがもっとも大切なことです。
痛くない治療法・・・は麻酔を的確に使用して治療することでしょう。

それから
インレーはわりと易しい技工物ですので
一般的なレベルの技工士さんであれば
十分な適合の良いきれいなインレーを作りますよ。

異種金属が口腔内にあることの是非は討論の余地があるのですが
一般的に言って
接しているところでなければ
大きな問題はおきないです。
接するところではそこに小さな電池ができるようなものなので
電流が流れます。

それよりなにより
一日も早く治療を受けてください。
放置しておくことに良い点は一つもありません。

歯科医です。
>レーザー
>カリソルブ
>水流で削る
>ドリルで削る
沢山質問されていますが
ここでまとめて。
まず、レーザーでインレーが入れられるほど削るのはできないです。削除量が圧倒的にすくなくて、綺麗な形態に削ることができないから。
カリソルブも同様です。
水流で削るのは歯に対して現在そういう器具はありません。
ドリルで削る・・・・ドリルというのは恐らくエアタービンもしくはエンジンのどちらかをさしておられる
のでしょうか。タービンで削ることが一番でしょうね。

イン...続きを読む

QExcel:ひとつのセルに入力されている複数桁の数字を他のセルに分けて自動表示

Excelで例えばSheet1!A1に「123456」と入力されると、Sheet2!A1に「1」、Sheet2!A2に「2」、Sheet2!A3に「3」、Sheet2!A4に「4」、Sheet2!A5に「5」、Sheet2!A6に「6」、と表示させることは可能でしょうか?
もし可能であれば方法をご教示頂けませんか?

なお、Sheet1!A1に入力する文字種は数字以外はありません。
また、最大7桁で、それ以上の桁になることはありません。
同時にSheet1!A1に入力可能な桁数を7桁までに制限させるようにもしたいです。

よろしくお願いいたします。

Aベストアンサー

> 表示させることは可能でしょうか?
=MID(Sheet1!$C17,1,1)

> 7桁までに制限させるようにもしたい
データ(D)→入力規則(L)→設定
入力値の種類(A): 整数
データ(D): 次の値の間
として、最小値(M)および最大値(X)を指定する。

Q勉強の為に睡眠削るのは確かにダメですが 勉強スケジュール上、このままでは間に合わないという状況では、

勉強の為に睡眠削るのは確かにダメですが
勉強スケジュール上、このままでは間に合わないという状況では、削るのは仕方なくないですか?エナジードリンクなり、使って

Aベストアンサー

まあその前に 遊びの時間は削るはな
その上で足りなければ トイレの時間中や バスや電車の移動中 そして場合によると食事中なども勉強する。
それでも足りない時は 睡眠5時間とかになるかな。

コーヒー 音楽 エナジードリンク ハーブ 辛い食べ物 いろいろ使いながら。
最低必要な睡眠時間ってのは人によっても違うが 短期的なら4時間睡眠でも案外行けると思う。
ただ 何というか 考え方が狭くなるように思う。
ヒラメキが出ないのだな。

別に問題はないと思うのだ。
こういう経験も大切だし 焦りさえしなければ十分得るものはある。
脳にも緩急は必要だし 時にフルスロットルも良い・・が あまり長くやると痛む。

よほど深く眠らないと4時間で2週間以上続けるのは難しかった。
そして6時間程度寝ないと 自律神経系は慣れでなんとかなるみたいなんだが どうもホルモンバランスが悪くなる感じ。
そこは注意すべきかと。

Qエクセルであるセルに数字を入力すると他のセルのデーターから文字が入力


sheet1
  A
1 1→1を入力するとsheet2に入力されているデーター
    から、該当する番号を判断して、東京とセル内に
    表示する

sheet2
  A B
1 1 東京
2 2 千葉
3 3 埼玉
行はまだ下に続く

こんな事をしたいのですが、ご教授お願いします

Aベストアンサー

質問のような動きをするようにしてみました。

ツール→マクロ→Visual Basic Editor でVBE画面に移り、 表示→プロジェクトエクスプローラでプロジェクトエクスプローラを表示します。
プロジェクトエクスプローラのSheet1をダブルクリック。出てきたコードウインドウに下記マクロをコピーして貼り付けます。

ここから

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
  Dim rg As Range 'セル
  Dim rgfnd As Range '見つけたセル

  On Error GoTo ErrorHandler

  Application.EnableEvents = False
  For Each rg In Target
    'Sheet1のA列なら
    If rg.Column = 1 Then
      'Sheet2を検索
      Set rgfnd = Worksheets("Sheet2").Range("A:A").Find(rg.Text)

      If Not rgfnd Is Nothing Then
        '見つかったら書き換える
        rg = rgfnd.Offset(0, 1).Text
        Set rgfnd = Nothing
      Else
        rg = rg.Text & ":nothing"
      End If
    End If
  Next
  Application.EnableEvents = True

  Exit Sub
ErrorHandler:
  'エラー対応
  Application.EnableEvents = True
End Sub

質問のような動きをするようにしてみました。

ツール→マクロ→Visual Basic Editor でVBE画面に移り、 表示→プロジェクトエクスプローラでプロジェクトエクスプローラを表示します。
プロジェクトエクスプローラのSheet1をダブルクリック。出てきたコードウインドウに下記マクロをコピーして貼り付けます。

ここから

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
  Dim rg As Range 'セル
  Dim rgfnd As Range '見つけたセル

  On Error GoTo ErrorHandler

  ...続きを読む

Q固定された木材を削る道具は?

部屋のドアを、内開きから外開きに変える計画を立てています。上、左右のドア枠は内側と外側のサイズが同じなのですが、下側のドア枠は削る必要があります。ドアと枠は共に木製です。
そこで質問なのですが、ドア枠のように固定された木材を削る道具は、どういったものが最適でしょうか?
回答、よろしくお願いします。

Aベストアンサー

こんにちは。
どれくらい削るかにもよりますが。

ごくわずかであれば、電動〈仕上げ)サンダーっていう、電動紙やすりみたいな機械があります。
レンタルしてるかもしれないですね。

カンナを使うなら、角は(何種類かの目の粗さの)木工ヤスリを使って、仕上げは紙やすりで。

ところで、ドアの方を削るわけにはいかないんでしょうか?
大工さんが間違えてドア枠を作って取り付けてしまった時に、ドア下部を削ってましたよ。(^^;
問題がなければ、ドアを削った方が得策かと思いますが。

Qエクセルでセルに数字を入力すると、別のセルに入力されている文字の色を変える方法

例えば、シート1のM4に1~5の数字をどれか一つ入力すると、同じシートのA3にもともと入力されている文字(黒色)を(赤色)に自動で変える方法を教えてください。よろしくお願いします

Aベストアンサー

まず、ご自分ではどの程度お調べになったのでしょうか?
やっていて行き詰ったのなら、ここまでやりましたがここがわかりません、というような質問をされる方がいいですよ。

それと、条件が少し曖昧なのですが

>1~5の数字をどれか一つ入力すると

とありますが、「1,2,3,4,5」のどれでもいいということですか?それとも、何か条件分けがあるのでしょうか?
M4には他の文字や数値を入力する可能性があるのでしょうか?

あー、もし入力規則でやっていてわからないということでしたらスルーして下さい。

Q歯を削る時痛かったを英語で?

教えて頂きたいのですが、歯医者さんで虫歯を削る時に痛かったと英語で言いたいのですが
I was pain when I shave bat tooh.
であってますか?
削るというのもshaveでいいのかわからないのですが、いい単語があれば教えて頂きたいです!

Aベストアンサー

こんにちは。4/11のご質問ではお礼のお返事を有難うございまして。

ご質問:
<I was pain when I shave bat tooh.であってますか?>

以下の点で訂正を要します。

1.I=painではないのでbe動詞はここでは不適です。

2.動詞はhadなどを使って、
I had a pain「痛みがあった」→「痛かった」
とするのが自然です。

3.shaveはどちらかというと「削ぎ落とす」「削ぐ」の意味に近くなります。歯医者でいう「削る」とは、「穴をあけること」ですから、ここはdrillが適切です。

4.I shave:「私が削る」のではないので、ここでは使役動詞haveなどを使って「削ってもらう」にします。
例:
I have my tooth drilled.
「私の歯を、削らせる」→「削ってもらう」

ここでdrilledと過去分詞になっているのは、目的語Oであるmy toothと、補語Cであるdrilledの関係が、受動の関係になるからです。
例:
my tooth is drilled「歯が、削られる」

5.虫歯はbad toothと綴りを正します。

6.以上を踏まえて原文に忠実な訂正例は
I had a pain when I had my tooth drilled by dentist.
「歯医者に歯を削ってもらった時、痛かった」
となります。

7.他にも以下のような表現もあります。
I felt some pain when I had my tooth drilled.
「歯医者に歯を削ってもらった時、少し痛かった」

以上ご参考までに。

こんにちは。4/11のご質問ではお礼のお返事を有難うございまして。

ご質問:
<I was pain when I shave bat tooh.であってますか?>

以下の点で訂正を要します。

1.I=painではないのでbe動詞はここでは不適です。

2.動詞はhadなどを使って、
I had a pain「痛みがあった」→「痛かった」
とするのが自然です。

3.shaveはどちらかというと「削ぎ落とす」「削ぐ」の意味に近くなります。歯医者でいう「削る」とは、「穴をあけること」ですから、ここはdrillが適切です。

4.I shave...続きを読む

QA1セルにAと入力すると、A2セルに3000A3セルに2000A4セルに1000と表示させたい。

A1セルに「A」と入力する1回だけで、
A2セルに「3000」
A3セルに「2000」
A4セルに「1000」
A5セルに「合計数字」を表示させたいのですが、
式をご教授願いたいです。

よろしくお願いします。

Aベストアンサー

D1:G3
A500030001000
B500300130
C1200800300
A1にA,B,Cのどれかを入れる。
A2に =VLOOKUP($A$1,$D$1:$G$2,ROW(),FALSE)と入れて、
A4まで(G-D-1列数だけの行数)式を複写する。
結果
A1がBの場合A1:A4は
B
500
300
130

A1の空白の場合に対処して
=IF(A1="","",VLOOKUP($A$1,$D$1:$G$2,ROW(),FALSE))
が良いでしょう。
(既回答とほぼ同じ式ですが、1箇所違うところがあります。)


人気Q&Aランキング

おすすめ情報