Print side | Luk vindue

Application.Quit

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=1638
Udskrevet den: 01.Nov.2024 kl. 01:05


Emne: Application.Quit
Besked fra: icet
Emne: Application.Quit
Posteringsdato: 23.Apr.2014 kl. 16:53
jeg har prøvet at bruge nedenstående men hvis det ark jeg har koden i ikke er det første der er åbnet så sker der ingen ting.... det virker fint hvis det er det første ark der er blevet åbnet ??

nogen bud

mvh
icet





Du lukker Excel således:
Application.Quit
 
MEN
Det kan være lidt farligt, for tænk hvis nu brugeren har mere end ét ark åbent.... så lukkes hele skidtet ned...
Derfor anbefaler jeg at bruge:
 
If Application.Workbooks.Count = 1 Then
Application.DisplayAlerts = False
Application.Quit
Else
ThisWorkbook.Close False
End If
 
Hvis bruger kun har én projektmappe åben, lukkes Excel.
Hvis bruger har flere projektmapper åbne, lukkes kun dit ark.
Giver det mening?
 
//Allan



Svar:
Besked fra: icet
Posteringsdato: 29.Apr.2014 kl. 08:49
lige meget jeg fik selv løst problemet Smile



Print side | Luk vindue