シート追加時に特定セルの値を自動的に増分させる方法

このQ&Aのポイント
  • MS Excel 2003を使用している場合、シートをコピーする際に特定セルの値を自動的に増分させる方法を教えてください。
  • 見積書を作成する際に、テンプレートのシートをコピーしながら手動で書類番号を増加させる必要があります。シート1をコピーした際に、シート2のセルA1の数値を自動的に増加させる方法を教えてください。
  • ご使用のMS Excel 2003では、シートをコピーする際に特定セルの値を自動的に増分させる機能はありません。手動でセルの値を増加させる必要があります。
回答を見る
  • ベストアンサー

シート追加時に特定セルの値を自動的に増分させる方法

シート追加時に特定セルの値を自動的に増分させる方法 エクセルの初心者です。 検索した限りでは類似したものがなかったので質問させてください。 もし質問内容が重複していたら恐縮です。 当方MS Excel 2003を使っています。 現在見積書を作成しており、一つのブックにテンプレートのシートをコピーしながら作成しています。シートのコピー時には、その都度書類番号を1ずつ増加させて手で打ち直しています。 そこで、シート1をコピーした際に、シート2のセルA1の数値を自動的に増加させたい(=シート1、A1の数値+1)と考えたのですが、何か方法はありますでしょうか。 (例) 【シート1】セルA1、値:0516-01 →[シートのコピー]末尾にコピー →【シート2】セルA1、値:0516-02 ご教授いただければ幸いです。 宜しくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • web2525
  • ベストアンサー率42% (1219/2850)
回答No.1

コピーしたシートのA1セルにはコピー元のsheet1のA1セルの情報が入るわけなので関数式で処理はできません sheetのコピー自体をマクロ化してマクロ内での書き込みが必要です 例: Sub Macro1() c = Worksheets.Count Sheets(1).Copy After:=Sheets(c) Range("A1") = Sheets(c).Range("A1") + 1 End Sub sheet1のA1セルは数値で入力が必要 4ケター2ケタの値が必要ならばセルの書式設定で表示形式を 0000-00 と設定して例の値入力時には051601と入力してください 文字列として入力されている場合はマクロでの連番入力がややこしくなります。

naturalizeta
質問者

お礼

わかりやすいご説明とご回答ありがとうございます。 マクロを使うんですね。効率的で他にも活用できそうです! 勉強になります。ありがとうございました!!

