Indholdsfortegnelse
Test om projektmappen er åben
Her er en reel grundkode til test, hvis en projektmappe i øjeblikket er åben ved at teste for en projektmappes navn, ikke det fuldt kvalificerede navn inklusive stien.
Jeg skrev kode i et regneark, der ændrede ark i en anden projektmappe, og ville sikre mig, at projektmappe 2 var åben, før koden blev udført i projektmappe 1.
Sub TestByWorkbookName () Dim wb som projektmappe for hver wb i projektmapper Hvis wb.Name = "New Microsoft Excel Worksheet.xls" Så fandt MsgBox "Exit Sub 'call code here, we just exit for now End If Next End Sub
