Worksheet.Add関数を使用して外部ワークブックからワークシートを追加するにはどうすればよいですか？VBAを使用して外部ブックからワークシートを追加する
私はエラーを取得する外部のワークブックからワークシートを追加しよう：ここ
Method 'Add' of object 'Sheets' failed on the third line`
が私のコードです：
Application.ScreenUpdating = False
Dim ws As Worksheet
Set ws = Worksheets.Add(After:=Sheet1, Count:=2,Type:="\\SharedDrive\Worksheet\Student.xltm")
Application.ScreenUpdating = True
「タイプ：=」はテンプレートである必要があります別のファイルから挿入している場合。
構文は
タイプはオプションバリアントである
expression.Add(Before, After, Count, Type)
です。シートの種類を指定します。 xlWorksheet、xlChart、xlExcel4MacroSheet、xlExcel4IntlMacroSheetのいずれかのXlSheetType定数を使用できます。既存のテンプレートに基づいてシートを挿入する場合は、テンプレートへのパスを指定します。デフォルト値はxlWorksheetです。例えば
Set ws = Worksheets.Add(After:=Sheet1, Count:=2, _
Type:="\\SharedDrive\Worksheet\Student.xlt")
又は
Set ws = Worksheets.Add(After:=Sheet1, Count:=2,_
Type:="\\SharedDrive\Worksheet\Student.xltm")
又は
Set ws = Worksheets.Add(After:=Sheet1, Count:=2,_
Type:="\\SharedDrive\Worksheet\Student.xltx")
XLT - Excel 2003のテンプレート
xltx - エクセル2007/2010テンプレート
xltm - Excel 2007/2010マクロが有効なテンプレート
タイプを更新しましたが、引き続き同じエラーが発生します。私はどこかのシート名（テンプレートから挿入したいシート）について言及する必要がありますか？このシートをマクロ有効ブックに挿入しようとしています（テンプレートを.xltmとして保存しようとしましたが、同じエラーが表示される）。私はここに何かを逃していますか上記のコードを更新しました。 – user793468
一度に1ステップずつ進んでください:) 1）新しいテンプレートを作成し、ローカルドライブに保存します。そのファイルでテストしてください。それは動作しますか？ 2）共有ドライブに同じテンプレートをコピーしてもう一度テストします。それは動作しますか？ 私たちはそこから取ります:) –
あなたの例で使用した共有ではなく、ローカルファイルで機能するかどうか確認しましたか？ – jon
これはあなたの最後の質問とほとんど同じです。 – Reafidy