![]() |
|
Tipp 0377
|
Arbeitsmappe (offene) löschen
|
 |
|
Autor/Einsender:
Datum: |
|
Angie
04.01.2004 |
|
| Entwicklungsumgebung: |
|
Excel 97 |
|
|
|
Mit den folgenden wenigen Zeilen Code lässt sich eine in Excel offene Arbeitsmappe löschen, in
folgendem Beispiel die aktive Arbeitsmappe.
|
|
Da die angegebene Arbeitsmappe ohne Rückfrage unwiderruflich vom Datenträger gelöscht wird,
sollte der Code mit größter Vorsicht angewandt werden!
|
|
| |
Sub DeleteOpenWorkbook()
With ActiveWorkbook
If Len(.Path) > 0 Then
.Saved = True
.ChangeFileAccess xlReadOnly
Kill .FullName
.Close False
Else
.Saved = True
.Close False
End If
End With
End Sub
|
|
|
|
|
|
Die im Download befindliche *.bas-Datei kann in Excel im VB-Editor importiert werden.
|
|
|
|
|
|
| Windows-Version |
| 95 |
 |
|
| 98/SE |
|
|
| ME |
|
|
| NT |
|
|
| 2000 |
|
|
| XP |
|
|
| Vista |
|
|
| Win
7 |
|
|
|
| Excel-Version |
| 95 |
 |
|
| 97 |
|
|
| 2000 |
|
|
| 2002
(XP) |
|
|
| 2003 |
|
|
| 2007 |
|
|
| 2010 |
|
|
|
|
Download (1,4 kB)
|
Downloads bisher: [ 757 ]
|
|
|
Vorheriger Tipp
Zum Seitenanfang 