• ベストアンサー

EXCELのシート名を同じシート内のセルにコピー

tom04の回答

  • tom04
  • ベストアンサー率49% (2537/5117)
回答No.4

No.2です! 逆の場合の回答をしていませんでした。 Sheet名をB4セルに表示させるコードです。 Sub test2() ActiveSheet.Range("B4") = ActiveSheet.Name End Sub こんな感じではどうでしょうか? 何度もごめんなさいね。m(__)m

kikyouw
質問者

お礼

さっそくのご回答ありがとうございます。マクロ実行してみますと、エラー表示が出てしまいました。ANO4で逆の場合の回答もいただきました。このANO4のマクロを入力して実行すると、シート名の入力でセルにコピーができました。これはこれで使えます。

関連するQ&A

  • エクセルのシート名をセルにコピーさせたい

    エクセルのシートをそのままコピーしてページ数を増やして新たなシートを作っています。たとえば「Aさん」のシートをコピーして「Bさん」のシートを新しく作るんですが、現在はその作業ごとにシート名の変更とシート内のセルにある名前を変更しています。それは1箇所だけですませてますが、シートの名前を変更するだけで、同時にセル内のデータも一緒に変更できる方法はないのでしょうか?よろしくお願いします。

  • エクセルでシート名をセルに複写(リンク)する方法

    いつも参考にさせていただいております。 さて、エクセルのワークシート名を取得して 特定のセル(例えばA2等)に入力する方法を調べております。 ボタンを作っておいて押したら記入される方法ではなく、 ワークシートの名前を変更したと同時に セルも変更される方法はないでしょうか?

  • EXCELのシート名を自動参照

    EXCELのワークシートの名称を、例えばA1セル内にある文字列を参照させて変更させるマクロは可能でしょうか? 具体的には ・日々使用している様式(ワークシート)をコピー ・コピーしたシートへ、他のファイルからデータを貼付 ・貼付けたデータのひとつのセルを参照してワークシートの名前を変更 といった作業をマクロで一発処理しようと考えています。 参照させるデータはロットナンバーですので、毎回異なります(セルは同一です)。 単純にマクロの記録で該当セルをコピーした後、名前タブへ貼り付けてもうまくいきませんでした。

  • エクセルでセルに入力したら別セルを別シートにコピー

    エクセルで、あるセルに情報を入力したら、同じシート内の別セルの情報を他のシートにコピーしたいと考えています。 例えばシート1のB5に住所を入力したら、シート2のB1、B2にシート1のB1、B4の情報がコピーされるようにしたいです。(添付画像を参照ください) シート2へのコピーは下に追加されていくようにしたいです。 何か良い方法はありませんでしょうか? どうぞよろしくお願いいたします。

  • PerlでExcelのワークシートを同じファイル内にコピーしたりワーク

    PerlでExcelのワークシートを同じファイル内にコピーしたりワークシートの名前を変更することは可能でしょうか? 環境は、WindowsXPpro、IIS5.1、PerlV5.10でWin32_OLEモジュールを使用しています PerlでExcelのワークシート内セルに書き込み・セルからの読み出しはできています。 VBAではワークシートをコピーする場合は、 「Worksheets("Sheet1").Copy After:=Worksheets("Sheet3")」 でコピーできるようですが、 Perlではどう記述すれば良いか分かりません。 Perlではワークシートをコピーしたりワークシートの名前を変更することは出来ないのでしょうか? よろしくお願いします。

    • ベストアンサー
    • Perl
  • エクセルにおいてシートのコピーの仕方について

    エクセル初心者です。 excle2010を使用してます。 作業中のブック内でシートをコピーする時に A のシート ctrLキーを押しながらシートをドラッグする B のシート 〃 すると 移動またはコピー******* この名前を使用しますか ******* ******** はい いいえ で はい を数回押して コピーを作成しています。 BのシートをAのシートの様に変更するにはどうしたら良いか教えてください。

  • エクセルでシートをコピーしているのですが・・・

    「4日」という名前のシートをコピーして作業しているのですが たまに間違えて「4日(1)」のシートをコピーしてしまうと 『移動またはコピーしようとしている数式またはシートには、移動またはコピー先のワークシートに既にある名前'afda'が含まれています。この名前を使用しますか?』 というエラーメッセージが出ます。 ここで「はい」を選ぶと 延々 上記メッセージが繰り返し表示され、 「いいえ」を選ぶと 『名前の重複』というウインドが出て 『同じ名前がリンク先のシートに定義されています。 変更前:eytw 変更後: 』 と表示されます。 変更後の部分に 何か言葉を入れると 『同じ名前が既に定義されています』 と出ます。 キャンセルを押すと 『移動またはコピーしようとしている数式またはシートには・・・・・・ のメッセージに戻ります。 いつも どうにもならなくなり エクセルを強制終了させてるので 保存していない文書のときは かなり泣けてきます(T_T) 原因や解決方法がありましたら アドバイスよろしくお願いします ちなみに シート名「見本」でコピーしたときも同じエラーになりました。

  • シート名だけを変えてコピーしたい

    Excel 2003を使用しています。 添付画像は、一時的に数式を表示するようにしています(どのセルに今どのような計算式が入っているか)。 Sheet6 の セルB2からセルF2迄、データ1の値を参照する計算式が入っていますが、 これを、3行目から6行目まで、シート名の違う、計算式をコピーしたいのですが、 どのようにすれば良いでしょうか? 縦にコピーした後、参照式のシート名と行番号を変更しています。 例えば、セルB2をセルB3にコピーしたら、セルB3の参照式は データ1!A2となっています。 これをデータ2!A1としたいのです。 実際に計算式の入っているシートは、もっと沢山の参照式が入っているので元の計算式の方法を 変更は難しいです。

  • エクセルで、ワークシート名をセルから参照する

    エクセルで、ワークシート名をセルに表示する方法は書いてありますが、セルの値をワークシート名とするにはどうしたらいいでしょうか。 つまり、 「ワークシート名 → セル」 ではなく、 「セルの値 → ワークシート名」 ということです。 現状、会社が変わると決算期が変わるため、決算期を変更する度にワークシート名を変えていますが、変わった都度ワークシート名を手で変更するのは手間が掛っています。 具体的には、例えば、 3月決算の会社のファイルは、4月シート、5月シート・・・ 12月決算の会社は、1月シート、2月シート・・・ のようにシート名を変えています。 そのため、セルに決算期を入力すると、自動で各ワークシート名も変更するようにしたいのですが、どうしたらいいでしょうか。 そういう関数はないようですし、マクロ・VBAの本等を見ても、よくわかりません。 宜しくお願い致します。

  • Excelでシートコピーすると幅が変わる

    閲覧ありがとうございます。 Excel 2019で「シートの移動またはコピー」で、シートを新しいブックにコピーすると、幅が変わってしまいます。 同じブック内だと変わらないようです。 どうやら、全くサイズを変更していないセルの幅も違うようです。 シートをコピーする作業はVBAで行っています。 解決方法が良くわからず、質問させていただきました。 ・Excelのオプション変更で解決する方法 ・違う環境で同じExcelブックのVBAを使っても、幅が変更されない方法 できればどちらもご教示いただきたいです。 よろしくお願いいたします。