エクセルの番号の設定の仕方

質問

ひとつのセルに英数と交じり合った番号があります。AB0123
違うセル（続きのセルじゃない場所）に続きの番号AB0124と自動に入力したい場合、数式で設定できるのでしょうか？

回答No.1

mshr1962 · ベストアンサー

いくつか方法があります。
表示形式で数値の頭に"AB"を追加する方法（値としては数値のみ）
表示形式をユーザー定義で
"AB"0000
とする。
これで書式をコピーしておいて
=前の番号のセル+1

数式だけで行う方法
=IF(LEFT(前の番号のセル,2)="AB","AB"&TEXT(RIGHT(前の番号のセル,4)+1,"0000"),"")

回答No.2

imogasi

ユーザー関数を作ります。
VBEの標準モジュールに
Function suu(a)
For i = 1 To Len(a)
s = Mid(a, i, 1)
If IsNumeric(s) Then
n = n & s
End If
Next i
suu = Val(n)
End Function
を貼り付けます。
これで数字部分だけをセルの文字列から抜き出します。
例データ
A1;A4
AS12344
awe123
a2345
aaass2

B1セルに
=LEFT(A1,LEN(A1)-LEN(suu(A1))) & suu(A1)+1
と入れて、B4まで複写します。
結果B1:B４
AS12345
awe124
a2346
aaass3
数字は文字列の右側に１箇所に固まっている必要があります。
ユーザー定義関数まで持ち出したのは、もし関数の良い答えが出なければ、この問題はそれほど、難しい問題なのだろうと思います。
配列数式で考えていましたが、力尽きて、ユーザー定義関数に逃げ込みました。