Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema ListBox
BildScreenshot zu ListBox ListBox-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema TextBox
BildScreenshot zu TextBox TextBox-Seite mit Beispielarbeitsmappe aufrufen

zu einer geöffneten datei wechseln

    Betrifft: zu einer geöffneten datei wechseln von: peter
    Geschrieben am: 31.08.2003 23:43:33

    hallo,

    wie kann ich eine datei durch einen makro von der platte löschen.

    die datei z.b. mit dem namen test.xls auf dem laufwerk c:\temp

    geht das?

    und wie kann ich eine datei mit einen makro schließen, ohne speicher abfrage?

    danke schon mal

    gruß
    peter

      


    Betrifft: AW: zu einer geöffneten datei wechseln von: PeterW
    Geschrieben am: 31.08.2003 23:53:38

    Hallo Peter,

    schau dir in der VBA-Hilfe mal KILL zum Löschen einer Datei an.

    In DieseArbeitsmappe folgenden Code

    Private Sub Workbook_BeforeClose(Cancel As Boolean)
      Saved = True
    End Sub
    

    Gruß
    Peter
    PS: bei VBA nein solltest du mit beiden Vorschlägen umsichtig umgehen :-)


      


    Betrifft: AW: zu einer geöffneten datei wechseln von: Viktor
    Geschrieben am: 01.09.2003 00:02:59

    Hallo Peter,

    so löschst du eine Datei:
    Kill Pfad\Datei
    z.b. Kill "c:\temp\test.xls"

    so löschst du alle xls-files im aktuellen Verzeichnis:
    Kill "*.xls"

    so kannst du eine xls-Datei schließen ohne Speicherabfrage:
    ActiveWorkbook.Saved = True
    ActiveWorkbook.Close
    Du unterdrückst die Abfrage in dem du "Saved" vortäuschst

    gruß
    Viktor


      


    Betrifft: vielen dank :-) o.T. von: peter
    Geschrieben am: 01.09.2003 00:11:15

    -


      


    Betrifft: AW: zu einer geöffneten datei wechseln von: gerhard
    Geschrieben am: 01.09.2003 00:06:04

    hallo peter
    versuch es mal damit

    den code ein modul kopieren

    Option Explicit

    Sub SpeichernUndVerlassen()
    '
    ' SpeichernUndVerlassen Makro
    ' Makro am 01.09.2003 von Gerhard Frey aufgezeichnet
    '
    '
        ActiveWorkbook.Save
        ActiveWorkbook.Close
    End Sub
    


    diesen code einer schaltfläche zuweisen

    gruß
    Gerhard


      


    Betrifft: auch hier vielen dank :-) o.T. von: peter
    Geschrieben am: 01.09.2003 00:12:10

    .


     

    Beiträge aus den Excel-Beispielen zum Thema " zu einer geöffneten datei wechseln"