• ベストアンサー

[Excel VBA]シートの

Visual Basic Editorを起動し、"プロジェクト エクスプローラ"と"プロパティウィンドウ"を表示した状態で、適当なシートを選択すると、"プロパティ ウィンドウ"の一番上の"(オブジェクト名)"欄に、今現在設定してある値が表示されます。 で、その値は"プロパティ ウィンドウ"から直接変更することは簡単にできますが、マクロから変更する方法が分かりません。 私がやりたいのは、マクロからシートを追加し、シート名と、この"(オブジェクト名)"を設定することです。 どなたか方法を知っている方がいましたら、是非ご教授お願い致します。

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

  • ベストアンサー
  • osamuy
  • ベストアンサー率42% (1231/2878)
回答No.1

オブジェクト名の変更は、 ActiveWorkbook.VBProject.VBComponents(2).Name = "sht1" みたいのでできます。 対象ワークシートを変更するために、VBComponentsへの添字としていくつを指定すればよいかが不明なんですが、シート名(VBComponents(<インデックス>).Properties("Name")で参照できるみたい。)で見当をつけられるかもしれません。 シート名の変更はマクロの記録であっさりできるでしょうから省略。

その他の回答 (1)

  • osamuy
  • ベストアンサー率42% (1231/2878)
回答No.2

No.1で書き忘れ。 MS-Excel 2000 build6926で試してます。

secky_martha
質問者

お礼

早速のご回答ありがとうございます。 教えていただいた方法を試したところ、見事に"(オブジェクト名)"を変更することができました!! Properties(項目名)で、Nameの他、いろいろなプロパティの値を見ることもできました。 どうもありがとうございました。

関連するQ&A

  • VBAでVBAProjectを保護する方法(Excel2000VBA)

    Visual Basic Editorの「ツール」-「VBAProjectのプロパティ」-「保護」で、プロジェクトの保護ができますが、 SendKeysを使う以外でこの操作をマクロで実行することは可能でしょうか? もし可能でしたらそのコードを教えてください。 ヘルプには、Purotectionプロパティ値の取得のみ可能と書いてありますが、他に何か方法があればと思い質問いたしました。 よろしくお願いいたします。

  • エクセルVBAでシート番号が大きい

    検索しましたがそれらしい情報が見つからなかったので質問させていただきます。 会社で使っているエクセルファイルにて、 「ツール」→「マクロ」→「VisualBasicEditor」と進み、 左に表示された「プロジェクトエクスプローラ」にて、 現在作成しているシート名が表示されますが、 ここで、通常は sheet1 sheet2 sheet3 と表示されていますよね? これが、 sheet11111121212111 sheet22212111211111 sheet31111112111111 などのように表示されています(数値は適当ですが、桁数は多いです) これはファイルの破損などでしょうか?

  • エクセルのVBA画面フォントをかえるには?

     エクセル2000のVisual Basic Editor画面での プロジェクトエクスプローラーとプロパティウインドウの 項目表示が筆記体のフォントになってしまい読みにくくて困っています。 \windows\Fontsにあるttf とかfonファイルには同じフォントは見つかりません 続けて書いた様な文字なのですがこれを、 ゴシック体みたいな1文字ずつ区切られた書体に変えたいのです。  以前MSゴシックが壊れて再インストールしてからとも思います。 そこでChange-moiと言うシステムフォントを設定変更出来る フリーソフトを試しましたが効果はありませんでした。  よろしきご指導をお願い致します。

  • Visual Basic Editor ウィンドウのフォントの変更方法

    ExcelでのVBAを勉強しようとしている初心者です。 Visual Basic Editorを起動してみたら、 プロパティウィンドウ内のフォントが 正楷書体のようなフォントになっていて非常に読みにくいです。 プロジェクトウィンドウ、ローカルウィンドウもそうなっています。 ウィンドウ名はゴシック体なので読みやすいのですが、 どうすればウィンドウ内のフォントもゴシックになるでしょうか? オブジェクトウィンドウ内のフォントはゴシックになっています。 変更方法がわかりましたら教えてください。よろしくおねがいします。

  • EXCEL 2000VBAで困っています

    EXCEL 2000VBAで困っています。 何処でどういう操作をしたか、ハッキリ特定できません。 エディタの画面でコードウィンドウを最大化すると、プロジェクトエクスプローラーとプロパティウィンドウの裏側まで広がってしまいます。 何かの操作ミスでプロジェクトエクスプローラーとプロパティウィンドウも一時広がって小さくならなくなってしまったのですが、何とか正常に戻せました。 ドッキングはすべて可にしてあります。 よろしくお願いします

  • シート名を変更してもVBAでエラーにならないように

    VBA初心者です。 VBAで複数のシートを選択するという動作を行う時、シート名を変更するとエラーになってしまうのですが、どうすれば回避できるのでしょうか?オブジェクト名?が使用できるらしいのですが、エラーになってうまく動作しません。指定の仕方を変える必要があるのでしょうか? 例えば、  Sheets(Array("第1週", "第2週", "第3週", "第4週", "第5週")).Select  Sheets("第1週").Activate と記述してあって、シート名の"第1週"を"9月1日"とかに変更したら、当然エラーになりますが、 左のプロジェクトエクスプローラにある、Sheet1(第1週)の名前の変わらないオブジェクト名"Sheet1"の方で指定したいと思うのですが、単純に名前を置き換えても動作しません。どのように指定すればよいのでしょうか?

  • VBEに詳しい人教えてください(エクセル)

    エクセルのVBEのプロジェクトエクスプローラに表示されているSheet1 (Sheet1)を右クリックしたらショートカットメニューが表示され、上から"コードの表示"、"オブジェクトの表示"、"××のプロパティ"・・・・と続きますが、2番目の"オブジェクトの表示"が選択(淡色表示)出来ないブックに遭遇しました。エクセルの書式-シート-再表示も選択できません。また、ウィンドウにもブック名が表示されません。どのように設定すればそのようなことが出来るのですか?どなたか?詳しい方がおられましたら教えて頂けないでしょうか?何を調べればいいのか?よく解っていないので、取りあえずの現象を書きましたが、意味が通じるでしょうか?宜しくお願い致します。

  • シート上にコントロールを置いたときの初期値設定処理

    Excelのシート上にコンボボックス(Sheet1)を置きました。 ここに値と入力したいのですが、Visual Basic Editor 上で入力値をいれたいのですが、どこに記述してよいのかが、わかりません。 プロジェクトエクスプローラには、 sheet1,sheet2,sheet3,ThisWorkBook,Module1とありますが、 cbTemplate.AddItem "データ1" という一行をいろんな場所にいれてみたのですが、ThisWorkBook,Module1ではコントロールが認識されていないぽく、sheet1には初期にいれられそうなのが見当たらないのですが、どこに記述すればよいのでしょうか?

  • VBA,シート名を変数で変更

    win98、excel2000使用です。 マクロで各シートの「A1」のセルにある「値」をシート名として変更する方法を教えてください。 単に変更するだけならどうにかできるのですが、力不足で 変数で上記のようにする方法がなかなか思うようにできません。 よろしくお願い致します。

  • Visual Vasic Editorの表示について

    エクセル2000でVisual Vasic Editorの表示で文字のフォントが 見にくいフォントに変更してしまいました。元に戻そうと思うのですが どこで変更したのか思い出せません。分かる方、よろしくお願いします。 プロパティのオブジェクト名のフォントです。 例 EnableSelectionのフォントの変更方法です。

専門家に質問してみよう