Goodmorning.
I've got a irritating problem with my excel-application. This is the issue:
I've got a quite complex application with several Visual Basic modules. Working with the application consists of three stages. The general idea is that after each stage the application copies itself to another workbook with less options. The application undresses itself to achieve a fully customized end application for the final user.
The copying and import / export modules is processed by the following code:
The problem:
The sheets I am copying have macro's assigned to them. When I copy the a sheet to another workbook the macro stays assigned to the original workbook. Therefore after opening the "child workbook" the systems prompts with the question whether I want to update te links. I don't want to do this as the macro's are copied also to the new workbook. It should work entirely on its own.
Question:
Is there a way to avoid this? Is it possible to copy a worksheet with it contronls and that is afterwards it is not referring to the original? I know that you can manually set the links to the workbook in use. I am just wondering whether is the a more prettier solution.
Thanks in advance.
I've got a irritating problem with my excel-application. This is the issue:
I've got a quite complex application with several Visual Basic modules. Working with the application consists of three stages. The general idea is that after each stage the application copies itself to another workbook with less options. The application undresses itself to achieve a fully customized end application for the final user.
The copying and import / export modules is processed by the following code:
Code:
Sheets(Array("Achtergrond", "Info", "voorKlant", "voorAannemer", "Detailtegelwerk", "voorWerkvoorbereider", "temp")).Copy
ActiveWorkbook.SaveAs filename:=filename, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
Sheets("DetailTegelwerk").Activate
Set sourceWB = Workbooks(filenameSource)
Set targetWB = Workbooks(ActiveWorkbook.Name)
dirHome = ActiveWorkbook.Path
sourceWB.VBProject.VBComponents("mod_FaseIII").Export dirHome & "\`temp4.bas" 'VBA code FaseIII
targetWB.VBProject.VBComponents.Import dirHome & "\`temp4.bas"
targetWB.VBProject.VBComponents.Import dirHome & "\auto_openII.bas" 'auto_open voor FaseIII
Kill dirHome & "\`temp4.bas" 'Wissen tijdelijk bestanden
targetWB.Save: targetWB.Close: sourceWB.Close
Application.DisplayAlerts = TrueThe problem:
The sheets I am copying have macro's assigned to them. When I copy the a sheet to another workbook the macro stays assigned to the original workbook. Therefore after opening the "child workbook" the systems prompts with the question whether I want to update te links. I don't want to do this as the macro's are copied also to the new workbook. It should work entirely on its own.
Question:
Is there a way to avoid this? Is it possible to copy a worksheet with it contronls and that is afterwards it is not referring to the original? I know that you can manually set the links to the workbook in use. I am just wondering whether is the a more prettier solution.
Thanks in advance.
