• 締切済み

文字列+数字+アルファベットの連続データについて

以下のような連続データを簡単にエクセル(2007)で入力したいです。 関数でもVBAでもオートフィルを合わせたものなどでも構いませんので、やり方はあるでしょうか? 内容はダミーが混ざっております。 <TEST-133a> <TEST-133b> <TEST-133c> <TEST-133d> <TEST-133e> <TEST-133f> <TEST-133g> <TEST-134a> <TEST-134b> <TEST-134c> <TEST-134d> <TEST-134e> <TEST-134f> <TEST-134g> <TEST-134h> <TEST-134i> <TEST-134j> 以上、よろしくお願いいたします!

みんなの回答

  • bunjii
  • ベストアンサー率43% (3589/8248)
回答No.2

>関数でもVBAでもオートフィルを合わせたものなどでも構いませんので、やり方はあるでしょうか? 行番号を応用すれば関数式で対応できそうです。 数字の右に有るaからzの文字と数字の繰り上げが必要かと思います。 当方では次のような結果を想定して検証しました。 <TEST-133a> <TEST-133b> <TEST-133c>     ↓ <TEST-133y> <TEST-133z> <TEST-134a> <TEST-134b> 数式は以下のようになります。 =CONCATENATE("<TEST-",TEXT(133+INT((ROW()-1)/26),0),CHAR(CODE("`")+MOD(ROW()-1,26)+1),">")

kayomana
質問者

お礼

ありがとうございました

全文を見る
すると、全ての回答が全文表示されます。
  • karorumon
  • ベストアンサー率26% (25/94)
回答No.1

=CHAR(ROW()+96)を入力し、オートフィルで下げれば、 アルファベット a~zが表示されると思います。 セルを選択し、セルの書式設定 →ユーザー定義 "<TEST-133"@">" 上記のように設定すれば、133バージョン?の表示はできます。 これを隣の列にもコピーし、ユーザー定義の133の部分を134に変更する…とか? もっと良い方法があるかもしれません…orz

kayomana
質問者

お礼