関連するQ&A

  • excelで入力値の有無自動検索方法を教えて

    次のような事が可能かどうかわかりませんが、何かよい方法がありましたら教えて下さい。 30列ぐらいあるデータを1行または複数行をコピーし、保存用に作ったExcelファイルのシート1に貼り付け、保存していきたいのですが、この際、データに重複がないか、自動でチェックしたいのです。 現在、シート2のA2に=COUNTA(シート1!A:A)と入力しておき、 データをシート1に貼り付けた後、重複しないキー(セルAに入る数値)を コピーしシート2のA1に貼り付けて、セルA2の値をチェックしている状態です。 この方法だと、1件ずつしかチェックできません。 しかも、何度もシートを移動し、コピー&貼り付けを行わなくてはならないので面倒なのです。 簡単のチェックできる方法はないでしょうか? アドバイスをよろしくお願い致します。

  • Excelで、セルを削除した際に、自動的に繰り上がるセルの値を入力させ

    Excelで、セルを削除した際に、自動的に繰り上がるセルの値を入力させたい。 シート1にずらーっと名前のリストを表示させています。その名前を、シート2で拡大して表示させる為に、シート2に大き目のセルを結合させて作成し、当該のセルに「=シート1!A1」との数式を入れました。 この段階では、シート1のA1の値が、シート2に拡大表示されている状態となります。 拡大表示させた物を印刷する事が目的な為、この状態を印刷した後に、シート1でA1のセルを削除しました。自動的にシート2には、繰り上がったシート1のA1になるはずの次の値(「削除する前はA2)が繰り上がって表示されるかと思っておりましたが、「#REF!」の表示が出てしまいます。 設定か何かで自動的に繰り上がった値が表示される方法はありませんでしょうか。 ※ちなにみ、この表示される値は数式等ではありません。

  • Excelのマクロを使ってワークシート1にワークシート2のセルの値をコ

    Excelのマクロを使ってワークシート1にワークシート2のセルの値をコピーするマクロを作りたいと思っています。 例えば、ワークシート2のA1~A30のセルには1~30の値が順に入っているとします。 それをA1から3の倍数分、つまりA1,A3,A6,A9,・・・,A27,A30の値を ワークシート1のA1~A11のセルに自動で挿入してくれるマクロってどう作ればいいのでしょうか? わかりにくいかもしれませんが、よろしくお願いします。

  • Excel で別シートのセル値を表示させる(初心者)

    Excel で一つ前のシートにあるセル値を表示させる。 例えば"Sheet1"と"Sheet2"が有るとして"Sheet2"のセル"A1"へ "Sheet1"のセル"A1"の値を表示させるには、=Sheet1!A1 と入力しますが、 この<Sheet1>の部分だけを別のセル "A2" で入力した値に変更したいです。 (気持ちとしては、A2!A1) どの様にすれば良いでしょうか? 常にシートをコピーして作成し、常に一つ前のシートの同位置セルの値を 表示させたいのが狙いで、シート名は数値に設定して "A2"へ MID(CELL("filename",$A$1),FIND("]",CELL("filename",$A$1))+1,31)-1 などを入れて方法があれば作成しようと考えています。 マクロも分かりません、関数など何か方法があればご教授お願いします。

  • エクセルのセルの値をシート名にするマクロ

    エクセルで、例えばB2セルに入力された数字を使って自動でシート名にしたいのですが、(=そのセルの値が変更されたときに 自動的に シート名が変更されるマクロ )どうやったらよいのか良くわかりません。また、重複するシート名があった場合にはアラートを表示させたいです。 例: 1.B2セルに10と入力する 2.もしシート名に重複が無ければ、シート名が自動的に「10月」になり、アクティブセルはB2に戻って復帰する。 3.重複がある場合は「シート名に重複があります」等のアラートを表示して終了する 多分 イベントとかいうものが絡んでくるのでしょうが、マクロは時々使うのですが、いつも記録したものを手直しする程度なので、標準モジュールの部分しか触った事がありません。 どなたか教えてください。お願いします。

  • Excelのシート間でのセルの自動コピー機能

    タイトルの通りSheet1のあるセルに数値もしくは文字を入力すると自動的にSheet2のあるセルに入力されるようにしたいのです。 例えばSheet1のD21のセルをSheet2のD10に自動でコピーするときに現在 =+Sheet1!D21 と言う式をSheet2のD10に入れているのです。いちようこれでもきちんとコピーは自動的にされているのですが、これでは、Sheet1のD21のセルが空欄の時にSheet2のD10のセルには「0」と言う表示がされます。 出来ればこの0と言う表示をさせずそのまま、空欄でコピーしてSheet1から持ってくる事は出来ますか? すみませんが教えてください。

  • シートコピーと値の転記 シート名変更マクロを

    エクセル2010で マクロのご教授をお願いいたします。 BOOK1の Sheet1 A1~A10に 数値1000が入力されているとして Sheet1のシートのコピーを作成 Sheet1にもどり A1~A3の値だけコピーして 作業列C1に 値を貼り付け A1~A10 をクリアーにしたのちに  ※↓が うまくいきません。 A1の値→ A8 A2の値→ A9 A3の値→ A10 に入力 させるマクロは どうなるでしょうか? マクロの記録で いろいろと やってみましたが どうも ※の部分が うまくいきません どう考えてもエクセルに対しての 理解不足だと思われますが、ご教授のほどお願いします。 おこなった自動マクロの記録は↓です。 マクロの記録開始する 名前 シートコピー Sheet1を右クリックして移動またコピー コピーを作成にチェックをいれ OK コピーシートが作成される。 Sheet1をクリックしなおして A1からA3をコピー  作業列として C1に 形式を選択して貼り付け 値 A1~A10を delete でクリア C1~C3を選択 コピー A8に 形式を選択して貼り付け 値 マクロの記録終了。 あと Sheet1をコピーするさいに シート名を前日の日付に自動的に変更できればと いいなと 考えておりますが できるのでしょうか? 例えば、本日でいえば シート名→ 0112 のような シート名を変更できればすてきだと おもいます。 どうぞ よろしくお願いします。

  • 特定のセルの数値の行数だけコピーしたい

    お世話になります。 Excel2002で次のことをやろうとしています。 特定のセルに表示されている数値の行数だけコピーする。 これを、マクロを使って実行したいのですが、その方法が思いつきません。 どのようにしたら良いかお教えください。 [コピー元]のシートの"J53"のセルに、例えば「13」が表示されています。 この「13」がコピーする行数です。 このシートには多くのデータが入っていますが、そのうちの"A1"~"G13"だけのセルをコピーし、[コピー先]のシートの"A8"~"G20"に貼り付けるものです。 コピーする行数を表示しているセル"J53"は、常にこの位置です。 コピーするデータの列は常に"A"~"G"で、変わることはありません。 コピーするデータの行は、始まりは常に"1"からで、最後は"J53"に表示されている数値の行です。 コピーする行数を示す"J53"に表示される数値は「1」~「52」の範囲内です。 コピー先の位置は、[コピー先]のシートの"A8"~で、変わることはありません。 類似の質問を探したり、他にもネット上で探したのですが見つかりませんでした。 よろしくお願いします。

  • Excel Sheet を自動、セルにも自動でデー

    自動でできるのであれば、こういう事がしたいのですが、 初心者レベルでもできる方法があれば教えて頂けませんか。 <例> ・Sheet1:氏名、住所が書かれたリストがあります ・Sheet2:個人ファイル的な表があります ・Sheet2の表のセルに、Sheet1の氏名を自動で表示し、  Sheet1リストの氏名の数だけ、同じ表が書かれたSheetを自動作成したい。 ■Sheet1   A列   B列 1 田中  東京都 2 山田  神奈川県 3 鈴木  埼玉県 ■Sheet2  作成されている表のD3セルにSheet1のA1のデータ「田中」を自動で表記 ■Sheet3  Sheet2と同じ表のD3セルにSheet1の「山田」と自動表記された  新しいSheetが自動で作成されるようにしたい ■Sheet4  Sheet2と同じ表のD3セルにSheet1の「鈴木」と自動表記された  新しいSheetが自動で作成されるようにしたい Sheet1のリストと Sheet2の表が別のファイルで有る方が 対応が簡単ならでも別のファイルでもかまいません。 宜しくお願いします。

  • セルの値が変ると自動でマクロが実行される。

    セルの値が変ると自動でマクロが実行されるVBAを教えて下さいm(_ _ )m 例えば、シート1のA1の値が変ると、マクロAが実行される。 シート1のA2の値が変ると、マクロBが実行される。 と一つのシート内に複数のイベントを設置したのですが、イマイチわかりません。 知恵をお貸し下さい。

専門家に質問してみよう