VBA Excel: Kopiere et sheet fra et regneark til et andet
Koden nedenfor åbner en xls-fil (MasterFilenameAndPath), kopierer et sheet fra MasterFilenameAndPath over i det aktuelle regneark, og lukker MasterFilenameAndPath igen.Det virker fint - men hvis jeg kopiere det samme sheet fra MasterFilenameAndPath over mere end een gang, får jeg pop-up:
"a formula or sheet you want to move or copy contains the name 'n', which allready exists on the destination worksheet. Do you want to use this version of the name (Yes / No)"
Den pop-up gider jeg ikke se på, jeg vil bare svare Yes pr default, så brugeren ikke bliver spurgt. HVORDAN gør jeg dette?
Lidt på samme måde som jeg undlader at spørge brugeren om han vil gemme ændringer når MasterFilenameAndPath lukkes ved at skrive 'ActiveWindow.Close False' (false = svarer automatisk Nej til at gemme ændringer)
koden:
WBName = ActiveWorkbook.Name
Workbooks.Open Filename:=MasterFilenameAndPath, ReadOnly:=True
Sheets(SheetnameToCopy).Select
Sheets(SheetnameToCopy).Copy BeFore:=Workbooks(WBName).Sheets(1) '<----Her ville jeg gerne fortælle at den bare skal svare Yes til evt. spørgsmål
Windows(MasterFileName).Activate
ActiveWindow.Close False
