Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/26.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
是否可以使用excel上的VBA宏打开带有模板的新工作表_Vba_Excel_Macros - Fatal编程技术网

是否可以使用excel上的VBA宏打开带有模板的新工作表

是否可以使用excel上的VBA宏打开带有模板的新工作表,vba,excel,macros,Vba,Excel,Macros,我希望复制某些单元格,并将它们放入同一工作簿中的新工作表中,使用我以前创建的模板。有可能这样做吗 Sub CopyCells() Set originalSheet = ActiveSheet Set NewSheet = Sheets.Add(After:=ActiveSheet) NewSheet.Range("D4:D11").Value = originalSheet.Range("D4:D11").Value NewSheet.Range("I4:I8").V

我希望复制某些单元格,并将它们放入同一工作簿中的新工作表中,使用我以前创建的模板。有可能这样做吗

Sub CopyCells()
   Set originalSheet = ActiveSheet
   Set NewSheet = Sheets.Add(After:=ActiveSheet)

   NewSheet.Range("D4:D11").Value = originalSheet.Range("D4:D11").Value
   NewSheet.Range("I4:I8").Value = originalSheet.Range("I4:I9").Value
End Sub

在论坛其他人的帮助下,我可以复制并粘贴我需要的单元格到一个新的空白工作表中,但我想知道如何在粘贴之前包含此模板。

如果您有模板工作表,为什么不复制模板工作表本身呢。即

Set NewSheet = Worksheets("Template").Copy(After:= originalSheet)

运行此宏时,即使单元格中没有任何内容,我也会收到类型不匹配错误。这是单元格格式的问题吗。感谢您的帮助哪里会出现错误?您似乎无法设置副本的一页,因此,您需要拆分该页<代码>工作表(“模板”)。复制时间:=原始工作表:设置新闻表=活动工作表