ありがとうございました

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • データの最後尾より連続入力するマクロについて

    VBA初心者です。宜しくお願いします。 やりたい処理は、データ最後尾に連続データを順に入力していく作業です。 下記ですとA5:F5のデータをA6:F6にオートフィルで入力し、 A6= 6 B6= 空白 C6= 空白  D6= 空白 E6= を F6= ん という計算結果にしたいのです。 ___|A__B__C__D__E__F 1 | 1 あ い う え お 2 | 2 か き く け こ 3 | 3 さ し す せ そ 4 | 4 た ち つ て と 5 | 5      を ん 6 | Range("A1").End(xlDown).Select Range(ActiveCell, ActiveCell.Offset(0, 5)).Select A5:F5を選択した後のオートフィルのマクロはどう記述すればよいでしょうか? 宜しくお願いいたします。

  • 300個の文字列を結合し1個のセルに

    ファイル名変更ソフト「Namery」に使うのですが、セル1個に 001> 001a|002> 001b|003> 001c|004> 002a|005> 002a|006> 002c このようにして 300> 100c| までの文字列つくれませんか? VBAをお願いしたいのです。あるいは下記のD1からD300のセルの文字列を合体してE1に表示、でも良いのですが。 VBAを知らないので、次のような作業を始めましたが途中で疲労困憊です。 A1に001をいれオートフィルでA300までつくり B1に半角スペース+001a B2に半角スペース+002b B3に半角スペース+003c としてから 100c迄オートフィルし C1 に=CONCATENATE(A1,B1) C1をコピーD1に「値のみ貼り付け」してからオートフィル。 出来たD1からD300の文字列を1セルの文字列にするために、エクセルの30個までの制限のため何段階にも作業を分けなければなりません。 ファイル名変更ソフト=Namery の[連続置換・正規表現]に文字列を入れ目的を果たしたいのです。 http://www.vector.co.jp/soft/win95/util/se217399.html

  • 連続関数

    連続関数f:[a,b]→[c,d],g:[c,d]→[a,b]に対して ∃p∈[a,b],∃q∈[c,d]:f(p)=q∧g(q)=p が成り立つことを示せ という問題が解りません!解る方は教えてください。

  • エクセルの文字列中の指定した位置の文字列の置き換え(REPLACE)。

    エクセルの文字列中の指定した位置の文字列の置き換え(REPLACE)。 エクセルのセルA1に 「A123B1234X9876C123DD」と入力されています。 これを 「A123-B123X9876-C123-DD」としたいです。 現在 ・B1のセルに=REPLACE(A1,5,0,"-") ・C1のセルに=REPLACE(B1,15,0,"-") ・D1のセルに=REPLACE(C1,20,0,"-") と入れて、D1にできた値の 「A123-B123X9876-C123-DD」 をコピーして E1のセルに「形式を選択して貼り付け」「値」で貼り付けして B1~D1を削除して ・A1のセルには元の「A123B123X9876C123DD」 ・B1のセルには編集後の「A123-B123X9876-C123-DD」 が表示されるようにしています。 このA列が100行もあるとうんざりです。 式をオートフィルでコピーしていくのですが  ・B1に式を入れてオートフィルでB100までコピー  ・C1に式を入れてオートフィルでC100までコピー  ・D1に式を入れてオートフィルでD100までコピー  ・D1~D100をコピーしてE1~E100に「形式を選択して貼り付け」「値」で貼り付け  ・B,C,D列を列削除  3回は式を入れないといけないです。一発で編集する方法はありますでしょうか?

  • 「1列に500行並んだデータを5列毎に改行」の逆

    いつもお世話になります。 http://okwave.jp/qa/q7073912.html これの逆に近いことができる関数がわかる方いらっしゃいますか? 図にすると、下記のような状態です。 A1 B1 C1 D1 E1 F1 A2 B2 C2 D2 E2 F2 ・・・・・・ A100 B100 C100 D100 E100 F100 のようにデータを入力していくと G1=A1 G2=B1 G3~ G4 G5 G6=F1 G7=A2 : : G10000 というような感じで、自動的にデータがコピーされていくような感じです。 入力済みのデータではなく、 入力していくと、データがコピーされて反映されていくような感じです。 この状態にできるG列の数式がわかる方がいらっしゃいましたら、 お知恵をお貸し頂けましたら幸いです。 よろしくお願い致します。

  • VBスクリプト 文字列操作

    VBスクリプト(全くの初心者です)について教えてください。 例えば "test.csv" にて 1,a 1,b 1,c 1,d 2,a 2,b 3,d 3,e 4,a 4,f 4,g のファイルがあるとします。 最初の1列目の数字(文字列)の行数は可変です。 最終的に "test2.csv" 1,a,b,c,d 2,a,b 3,d,e 4,a,f,g というファイルを作りたいのですが,ずばりコードを教えていただけないでしょうか。

  • エクセル数字と文字が入った列の積は?

    エクセルで下のような数字と文字が入ったセルがあります。    A  B  C D(A~Cの合計) E(重量) F(D×E)    1  2 | 2 | 2 | 6 | 2.5 | 15.0      2  - | - | - | 1SET | 21.0 | 21.0 3  4 | 4 | 4 | 12 | 3.0 | 36.0 2行目のが問題なのですが、SETの部分だけ省いてEの重量とかけてくれるような関数ってありますか?

  • 列A,列Bを参照して列Cにそれに対応する文字列を表示

    列A,列B,列C 4,8,A 4,9,B 4,10,B 4,11,C 4,12,C 4,13,D 3,8,E 3,9,F 3,10,F 3,11,G 3,12,G 3,13,H 2,8,I 2,9,J 2,10,J 2,11,K 2,12,K 2,13,L 1,8,M 1,9,N 1,10,N 1,11,O 1,12,O 1,13,P 列Aに1~4,列Bに4~20の値を入れ、 列Cに、計算式で上記のような文字列を表示させたいのですが、 if関数のネストが7つまでらしく8つ以上が出来ません。 何か方法がありましたらお願いします。 =IF(AND(A2=4,B2<=08),"A" ,IF(AND(A2=4,B2<=10),"B" ,IF(AND(A2=4,B2<=12),"C" ,IF(AND(A2=4,B2>=13),"D" ,IF(AND(A2=3,B2<=08),"E" ,IF(AND(A2=3,B2<=10),"F" ,IF(AND(A2=3,B2<=12),"G" ,IF(AND(A2=3,B2>=13),"H"))))))))

  • Excel 2つの数字と文字列を含む連続データ

    1セル内に2つの数字と文字列を含む場合の連続データの作成方法を教えてください。 下記のような連続データを作成したいです。 関数は使用せずに、連続データの作成もしくはオートフィルを使用した場合作成可能でしょうか。 可能な場合方法を教えてください。 1名1室 1名2室 2名1室 2名2室 3名1室 3名2室 4名1室 4名2室 ・ ・ ・ Excel2010を使用しています。 以上、よろしくお願いします。

  • エクセルで参照したデータをオートフィル・・・

    仕事で効率が悪く、困っています。 シート1とシート2があり、 シート2の縦に並んだセル(A1~A10)を参照して シート1の(A1~J1)に横並びにしたいのですが、 現在シート1のA1には「=Sheet2!A1」、 B1には「=Sheet2!A2」と手打ちで入力しました。 そこから残りはオートフィルで済ませたいのですが、 結果は、  C1・・・「=Sheet2!C1」  D1・・・「=Sheet2!C2」  E1・・・「=Sheet2!E1」  F1・・・「=Sheet2!E2」 となってしまいます。  C1・・・「=Sheet2!A3」  D1・・・「=Sheet2!A4」  E1・・・「=Sheet2!A5」  F1・・・「=Sheet2!A6」 という具合にオートフィルで出来ないものでしょうか? よろしくお願いします。

このQ&Aのポイント
  • エピクテトスの言葉について質問があります。missing art of assentについて教えてください。
  • エピクテトスが述べた「reservation, to the common good, and that they are in proportion to actual worth」というフレーズについて質問です。
  • エピクテトスは我々が衝動を制御することについて言及していますが、省略された部分についての意味がわかりません。
回答を見る

専門家に質問してみよう