![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
No.3ベストアンサー
- 回答日時:
こんにちは。
(1)の場合は、下記のコードを ThisWorkbook に記述してください。
どのワークシートでも機能します。
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
If Target.Address = "$A$1" Then Sh.Name = Target.Range("A1").Value
End Sub
(2)場合は、下記のコードを標準モジュールに記述しボタンにマクロ登録してください。
(すべてのシートにボタンを貼り付けるのは面倒でしょうから、ツールバーにボタンとして追加すると良いと思います。)
Public Sub SheetName()
ActiveSheet.Name = Range("A1").Value
End Sub
GreatDragonさん、ありがとうございました。
最高のお答えをいただきました。
(1)は、すべてのワークシートに機能する点で、そこまでできるとは思ってなかったので驚きとともにうれしく使わせていただきます。
(2)についても感謝です。
本当にありがとうございました。
No.2
- 回答日時:
イベントを使うと、自動的にマクロが実行されます。
以下のマクロをSheet1に書いておけば、A1に値を書き込むだけでシート名が設定されます。
Private Sub Worksheet_Change(ByVal target As Range)
ActiveSheet.Name = ActiveSheet.Range("A1")
End Sub
No.1
- 回答日時:
こんな感じでしょうか?
Sub test()
On Error GoTo MB
ActiveSheet.Name = ActiveSheet.Range("A1").Value
MB: MsgBox "セルが空白かシート名に使用できない文字があります"
End Sub
SuperMildさん、ご回答ありがとうございました。
せっかくのご回答に、ポイントを発行できなくてごめんなさい。後続の方のご回答の内容が私の質問により、的確でしたのでお許しください。
シート名はマクロ実行で確かに変わりました。ありがとうございました。
ただ、毎回メッセージボックスが出てきてしまいます。この点私の理解(勉強)不足ならお許しください。理解に達しませんでした。
それにしても早速のご回答を心より感謝申し上げます。^^
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) ユーザー定義について質問です。 2 2023/06/28 13:21
- Excel(エクセル) シート参照を含む数式を連続コピー 3 2022/12/10 11:42
- Excel(エクセル) エクセル 別シートの各セルそれぞれの比率を計算したい 4 2023/08/05 15:20
- Excel(エクセル) 前の(左隣の)シートを連続参照するように、あとから変更したい 1 2023/02/22 00:51
- Visual Basic(VBA) エクセルのマクロで対象ごとにシート分けしてその内容をセルに書き込みたい 9 2022/08/24 13:23
- Excel(エクセル) エクセルのことで教えてください。 A1セルに、 別シートのA1セルが1のときは「A」、2のときは「B 4 2023/02/24 23:08
- Excel(エクセル) エクセルの表示形式について教えてください あるセルの「A」という値と、別のセルの「B」という値を組み 4 2023/02/21 21:55
- Excel(エクセル) 3つのエクセルをそれぞれのシートのセルに反映させたいときはどうしたらいいでしょうか? 例えば①シート 4 2023/04/25 20:13
- Excel(エクセル) 条件に合った数値の合計を表示させたい関数と条件指定の方法 3 2023/05/13 16:07
- Excel(エクセル) vba アクティブシートのA1セルの値を基準に複数のシートコピー&シート名を 6 2023/04/12 18:36
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
シート名をセルの値からもってくるには・・・
Excel(エクセル)
-
エクセルでシート名を自動入力したい。
Excel(エクセル)
-
Excel数式でシート名をセルから取得したい。
Excel(エクセル)
-
-
4
エクセルで、ワークシート名をセルから参照する
Excel(エクセル)
-
5
VBAでセルに入っている日付をシート名にする
Excel(エクセル)
-
6
自動で複数セルの内容をシート名にする
Excel(エクセル)
-
7
Excelで同じシートのコピーを一気に複数作りたい
Excel(エクセル)
-
8
VBAでシート名をセルから取得したいのですが
Access(アクセス)
-
9
EXCELで1ヶ月分の連続した日付をシート名+セルに表示させたい
Excel(エクセル)
-
10
EXCELで特定のセルに表示された項目をヘッダーやフッターに出力するには
Excel(エクセル)
-
11
エクセルでエラーが出て困っています。
Excel(エクセル)
-
12
シート見出しの色を自動的に変更させたい
Excel(エクセル)
-
13
EXCEL関数でシート名が変わる可能性があるシートのデータを表示させたい
その他(ソフトウェア)
-
14
エクセル関数>参照ファイル名をセルから呼び出す
Excel(エクセル)
-
15
別ファイルを開かず、INDIRECT関数を使用せずに、別ファイルのデータを求めたい
Excel(エクセル)
-
16
Excelの条件付き書式設定の太い罫線
Excel(エクセル)
-
17
EXCEL シート名を自動変更するマクロ
Excel(エクセル)
-
18
エクセルでシート名を連続で参照するには
Excel(エクセル)
-
19
リンク先のファイルを開かなくても、値が読み込めるようにできますか?(SUMIFSを使ってます)
Excel(エクセル)
-
20
セルの値と同じ名前のシートをアクティブにするには?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
-1234 を (1234) と表記する由...
-
エクセルで現場ごとに機材の移...
-
他部署からもらう データで、 ...
-
Excel 1の位の数字で処理を分岐...
-
Excelのセルの色を変えた行(す...
-
エクセルの数式について教えて...
-
Excelでの記号と特殊文字につい...
-
とびとびの大量セルを選択した...
-
MACにおけるエクセルの入力トラ...
-
ある表にフィルターをかけて出...
-
Lookup関数
-
エクセルの数式バーのフォント...
-
再質問です。マクロの修正箇所...
-
エクセルで「ページレイアウト...
-
EXCELの散布図で日付が1900年に...
-
【マクロ】VLOOKUPにて参照元に...
-
exselの質問です
-
エクセルでファイルの最終更新...
-
Excel 大小比較演算子による「...
-
エクセルの問題です。絶対値の...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
半角カタカナをヘボン式ローマ...
-
(マクロ)vlookupの元データを同...
-
エクセルで上位バイトのセルと...
-
exselの質問です
-
Excel 大小比較演算子による「...
-
Excel VBについての質問です。
-
エクセルの問題です。絶対値の...
-
非表示列の再表示に失敗
-
職場の人から聞かれており、こ...
-
Excel関数-文字列で自動作成さ...
-
Excelデータをコピペして、ペー...
-
ユーザー定義関数をアドイン登...
-
【マクロ】for next構文について
-
エクセルの日付を編集する
-
【マクロ】VLOOKUPにて参照元に...
-
exselで最小数で並び替える関数
-
libre 表計算ソフトの計算がう...
-
エクセルで表
-
エクセルの表で1年間の曜日を...
-
西暦和暦
おすすめ情報