Excel:自分用に設定したシートを挿入したい

 
 
■エクセルシートを自分好みに設定(ページやフッタの設定など)しており、これが毎回自動で出るようにしたいと思っています。
 
■ブックには適用できましたが、新規シートには適用できません
 ―新規ブック作成時には設定できました
("C:\Documents and Settings\username\Application Data\Microsoft\Excel\XLSTART\book.xlt"を変更することにより実現)
 ―しかし、このブックにシートを挿入すると、設定したテンプレではない(デフォルトの)シートが出てしまいます
 
■挿入シートも自分のテンプレにできる方法をご存知の方、アドバイスをいただけませんでしょうか。
 
 
宜しくお願い致します

回答の条件
  • 1人1回まで
  • 登録:2008/10/18 11:40:46
  • 終了:2008/10/18 15:57:37

回答(2件)

id:jan8 No.1

jan8回答回数455ベストアンサー獲得回数962008/10/18 12:34:19

ポイント5pt

新規シート追加時のWorkbook_NewSheetイベントを拾って、

そのシートのフォーマットを変更するVBAスクリプトを実行させるのはどうでしょう?

希望のフォーマットを作成するVBAスクリプトを書く必要があるので少々面倒ですが・・・

作成されたテンプレート(xlt)ファイルでVisual Basicエディタを開き、

ThisWorkBookオブジェクトに以下のようなコードを書きます。

Private Sub Workbook_NewSheet(ByVal Sh As Object)

Range("A1:E18").Borders.LineStyle = xlContinuous

Range("A1").Value = "名前"

Range("B1").Value = "年齢"

Range("C1").Value = "性別"

Range("D1").Value = "職業"

Range("E1").Value = "趣味"

End Sub

id:SALINGER No.2

SALINGER回答回数3454ベストアンサー獲得回数9692008/10/18 13:15:18

ポイント65pt

自分用のシートもテンプレートとして作成できるようになっています。

その方法は以下。

http://office.microsoft.com/ja-jp/excel/HP051995961041.aspx


シートを挿入するときに、メニュー→挿入→ワークシートだと、挿入ダイアログボックスが出ないで普通のシートが挿入されることがあります。

その場合は、下のシート名のところを右クリックして、挿入を選べばダイアログがでるはずなので、先ほど作ったテンプレートを選択すればいいです。

id:zizizirororo

ご指摘のURLに掲載されていた情報で解決しました

Xlstartフォルダに下記2つのファイル(同一ファイル)を保存すればOKです

・ブック テンプレート:book.xlt

・シート テンプレート:sheet.xlt

2008/10/18 15:56:23

コメントはまだありません

この質問への反応(ブックマークコメント)

「あの人に答えてほしい」「この質問はあの人が答えられそう」というときに、回答リクエストを送ってみてましょう。

これ以上回答リクエストを送信することはできません。制限について

絞り込み :
はてなココの「ともだち」を表示します。
回答リクエストを送信したユーザーはいません