Met VBA-code kopieer ik twee tabbladen naar een nieuw workbook.
Het bron bestand is een xlsm bestand (Workbook1). Het 'nieuwe' doelbestand met de twee tabbladen is een xlsx bestand (Workbook2).
Ik gebruik o.a. de volgende code:
Op zich werkt de macro prima, maar bij het opslaan van Workbook2 krijg is de volgde melding.
Het lijkt er op dat er in Workbook2 nog macro's zitten. Dit is echter niet het geval! Het zijn twee op zich zelf staande tabbladen.
Het verbaast mij dat deze melding komt.
De gebruiker moet dus altijd nog op 'ja' klikken, zodat workbook2 gesaved wordt zonder macro's.
Is deze melding te ondervangen met VBA-code?
Het bron bestand is een xlsm bestand (Workbook1). Het 'nieuwe' doelbestand met de twee tabbladen is een xlsx bestand (Workbook2).
Ik gebruik o.a. de volgende code:
Code:
' <workbook1 is actief>
Kenmerk = Worksheets("naamtabblad").Range("G6")
Omschrijving = Worksheets("naamtabblad").Range("G7")
......
'<workbook 2 is actief> / deze moet dus als xlsx gesaved worden, liefst zonder melding / vraag.
filenaam = "Uitgangspunten - " & Kenmerk & " - " & Omschrijving
Application.Dialogs(xlDialogSaveAs).Show filenaam
Op zich werkt de macro prima, maar bij het opslaan van Workbook2 krijg is de volgde melding.
Het lijkt er op dat er in Workbook2 nog macro's zitten. Dit is echter niet het geval! Het zijn twee op zich zelf staande tabbladen.
Het verbaast mij dat deze melding komt.
De gebruiker moet dus altijd nog op 'ja' klikken, zodat workbook2 gesaved wordt zonder macro's.
Is deze melding te ondervangen met VBA-code?