Code Snippets "VBA Excel"
4 Zeilen und 4 Spalten ab aktueller Zelle markieren
Abfrage von Excel-Einstellungen für Dezimalzeichen, Tausendertrennzeichen und Listentrennzeichen
Absolute Bezüge eines benannten Bereiches für den übergebenen Namen
inklusive Fehlerbehandlung, falls Name nicht existiert
Absolute Spaltennummer der letzten Spalte des ausgewählten Zellbereichs
Aktualisierung des Bildschirms während Makro verhindern
Aktuelle Region markieren (rechteckiger ausgefüllter Bereich um aktive Zelle)
Alle Arbeitsblätter einer Arbeitsmappe auswählen, d.h. gruppieren
Alle Datumswerte in einer Markierung um 365 Tage nach vorne schieben
Achtung: Dieser Makro überschreibt Formeln!
Alle externen Bezüge in einer Arbeitsmappe durch fixe Werte ersetzen
Alle gruppierten Blätter mit Blattschutz ohne Passwort versehen
Bei gruppierten Blättern wird Gruppierung aufgehoben und am Ende inklusive Auswahl des aktiven Blattes wiederhergestellt
Alle leeren Zellen im ausgefüllten Bereich eines Blattes markieren
Alle Zellen im markierten Bereich mit Zufallszahlen zwischen 0 und 1000 füllen
Alle Zellen mit Formeln auswählen
Anzahl von Blättern, Tabellenblättern, eingebetteten Diagrammen einer Arbeitsmappe ausgeben
Anzahl Zellen in einer Auswahl
Auf letzte ausgefüllte Zelle in aktueller Zeile springen
Aus Excel-Namen den Namen des zugehörigen Blattes ableiten
Beispiel für aufgezeichneten Makro, der Titel formatiert
Bestimmte Blätter einer Arbeitsmappe löschen
Buchstabe der letzten benutzten Spalte eines Arbeitsblatts
Dateiname einer Arbeitsmappe ausgeben
Gibt den Dateinamen inklusive Endung, aber ohne Pfad zurück von der Datei, in der ein Makro läuft
Dialogfenster "Datei öffnen" liefert Dateinamen zurück und fängt Abbrechen ab
Eine bestimmte Verarbeitung für jede Zelle im markierten Bereich machen
Error-Behandlung ist lokal
Der Code zeigt, dass "On Error Resume Next" nur innerhalb der aufgerufenen Funktion gilt, in der aufrufenden Funktion gilt ..goto..
Erstellt eine neue leere Arbeitsmappe, fügt zwei neue Tabellenblätter ein und benennt sie
Erstes Blatt einer Arbeitsmappe aktivieren
Excel-Funktion zur Überprüfung der Gültigkeitsprüfung
Wie Excelfunktion verwendbar, v.a. für nachträgliche Überprüfung bei Dateneingabe oder Erstellung der Gültigkeitsprüfung via VBA
Excelfunktion Matrixverweis für Webqueries mit veränderlichen Layouts
Existiert auf einer Zelle oder einem Zellbereich eine Gültigkeitsprüfung (Validierung)
Funktionen, die aus einem Bereich erste und letzte Zeile oder Spalte auslesen
Für alle Blätter einer Arbeitsmappe Fusszeile mit Text, Datum und Dateinamen einfügen
Für alle Dateien in einem Verzeichnis INSERT-Statements generieren
Gibt Inhalt einer Zelle als Ascii-Werte aus
Damit findet man heraus, dass der Umbruch in Zelle Ascii-Zeichen Nr 10 ist, d.h. LineFeed
Hebt Blattschutz aller Blätter auf, wenn kein Passwortschutz vorliegt
Bei gruppierten Blättern wird Gruppierung aufgehoben und am Ende inklusive Auswahl des aktiven Blattes wiederhergestellt
Herdt Excel 2003 VBA 2.8 Übung 1
Formatiert ausgewählten Bereich mit Euro-Format
Herdt Excel 2003 VBA 2.8 Übung 2
Kopfzeile mit Dateinamen und Fusszeile mit Seitenzahl
Hexadezimalen Wert des Tabulators oder Zeilenumbruchs ausgeben
Import mehrerer Textdateien mit Dialogfenster
In ausgewählten Zellen Zufallszahlen aus einem bestimmten Bereich erzeugen
funktioniert auch mit mehreren nichtzusammenhängenden Markierungen
In Excel VBA ganze Spalte oder Zeile auswählen
In markiertem Zellbereich Leerzeilen suchen und löschen
Jede 5. Zeile mit Linie versehen (im bearbeiteten Bereich)
Letztes Blatt einer Arbeitsmappe aktivieren
Markiert alle ungesperrten Zellen des aktiven Blattes, vergrössert Range mit Union(..)
Praktische Routine zum Testen von teilweise gesperrten Arbeitsblättern. Illustriert, wie sich mit Union(..) Zellbereiche erweitern lassen
Markiert alle Zellen mit bedingten Formaten auf aktivem Blatt
Markiert den rechteckigen Bereich, der im aktiven Arbeitsblatt bearbeitet ist
Reagiert auf Werte, Formeln und Formatierungen, nicht aber auf bedingte Formatierung und Gültigkeitsprüfung
Markiert erste frei Spalte nach bearbeitetem Bereich
Mit Is prüfen, ob zwei Variablen auf dasselbe Objekt zeigen
Neue Arbeitsmappe mit 12 Arbeitsblättern für die Monate erstellen
Spaltennummer der letzten ausgefüllten Spalte zurückgeben
Springt von ausgefüllter Zelle in Spalte nach unten
Springt in die letzte ausgefüllte Zelle der Spalte vor der nächsten leeren Zelle, sofern die aktive Zelle und die Zelle darunter ausgefüllt sind
Springt von ausgefüllter Zelle in Zeile nach rechts
Springt in die letzte ausgefüllte Zelle der Zeile vor der nächsten leeren Zelle, sofern die aktive Zelle und die Zelle rechts davon ausgefüllt sind
Stellt für externe Query mit Access-DB Connection wieder her
funktioniert nur, wenn Excel- und Accessdatei im gleichen Verzeichnis sind und Access-Datei so heisst wie bezeichnet; Beim Öffnen die Shift-Taste halten, damit Makro nicht losgeht
Typ eines Blattes abfragen
Mögliche Werte sind:
- xlWorksheet
- xlChart
- xlExcel4IntlMacroSheet
- xlExcel4MacroSheet
- xlDialogSheet
TypeName ist eine Funktion, die den Typ einer Variablen oder eines Objekts liefert
Verarbeitung erfolgt, wenn User OK-Taste drückt
Von aktiver Zelle drei Zeilen nach unten springen
Von Blattanfang bis zu aktiver Zelle markieren
Vorletztes Blatt einer Mappe auswählen
Wählt alle Zeilen des Blocks um die aktive Zelle aus, sofern der Block mehr als 1 Zelle umfasst
Wählt die allerletzte existierende Zelle in Blatt aus
Wählt die letzte ausgefüllte Zelle in der Spalte der aktiven Zelle aus
Wählt die letzte Zelle im ausgefüllten Bereich eines Blattes aus
Webqueries mit Timer aktualisieren (erlaubt Abstände von weniger als einer Minute)
Weist den Zellbereich eines Namens einer Objektvariablen zu und liest Adresse aus
Werte von Zellen setzen oder auslesen
Zeigt vorhandene Verweise in einem Projekt an
Verweise werden in der zugehörigen Arbeitsmappe gespeichert.
Achung: Zugriff auf Verweise geht unter XP und 2003 nur mit Einstellung
'Extras - Makro - Sicherheit - Register Vertrauenswürdige Quellen - Zugriff auf Visual Basic Projekt vertrauen
Zellen mit Zufallsfarbe formatieren
Excel hat 56 Farben in der Standardpalette.
Zellen und Zellbereiche in Excel auswählen oder bearbeiten
Zusammenstellung der verschiedenen Möglichkeiten, auf Zellen oder Zellbereiche zuzugreifen (inkl. Schleifen, Range speichern, rel. und abs. Bezüge)
Zweidimensionaler SVERWEIS
Anhand von Suchargument für die oberste Zeile und für die linke Spalte wird ein Wert zurückgegeben