Jste zde: Úvodní stránka » excel » vba-soubory » smazat-soubor-vba-excel

Smazat soubor - MS Excel VBA

Videokurzy Excel

Ve spolupráci se SEDUO jsem vytvořil několik videokurzů:

Jak na Excel - naučte se efektivně využívat Excel - nejoblíbenější (Hodnocení 97%, přes 13.000 studentů, + 750 pozitivních zpětných vazeb) - Získat kurz
MaxiKurz Excel - získejte lepší práci, více peněz, staňte se nepostradatelní (přes 6 hodin videí, 160 lekcí) - Získat kurz
G tabulky... - pokud nemáte rádi Excel využijte kurz na Google-tabulky

...jak smazat pomoci VBA soubor ...

Jak smazat sešit ve VBA?

Smazat aktivní sešit v MS Excel pomocí VBA lze několika způosoby. V příloženém kodu je jedno z mnoha řešení. V úvodu je ještě dotaz zda opravdu požadujete dokument smazat.

VBA Program


Sub Smazat1() 
    On Error Resume Next 
    Kill "\slozka\soubor.xls" 
    On Error Goto 0 
End Sub

VBA Program 2

Smaže aktivní dokument.


Sub Smazat2()

   If MsgBox("Opravdu smazat ?", vbYesNo, "Pozor") <> vbYes Then Exit Sub

      With ActiveWorkbook

      If .Path <> "" Then

      .Saved = True

      .ChangeFileAccess xlReadOnly

      Kill ActiveWorkbook.FullName

   End If

End With 

ActiveWorkbook.Close False

End Sub

Doporučení

Při ukládaní v MS Excel 2010 nezapomeňte soubor správně uložit. tj. jako dokument s makry (s přípomou *.xlsm), jinak se Vám makra neuloží...

Článek byl aktualizován: 19.09.2020 11:07

Odměna

Ušetřil vám tento web čas, peníze? Pomohl vyřešit problém? Jste ochotni poskytnout symbolickou odměnu na další rozvoj? Vybrte si formu odměny, která vám vyhovuje.

Pavel Lasák - autor webu

Microsoft Office (Word, Excel, Google tabulky, PowerPoint) se věnuji od roku 2000 (od 2004 na této doméně) - V roce 2017 jsem od Microsoft získal prestižní ocenění MVP (zatím jsem jediný z ČR v kategorií Excel). Své vědomosti a zkušenosti dávám k dispozici i on-line ve videích pro SEDUO. Ve firmách školím a konzultuji, učím na MUNI. Tento web již tvořím přes 15 let. Zdarma je zde přes 1.000 návodu, tipů a triků, včetně přes 250 různých šablon, sešitů.

Komentáře

Zuzana

Přidáno: 05.09.13 16:08

Ahoj, celý ten Program 2 je pro mě dost nesrozumitelný. Proč je například End If před End With Co dělají jednotlivé přílazy ve With? Nemohlo by to být popsáno třeba v komentářích? Je možné někde najít stručný přehled metody(jestli to nazývám správně) co jde použít na objekty s českým popisem co to dělá? Jako workbook - otevřít, zavřít, uložit, uložit jako, nastavit jen pro čtení, .... ? děkuji, Zuzka