エクセルでセルの位置を未知数に出来ますか？

質問

エクセル２０００を使用しています。
先日本を買って調べようとしたんですけどどこを見てよいやらさっぱり分からないので詳しい方ご教授ねがいます。

エクセルの位置（つまり,行と列）の部分をＡやＢなどの未知数に設定することは出来ないでしょうか？

たとえば、あらかじめＡ１～１０にデータ値を入力しておいて、
Ｂ１の値が「５」だったら、「Ａ５＋１００」の答えをＣ１に表示せよ。

というときに、Ｃ１に入る式は、Ａ１の１の部分をＢ１の未知数にして「＝ＡＢ１＋１００」　ではうごかないですよね。

どうすればよいのでしょうか？

説明がへたなので分かりにくいかもしれませんが、できるだけ補足いたしますので、おしえて下さい。

回答No.8

kazuhiko5681 · ベストアンサー

早速の補足有難うございます。マクロで簡単に実行することができます。
次のように操作してみて下さい。

１．新規ブックを開き、ＡＬＴ＋Ｆ１１キーを押してＶＢＥ画面を開く。
２．画面左上にあるVBAProjectの下のSheet1をダブルクリックし、右側の白い部分に下記のコードをコピー・ペーストする。
３．再びＡＬＴ＋Ｆ１１キーを押してエクセルの画面にもどる

シート１のＡ１・Ａ２・Ａ３に適当な数字を入力してみて下さい。どれかに０が入力されていると０をＤ１に表示し、そうでなければＡ１～Ｃ１の合計がＤ１に表示されます。

Private Sub Worksheet_Change(ByVal Target As Range)

Dim myRow As Long

myRow = Target.Row
If Target.Address = Range("C" & myRow).Address Then
If Target.Offset(0, -2).Value = 0 Or Target.Offset(0, -1).Value = 0 Or Target.Value = 0 Then
Target.Offset(0, 1).Value = 0

Else
Target.Offset(0, 1).Value = Target.Offset(0, -2).Value + Target.Offset(0, -1).Value + Target.Value
End If
End If

End Sub

お礼

お手数をおかけしました。さっそく実行してみます！
命令とルールを覚えれば出来そうですね。
むかしむかし、MSXのベーシックをやっておりましたので、何となく意味は分かるような気がします。

エクセルの機能を細かく覚えるよりも、マクロを使った方がやりやすいような気がします。

本を見ても、例が自分のニーズにあっていないの理解しにくいですが、これはまさに自分のニーズなのでとっつきやすく勉強できそうです！

ありがとうございました！！

回答No.9

taisuke555

kazuhiko5681さんへ

No.8の補足に対する、No.9のマクロですが、

D1セルに
=IF(OR(A1=0,B1=0,C1=0),0,A1+B1+C1)
でいいような気もするのですが？

マクロについてどういうものか教えているのでしたらすみません。

お礼

satumaimoです。ご回答ありがとうございます。kazuhiko5681にはマクロについての作り方の例を教えていただいておりました。

マクロを使わなくてもIFで出来るんですね。
頭が悪いもので、そのような式を思いつきませんでした。
IFは使いようで便利なものですね。参考になりました。

ありがとうございます！！

回答No.7

kazuhiko5681

はじめまして。
もし私でよろしければ、サンプルマクロを作ってみたいと思います。
マクロを使えば、手数なく簡単に実行することができます。
もしご希望の節は、あなた様のおやりになりたいことを詳しく具体的に教えて下さい。
お手数をおかけいたしますが、よろしくお願いいたします。

お礼

＞お手数をおかけ・・・・

なんてとんでもないです。こちらこそ、簡単な質問をしてしまいお手数をおかけしております。前の方々のご回答により、ＯＦＦＳＥＴで解決できそうです。
でも、マクロには興味があります。何かプログラムのようなもので動かすんですよね？
別の質問になってしまいますが、こんなときはどうでしょう？

Ｄ１にＡ１＋Ｂ１＋Ｃ１の答えを表示するとき、もし、Ａ1～Ｃ1のどれか1つでも０（ゼロ）が入っていたらＤ１の答えを０（ゼロ）または別の表示　したい。

なんてときです。私の持っている知識では到底出来ません。
もし、お時間がありましたら宜しくお願いします。

回答No.6

shelf_town

３つの方法が出ましたね。
(1)OFFSET関数を使用
(2)マクロを使用
(3)INDIRECT関数を使用

(1)OFFSET関数の場合、A1～A10の範囲がA11～A20になった場合、起点をA11に変更し、
　B1には常に1～10を指定することになります。

(2)マクロを使用すると、マクロを起動しなくてはならないのでB1に値を入れた後
　ボタンを押すなり、メニューからマクロを呼び出すなりしなくてはなりません。

(3)INDIRECT関数の場合、A1～A10の範囲がA11～A20になった場合、B1に指定する値が
　11～20に変化します。もっとも直感的でわかりやすいでしょう。

どれがいいかは好みや使う目的にあわせるとよいでしょう。

お礼

初心者なので出来るかどうか分かりませんが、この場合（１）で出来るかと思います。（２）、（３）も参考になりました。

ありがとうございました。

回答No.5

imogasi

#1,#2回答は難しいですが、
質問のケースなら、Ｃ１セルに関数
=if(B1=5,A5+100,"")で良いのではありませんか。
Ｂ１が５でない時のことは質問に述べてないので、値を入れない、にしています。
ＩＦで聞く部分のＢ１＝５はどのセルでも良く、２つでも
（Ａ１＋Ｂ１＞３）良い。設定する値のＡ５＋１００の部分も自身Ｃ１さえ入っていなければ、Ａ１＋Ｂ２＋Ｃ５とかでも良い。
これでは易しすぎるので、質問の意を汲んでいないかもしれないが、その際はご勘弁を。

お礼

教えていただいたIFを調べました。
B１＝５でなくても、文字でもよいそうなので、たとえば、数値を文字に仮定しても使用できるという事ですね。便利かもしれません！
ありがとうございました。

回答No.4

taisuke555

=INDIRECT("A"&B1)+100
という方法もあります。

お礼

勉強不足でお手数をかけました。
またひとつ、エクセルの関数の使い方を覚えました。
ありがとうございました。

回答No.3

papayuka

こんにちは。

C1 に =INDIRECT("A"&B1)+100 って意味でしょうか？

お礼

なるほど、この方法でもわかりやすいですね
できあがたワークシートは、社員みんなで使用し検討するものなので直接入力してしまうのが手っ取り早いかもしれません。
ありがとうございました。

回答No.2

mneko

基本となるデータがＡ列にあり、そのカレントセル（Ａ１からＡ１０までとする）
の内容をＢ列のｎ行にしてそのＢ列ｎ行の内容に＋１００をして、Ｃ１に格納する
このときＣ列の１行はＡ列の１行であるから。
このような解釈でよいでしょうか？
この場合、マクロ（Visual Basic）でCells(行、列）を使ってやれば簡単に
出来ます。

回答No.1

shelf_town

セルC1に、
=OFFSET(A1,B1-1,0,1,1)+100
と入力してください。
OFFSETワークシート関数の詳細はヘルプを見てください。

お礼

ありがとうございました！
ちゃんと本に載っていました。ここまで見つけるのが大変なんですよね。
ちょっとややこしいですが、解決しそうです。