エクセルの入力について教えてください！

質問

いつも大変お世話になっています。
エクセルについて教えていただきたいのですが、

A1　abc12345 D1 12345
A2 abc678 D2 678
A3 abc9101 D3 9101
A4 abc0112 D4 0112

と入力したい場合、現在はAのセルに予めabcと入れておいて
数字をAとDのセルに1回ずつ貼り付けて入力しています。
この入力をAまたはDのどちらかに入力するだけで連動するような
方法はないでしょうか？

同じ数値や文字であればA1=D1でいいのでしょうが、
頭に別の文字をつけていきたい場合がわかりません・・・。

ご指導よろしくお願いいたします。

回答No.4

KURUMITO · ベストアンサー

D列に数値を入力することにしてA列には次の式を入力して下方にオートフィルドラッグコピーします。

=IF(D1="","","abc"&D1)

これでD列に数値を入力すれば頭にabcの付いた文字列が表示されます。

お礼

おかげさまで作業の効率がかなり上がりました！！ありがとうございました＾＾

回答No.3

asflugels

入力だけでいいなら、セルE1に"abc"。
A1に　=$E$1&D1
D1に数値を入れるといいかと思います。
あとはD列でオートフィルすればいかがでしょうか

回答No.2

acha51

A1に　abc　と入力　
B1に　12345 　と入力
D1に　=A$1&B1 　と入力し、D2からD4までコピー
すると　D1は　abc12345 と表示します
B2に　678　と入力すると　D2は　abc678 と表示します
B3に　9101　と入力すると　D2は　abc9101 と表示します
B4に　0112　と入力すると　D2は　abc0112 と表示します

あたまのabcを変えたいときは
A1に　abc　と入力
B1に　12345 　と入力
D1に　=A1&B1 （A1の間の＄を抜く）　と入力し、D2からD4までコピー
すると　D1は　abc12345 と表示します
A1に　def　B2に　678　と入力すると　D2は　def678 と表示します
以下同様

このときD1からD4は計算式なので、他にコピーして使用するには
コピーして貼り付けでなく、形式を選択して貼り付け　値で貼り付けます

回答No.1

hallo-2007

＞この入力をAまたはDのどちらかに入力するだけで連動するような
＞方法はないでしょうか？
残念ながら、関数では無理です。

一例ですが、VBAの力をかりました。
新しいシートで確認してください。
シート名のタグを右クリック
コードの表示をクリックすると　VBエディターが起動します。

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 Then
Range("D" & Target.Row).Value = Replace(Target.Value, "abc", "")
End If
If Target.Column = 4 Then
Range("A" & Target.Row).Value = "abc" & Target.Value
End If
End Sub

を貼り付けて閉じます。
A列に
abc123 と入力
或いは
D列に
456　と入力してみてください。