固定したセルに次々に下げるセルの値を表示するには

質問

A列に下記の数字がある時にカーソルを下げて行くだけで１行目のＢ列のセルに数字が入力されるようにするには、どんな関数をつかったらできますか。　　

Ａ列
45
46
47
49
25
36
26
85
69

回答No.1

tom04 · ベストアンサー

こんにちは！

表示するのは常にB1セルだという解釈で・・・
関数でとなるとおそらく無理だと思いますので、
VBAでの一例です。

＞数字がある時にカーソルを下げて行くだけで・・・
は「A列セルを選択した時に」としています。

画面左下の操作したいSheet見出し上で右クリック　→　コードの表示　→　VBE画面のカーソルが点滅しているところに
↓のコードをコピー＆ペースト　→　Excel画面に戻りA列セルを選択してみてください。

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 'この行から
If Target.Column = 1 Then
Range("B1") = Target
End If
End Sub 'この行まで

こんな感じではどうでしょうか？m(_ _)m

お礼

ありがとうございました。難しそうですが、挑戦してみます。御礼が遅れて申し訳ありません。