Metoda SaveAs v programovacím jazyce VBA Excel je navržena tak, aby udržela aktivní knihu v zadaném formátu a po dané cestě. Je jednou z nejdůležitějších metod, které se používají při vytváření automatických sestav, exportu dat a dalších operacích se soubory Excel. V tomto článku se podíváme na základní parametry metody SaveAs a její použití v různých situacích.
Hlavním parametrem metody SaveAs je cesta k souboru, do kterého chcete uložit aktivní sešit. Cesta je nastavena jako řádek, který obsahuje celou cestu a název souboru, včetně přípony. Může to být jako absolutní cesta (např. C:\Reports\Report1..xlsx") a relativní cesta (např. "Reports\Report1.xlsx").
Kromě toho metoda SaveAs umožňuje zadat další možnosti uložení, jako je formát souboru, heslo k otevření nebo úpravě, definice konfliktu a další. K zadání parametrů se používají pojmenované argumenty metody SaveAs, které se po cestě k souboru předávají jako pár "jméno_parametru:=hodnota".
Příklady použití metody SaveAs:
Uložení knihy ve formátu Excel 97-2003:
ActiveWorkbook.SaveAs "C:\Reports\Report1.xls", FileFormat:=xlExcel8
Uložení knihy s heslem na otevření:
ActiveWorkbook.SaveAs "C:\Reports\Report1.xlsx", Password:="mypassword"
Uložení knihy s automatickým přepisem existujícího souboru:
ActiveWorkbook.SaveAs "C:\Reports\Report1.xlsx", ConflictResolution:=xlLocalSessionChanges
Metoda SaveAs v aplikaci VBA Excel poskytuje mnoho možností pro správu procesu ukládání knihy. Jeho správné použití umožňuje vytvářet automatizované procesy práce se soubory Excel, což může výrazně zlepšit efektivitu práce s daty a reportování.
Metoda SaveAs v aplikaci VBA Excel
Základní parametry metody SaveAs v aplikaci VBA Excel:
- FileName : povinná možnost, představuje celý název souboru (včetně přípony) a cestu k uložení. Například "C:\Documents\Workbook..xlsx".
- FileFormat: povinná volba, určuje formát souboru pro uložení. Hodnoty tohoto parametru odpovídají konstantám definovaným v objektu xlFileFormat . Například xlOpenXMLWorkbook pro uložení ve formátu .XLSX nebo xlCSV pro uložení ve formátu .csv.
- Password: volitelná možnost, představuje heslo pro ochranu souboru. Například "password123".
- WriteResPassword: volitelná možnost, představuje heslo pro ochranu zápisu v souboru. Například "write123".
- ReadOnlyRecommended : volitelná možnost určuje, zda doporučit otevření souboru pouze pro čtení. Bere hodnotu True nebo False .
- CreateBackup: volitelná možnost, určuje, zda chcete zálohovat soubor. Bere hodnotu True nebo False .
Příklad použití metody SaveAs:
Sub SaveWorkbook()Dim wb As WorkbookSet wb = ThisWorkbook' Сохранение книги с указанными параметрамиwb.SaveAs Filename:="C:\Documents\Workbook.xlsx", FileFormat:=xlOpenXMLWorkbook, _Password:="password123", WriteResPassword:="write123", ReadOnlyRecommended:=False, CreateBackup:=FalseEnd Sub
V tomto příkladu metoda SaveAs ukládá aktivní knihu s názvem " Workbook.xlsx ve formátu .xlsx, s heslem pro ochranu souboru " password123 "a heslem pro ochranu záznamu"write123". Doporučení pro otevření souboru pouze pro čtení je zakázáno a nebude vytvořena žádná záloha souboru.
Metoda SaveAs v aplikaci VBA Excel poskytuje flexibilní možnost ukládání souborů v různých formátech a s různými možnostmi. Naučit se používat tuto metodu pomůže automatizovat ukládání dat v Excelu a ušetřit čas a úsilí.
Základní parametry SaveAs
Metoda SaveAs v aplikaci VBA Excel umožňuje uložit aktivní sešit aplikace Excel do zadaného formátu. Metoda přijímá několik možností, které vám umožňují spravovat ukládání a nastavení souboru.
Filename: Možnost Filename určuje cestu a název souboru, do kterého bude kniha uložena. Můžete zadat jak absolutní cestu k souboru, tak relativní cestu vzhledem k aktuálnímu pracovnímu adresáři. Například:
ActiveWorkbook.SaveAs Filename:="C:\user\Documents\Workbook.xlsx" ActiveWorkbook.SaveAs Filename:="..\Documents\Workbook.xlsx"
FileFormat: Možnost FileFormat určuje formát souboru, do kterého bude kniha uložena. Hodnota tohoto parametru by měla být převzata z konstant definovaných v objektu FileFormat. Například:
ActiveWorkbook.SaveAs Filename:="Workbook.xlsx", FileFormat:=xlOpenXMLWorkbook
Password: Možnost Password umožňuje nastavit heslo pro ochranu souboru. Při otevření souboru budete muset zadat zadané heslo. Například:
ActiveWorkbook.SaveAs Filename:="Workbook.xlsx", Password:="mypassword"
WriteResPassword: Možnost WriteResPassword umožňuje nastavit heslo pro ochranu struktury knihy. Při pokusu o změnu struktury knihy bude nutné zadat zadané heslo. Například:
ActiveWorkbook.SaveAs Filename:="Workbook.xlsx", WriteResPassword:="mypassword"
ReadOnlyRecommended: Možnost ReadOnlyRecommended nastavuje režim "pouze pro čtení na doporučení". Pokud je nastavení nastaveno na True, zobrazí se při otevření souboru zpráva s návrhem otevřít soubor v režimu "pouze pro čtení". Například:
ActiveWorkbook.SaveAs Filename:="Workbook.xlsx", ReadOnlyRecommended:=True
To jsou jen některé ze základních parametrů, které lze použít s metodou SaveAs VBA Excel. S vědomím těchto možností budete moci nakonfigurovat ukládání souborů podle vašich požadavků a potřeb.
Použití metody SaveAs
Základní parametry metody SaveAs:
FileName: řádek, povinná možnost, určuje název souboru a jeho umístění. Může to být úplná cesta k souboru nebo pouze název souboru, pokud je uložen v aktuálním pracovním adresáři.
FileFormat: volitelné nastavení, určuje formát souboru pro uložení. Může to být jedna z předdefinovaných hodnot, jako je xls, xlsx, csv, pdf atd. nebo číselná hodnota, která odpovídá určitému formátu souboru.
Password: volitelná možnost, umožňuje nastavit heslo pro ochranu souboru před neoprávněným přístupem.
WriteResPassword: volitelná možnost, umožňuje nastavit heslo pro ochranu souboru před změnami.
ReadOnlyRecommended: volitelná možnost, označuje, že soubor by měl být otevřen pouze pro čtení, aby se zabránilo náhodným změnám.
CreateBackup: volitelná možnost určuje, zda je nutné před uložením zálohovat soubor.
ConflictResolution: volitelná možnost určuje, jak řešit vzniklé konflikty při ukládání souboru se stejným názvem do stejného adresáře. Může obsahovat hodnotu xllocalsessionchanges nebo xlOtherSessionChanges.
AccessMode: volitelná volba určuje režim přístupu k uloženému souboru. Může obsahovat hodnotu Flexclusive nebo xlShared.
Příklad použití metody SaveAs:
Sub SaveWorkbook()Dim fileName As StringfileName = "C:\Users\Username\Documents\NewWorkbook.xlsx"' Сохранение файла в формате xlsxThisWorkbook.SaveAs fileName, FileFormat:=xlOpenXMLWorkbook' Сохранение файла с паролемThisWorkbook.SaveAs fileName, Password:="password123"' Сохранение файла с резервной копиейThisWorkbook.SaveAs fileName, CreateBackup:=TrueEnd Sub
Metoda SaveAs je výkonný nástroj pro ukládání souborů v různých formátech a konfiguraci možností ukládání. Umožňuje automatizovat a zjednodušit proces ukládání dokumentů VBA Excel.
Příklady použití SaveAs v aplikaci VBA Excel
Metoda SaveAs v aplikaci VBA Excel umožňuje ukládat soubory s různými formáty a možnostmi. Níže je několik příkladů jeho použití:
Příklad 1:
Předpokládejme, že máme aktivní knihu (Workbook) s daty, která chceme uložit ve formátu CSV (čárka jako oddělovač). Můžeme použít následující kód:
Sub SaveAsCSV()ActiveWorkbook.SaveAs Filename:="C:\Путь\КФайлу.csv", FileFormat:=xlCSV, _Local:=True, CreateBackup:=FalseEnd Sub
V tomto příkladu metoda SaveAs uloží aktivní sešit ve formátu CSV na zadanou cestu s názvem "soubor".csv". Parametr FileFormat:=xlCSV označuje formát CSV a možnost Local:=True říká Excelu, aby použil místní nastavení oddělovačů (v tomto případě čárku).
Příklad 2:
Řekněme, že chceme uložit aktivní sešit ve formátu Excel s příponou XLSX a pomocí hesla otevřít soubor. Můžeme použít následující kód:
Sub SaveAsXLSXWithPassword()ActiveWorkbook.SaveAs Filename:="C:\Путь\КФайлу.xlsx", FileFormat:=xlOpenXMLWorkbook, _Password:="Пароль", WriteResPassword:="Пароль2", _Local:=True, CreateBackup:=FalseEnd Sub
V tomto příkladu metoda SaveAs uloží aktivní sešit ve formátu Excel XLSX na zadanou cestu s názvem "soubor".xlsx". Možnost FileFormat:=xlopenxmlworkbook označuje formát XLSX a možnosti Password a WriteResPassword umožňují nastavit hesla pro otevření a úpravu souboru.
Příklad 3:
Předpokládejme, že máme aktivní list (Worksheet) s tabulkou a chceme uložit jeho obsah jako PDF pomocí nastavených možností tisku. Můžeme použít následující kód:
Sub SaveAsPDFWithPrintOptions()ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _Filename:="C:\Путь\КФайлу.pdf", Quality:=xlQualityStandard, _IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=TrueEnd Sub
V tomto příkladu metoda ExportAsFixedFormat ukládá aktivní list (tabulku) ve formátu PDF na zadanou cestu s názvem "soubor".pdf". Parametry kvality: = xlQualityStandard, IncludeDocProperties:=True a IgnorePrintAreas:=False nastavují standardní kvalitu PDF, obsahují dokumentové vlastnosti a ignorují oblasti tisku listu. Openafterpublish:=True otevře soubor po uložení.
Výše uvedené příklady ukazují hlavní možnosti metody SaveAs v aplikaci VBA Excel. Můžete změnit nastavení podle svých potřeb a požadavků na ukládání souborů.