This is a discussion on How to create a workbook using template when another workboo within the Excel Questions forums, part of the Question Forums category; Dear Excel expert, I used a template to create a workbook and make it visible. If another workbook was opened ...
Dear Excel expert,
I used a template to create a workbook and make it visible. If another workbook was opened when run the VB program, The new workbook is not show up. I close exit the program and go to the folder that stored the new workbook to open it. It is empty.
Could you teach me how to make it works when another workbook was opened.
thank you very much.
The code example is as follow.
Private Sub CreateButton_Click()
Dim Report As Object .
Dim ReportName As String
Dim strExcelFileName As String
Dim strReportName As String
ReportName = App.Path & "template.XLT"
Set Report = GetObject(ReportName)
strExcelFileName = Application.GetSaveAsFilename(App.Path & "" & "test .xls", fileFilter:="Excel Files (*.xls), *.xls")
strReportName = strExcelFileName
Set Report = GetObject(strReportName)
Report.Application.Visible = True
Report.Parent.Windows(1).Visible = True
.Range("A2").Value = "Last Name"
.Range("A3").Value = "First Name"