VB i Excel Lukking av arbeidsbøker

[el-asso]

Jeg har lagd en dialogboks i en Excel 2000 arbeidsbok hvor arkene er skjult og brukerne bare ser dialogboksen. Har lagt inn en cmd knapp i dialogboksen for å lukke arbeidsboken, men problemet er at alle andre arbeidsbøker jeg har oppe også blir lukket. Vil gjerne ha det slik at kun den aktuelle arbeidsboka lukkes.

 

Bruker dette:

 

Private Sub Lukk()

Workbooks("Test.XLS").Close SaveChanges:=False

End Sub

 

(Må bare tilføye at jeg ikke har særlig god greie på dette, lagde det ved hjelp av F1-tasten og prøve og feile metoden.)

[offko]

hmmmm..... den virker som den skal hos meg.

 

Kunne kanskje prøve:

 

activeworkbook.close false

 

i steden. Den skal i hvert fall bare forholde seg til den arbeidsboka som er aktiv.

[el-asso]

Takk offko, men desverre hjalp det ikke. Meget snodig. Andre ideer ?

[offko]

Tomt hos meg, er jeg redd.

 

Får forresten ikke til å skjule alle arkene (xp), da gir den feilmelding:-(

 

Koden er vel i en vanlig arbeidsbok? Den er ikke i global eller personlig makro? Finnes det en application.quit noe sted, som kanskje trigges?... som sagt, nokså tomt her, håper andre kan ha noen ideer.

[Cerwell]

ThisWorkbook.Close (False)