vba:access:classes:xlsxeporter_101
Differences
This shows you the differences between two versions of the page.
| Both sides previous revision Previous revision Next revision | Previous revision | ||
|
vba:access:classes:xlsxeporter_101 [27.01.2015 12:57:10] yaslaw |
vba:access:classes:xlsxeporter_101 [29.04.2015 12:46:40] (current) yaslaw vba:access:xlsxeporter_101 renamed to vba:access:classes:xlsxeporter_101 |
||
|---|---|---|---|
| Line 1: | Line 1: | ||
| <const> | <const> | ||
| - | version=1.0.0 | + | version=1.0.1 |
| - | vdate=27.01.2015 | + | vdate=18.01.2015 |
| - | fname=xlsxexporter.cls | + | fname=xlsxexporter_101.cls |
| ns=%NAMESPACE% | ns=%NAMESPACE% | ||
| fpath=/vba/access | fpath=/vba/access | ||
| </const> | </const> | ||
| - | ====== [VBA][Access] XlsxExporter ====== | + | ====== [VBA][Access] XlsxExporter 1.0.1 ====== |
| + | //Exporter MS Access nach Excel. Die Einfache Version.// | ||
| ==Version %%version%% %%vdate%%== | ==Version %%version%% %%vdate%%== | ||
| <WRAP right round download 50%> | <WRAP right round download 50%> | ||
| - | ><fc #808080>//Das Modul hat versteckte Attribute. Damit diese aktiv übernommen werden reicht es nicht aus, den Code in ein neues Modul zu kopieren. Man muss das Modul aus der Datei nach VBA importieren.//</fc> | + | ><fc #808080>//Die Klasse hat versteckte Attribute. Damit diese aktiv übernommen werden reicht es nicht aus, den Code in ein neues Modul zu kopieren. Man muss das Modul aus der Datei nach VBA importieren.//</fc> |
| >{{popup>:vba:vba_importfile.png|Bild zum Import}} | >{{popup>:vba:vba_importfile.png|Bild zum Import}} | ||
| Line 15: | Line 17: | ||
| </WRAP> | </WRAP> | ||
| - | Eine kleine Klasse um schnell Daten aus Access nach Excel zu exportieren und dabei noch einige Formatierungen machen will | + | Eine kleine Klasse um schnell Daten aus Access nach Excel zu exportieren. Sie bietet die Möglichkeit, dann gleich noch einige Excel-Formatierungen durchzuführen. |
| + | |||
| + | Die neue, ausgebaute und komplexere Version findest du hier: [[vba:access:xlsxexporter]] | ||
| <WRAP clear></WRAP> | <WRAP clear></WRAP> | ||
| Line 23: | Line 27: | ||
| ===== Definitionen ===== | ===== Definitionen ===== | ||
| >Genauere Doumentaion folgt | >Genauere Doumentaion folgt | ||
| - | Wird das Objekt terminiert, wirdautomatisch die Methode quit() ausgeführt. Die Änderungen werden dabei gespeichert und die internen Objekte (Excel-Instance,Workbook etc.) geschlossen und abgebaut | + | Wird das Objekt terminiert, wird automatisch die Methode quit() ausgeführt. Die Änderungen werden dabei gespeichert und die internen Objekte (Excel-Instance,Workbook etc.) geschlossen und abgebaut. |
| + | ==== Enumerator ==== | ||
| + | === xeParams === | ||
| + | Diekombinierbaren Parameter für den Export | ||
| + | Die Parameter können kompiniert werden. zB. xeReplaceExistFile+xeHasFieldNames | ||
| + | <code vb>Public Enum xeParams | ||
| + | xeNone = 0 'Kein Parameter | ||
| + | xeReplaceExistFile = 2 ^ 0 'Falls die Exportdatei bereits exisitert, kann diese ersetzt werden | ||
| + | xeHasFieldNames = 2 ^ 1 'Feldnamen werden in die erste Zeile geschrieben | ||
| + | End Enum</code> | ||
| ==== Methoden ==== | ==== Methoden ==== | ||
| === export() === | === export() === | ||
| + | <code>object.export(source, filepath [,spreadsheettype [,params]])</code> | ||
| + | <code vb>Public Sub export( _ | ||
| + | ByRef iSource As Variant, _ | ||
| + | ByVal iFilePath As String, _ | ||
| + | Optional ByVal iSpreadSheetType As AcSpreadSheetType = acSpreadsheetTypeExcel12Xml, _ | ||
| + | Optional ByVal iParams As xeParams = xeReplaceExistFile + xeHasFieldNames _ | ||
| + | )</code> | ||
| + | * **iSource** Quelle. Tabellenname oder View-Name oder SQL-String | ||
| + | * **iFilePath** Export-Pfad. Pfad zur Datei dieerstellt werdn soll. | ||
| + | * **iSpreadSheetType** Excel-Format. Typ des Spreadsheets. Standart: Excel-12 XML | ||
| + | * **iParams** Parameters. verscheidene Parameter. Siehe [[#xeparams|Enumerator xeParams]] | ||
| + | |||
| Mit export()exportiert man eine Quelle in ein Excel-Sheet | Mit export()exportiert man eine Quelle in ein Excel-Sheet | ||
| === instance() === | === instance() === | ||
| - | Eine neue Instanz der Klasse wird angelegt und der Export wird durchgeführt | + | <code>Set object = XlsExporter.instance(source, filepath [,spreadsheettype [,params]])</code> |
| + | <code>Set object = XlsExporter(source, filepath [,spreadsheettype [,params]])</code> | ||
| + | Eine neue Instanz der Klasse wird angelegt und der Export wird durchgeführt. | ||
| + | |||
| + | Die Parameter entsprechen denen der [[#export|Methode export()]] | ||
| + | |||
| + | Die Methode instance() hat das versteckte Attribut ''Attribute instance.VB_UserMemId = 0''. Dadurch lässt sie sich direkt aus der Klasse ausführen. | ||
| === quit() === | === quit() === | ||
| + | <code>object.quit [save Yes/No]</code> | ||
| Speicher das offene Workbook und schliesst die Datei und die Excelinstanz | Speicher das offene Workbook und schliesst die Datei und die Excelinstanz | ||
| Line 38: | Line 70: | ||
| === range === | === range === | ||
| - | Mit demRange-Property greifftmandirekt auf das Worksheet mit den exporetierten Daten zu. Der Aufruf ist analog zu Excel. Mit dem Range kann man direkt Formatierungen etc. analog zu Excel-VBA im Excelsheet durchführen. | + | <code>range = object.range([Cell1 [,Cell2]])</code> |
| + | <code>range = object.sheet.range([Cell1 [,Cell2]])</code> | ||
| + | Mit dem range-Property greifft man direkt auf das Worksheet mit den exporetierten Daten zu. Der Aufruf ist analog zu Excel. Mit dem Range kann man direkt Formatierungen etc. analog zu Excel-VBA im Excelsheet durchführen. Es ist identisch wie das .sheet.range. Aber da man den Range am meisten braucht, habe ich ihn extra hinzugefügt | ||
| - | ===== Beispiel ===== | + | === sheet === |
| + | <code>sheet = object.sheet</code> | ||
| + | Das sheet-Property gibt eine Referenz auf das Worksheet. Damit lassen sich ganz normale Worksheetbefehle absetzen | ||
| + | |||
| + | ---- | ||
| + | ===== Beispiele ===== | ||
| Erste Zeile und erste Spalte Fett setzen. | Erste Zeile und erste Spalte Fett setzen. | ||
| <code vb> | <code vb> | ||
| Line 63: | Line 102: | ||
| </code> | </code> | ||
| + | ---- | ||
| ===== Code ===== | ===== Code ===== | ||
| <source '%%fpath%%/%%fname%%' vb> | <source '%%fpath%%/%%fname%%' vb> | ||
vba/access/classes/xlsxeporter_101.1422359830.txt.gz · Last modified: 27.01.2015 12:57:10 by yaslaw
Page Tools
Except where otherwise noted, content on this wiki is licensed under the following license: GNU Free Documentation License 1.3
