Filhåndtering med VBA - kopiere fil fra mappe uden at åbne filen
Jeg vil gerne have en eksperts hjælp til at kopiere en .notebook-fil over i en mappe som jeg har dedikeret til formålet.Det skal ende med at jeg tager en daglig kopi, og den filtype (".notebook) jeg vil kopiere kan ikke automatiseres på nogen måde, derfor er jeg nødt til at afvikle det fra de vba-procedurer jeg i forvejen afvikler i en Excel-fil.
Kan det lade sig gøre og hvordan?
Jeg har startet på nedenstående procedure til at lave den første testversion.
Sub TstCopy()
Dim StdFolder As String
Dim CopyToFolder As String
Dim CopyFileName As String
StdFolder = "\\server\drev\mappe\undermappe\Smart Board\Vore smartboard filer"
CopyToFolder = "\\server\drev\mappe\undermappe\Smart Board\Vore smartboard filer\backups\driftstavle\"
' nedenstående linie genererer eksempelvis strengen "AutoKopi_20141007.Notebook"
CopyFileName = "\AutoKopi_" & Format(Now, "YYYYMMDD") & ".Notebook"
'Her vil jeg så gerne kalde filen "MitFilNavn.notebook")
der ligger i StdFolder, og skal kopieres over i min backupmappe CopyToFolder.
'Gerne uden at åbne filen. (Proceduren afvikles fra en excelfil, så det er ikke sikkert at brugeren har installeret et program der kan åbne filtypen ".notebook")
End Sub
