Das Makro öffnet eine CSV-Datei, dabei wird die Formatierung der Spalten (Text, Zahl, Datum, etc.) mit übergeben. Aus der geöffneten Datei wird ein Bereich kopiert und in der Datei ("ziel.xls") eingefügt, aus der das Makro aufgerufen wurde.
Das Makro erwartet die Angabe zweier Zellen. Anschließend wird der damit abgegrenzte Bereich in Zahlen umgewandelt. Diese Funktion ist beim Import aus Fremdformaten (z. B. CSV-Dateien) nützlich.
Das Makro erwartet einen Dateinamen und den Pfad zu dieser Datei als Parameter. Es prüft, ob die Datei bereits geöffnet ist und aktiviert dann dieses Fenster. Ist die Datei noch nicht geöffnet, wird sie geladen.
Das Makro erwartet die Angabe eines Arbeitsblatts, einer Spalte und den zu durchsuchenden Bereich von/bis. Der Rückgabewert gibt die Zeile an, an der sich die erste leere Zelle befindet.
Die folgende Funktion kann über ein Makro die Funktion Datenmaske starten. Anschließend erfolgt der Rücksprung auf das Blatt Startseite.
Sub Erfassung()
Sheets("Erfassung").Select
Range("A2").Activate
ActiveSheet.ShowDataForm
Range("A2").Select
Sheets("Startseite").Select
End Sub