Gleich zu Beginn: Hier geht es ausschließlich um VBA, um Makros. Und es sind fast immer recht kleine, nur wenige Zeilen umfassende Programme, die wir Ihnen hier präsentieren. Gestandenen Usern und erst recht Profis wird das meiste bekannt sein, aber man kann aber nie wissen …
Das Ganze soll keine Anhäufung von Lösungen im Mini-Format sein. Erklärungen zu den Code sind nicht ein Teil dieses Angebots. Der Code ist in den meisten Fällen nicht kommentiert, wenn doch, dann sehr knapp. Das ist auch gewollt so, denn wen Sie diese Code-Schnipsel einsetzen wollen und werden, dann müssen Sie auch verstehen, was da geschrieben steht und was da abläuft.
Andere Bereiche dieser Site haben zum Code eine gute Beschreibung oder zumindest eine ausreichende Kommentierung. Dort ist auch unser Anliegen, Wissen zu vermitteln und zum Weiterlernen anzuspornen. Zum hier aufgezeigten Code gibt es gewiss genügend Quellen im Internet, die Ihnen im Einzelfall helfen können.
Die folgende Tabelle ist so aufgebaut: In der linken Spalte sehen Sie die Verknüpfung zum Beitrag mit einem möglichst kurzem Namen, mittig steht eine knappe Beschreibung des Inhaltes und rechts ist das Datum der Veröffentlichung oder der letzten bedeutenden Aktualisierung vermerkt. In der Titelzeile der Tabelle können Sie die Sortiermöglichkeiten nutzen. – Da es im Laufe der Zeit einige mehr Einträge geworden sind und die Tabelle doch nicht mehr so ganz übersichtlich ist, sind unterhalb der Haupt-Tabelle (mit allen Einträgen) noch weitere Tabellen erstellt worden, wo die meisten Links auch noch themenbezogen aufgelistet sind. Hier werden Sie vielleicht schneller fündig.
Gesamt-Übersicht
| Link zum Beitrag | Hinweise zu den verLinkten Beiträgen | Datum |
|---|---|---|
| Enthält die Zelle eine Formel? | Eigene Funktion, die als Wahrheitswert zurück gibt, ob die Zelle eine Formel enthält oder nicht | 02.04.2012 |
| VBA: csv-Export mit Semikolon | Per VBA das Semikolon als Trennzeichen für *.csv verwenden | 02.04.2013 |
| Kommentare gleich groß | Kommentare auf gleiche Größe setzen | 02.04.2015 |
| Nur sichtbare Zellen kopieren | In einem gefilterten Bereich sollen nur die sichtbaren Zellen in die Nachbarspalte kopiert werden. | 03.08.2011 |
| Erste freie Zelle nach Spalte n | In einer definierten Zeile die erste freie Zelle nach einer angegebenen Spalte finden. Danach beispielsweise etwas hinein schreiben. | 04.02.2014 |
| HEUTE() bleibt heute | Bei Änderung: Aktuelles Datum per Code in eine Zelle einfügen | 04.07.2014 |
| Alle leeren Zellen ansprechen | Per VBA alle leeren Zellen eines Bereichs ansprechen | 07.01.2015 |
| Wunsch – Brutto/Netto | Brutto- oder Netto „Wunschbetrag” in Abhängigkeit berechnen. | 07.03.2014 |
| Zähler oder Nenner ausgeben | Dividend oder Divisor einer Funktion als Rückgabe | 08.02.2015 |
| Autor in Mappe festschreiben | Bei jedem öffnen einer Mappe wird automatisch der im Code hinterlegte Autor in die Eigenschaften des Workbooks geschrieben. | 08.04.2011 |
| Makro → Shortcut zuweisen | Einem bestehenden Makro eine Tastenkombination zuweisen | 08.04.2014 |
| Wert statt Formel | Per VBA Formeln in Werte umwandeln | 08.04.2014 |
| Spaltennummer ↔ Spaltenbezeichnung, VBA | Column(„A”)->Column(1), jeweils den anderen Wert berechnen | 10.03.2015 |
| Ultimo()-Funktion | Berechnung des Monatsendes, auch für ältere Excel-Versionen | 11.06.2013 |
| Leere Zellen → Zeilen aus/einblenden | In einem definierten Bereich bei leerer Zelle die Zeile aus bzw. einblenden | 11.08.2013 |
| *.csv-Export (Bereiche) | Bestimmte Bereiche eines Arbeitsblattes als *.csv exportieren. | 14.01.2013 |
| Zahl aus Text holen | Eine sehr einfache Funktion, die aus einem Text die erste Zahl ohne Nachkommastellen herauszieht und zurück gibt. Eher eine Basis zum lernen als für den täglichen Einsatz. | 15.08.2008 |
| Druck-Seite ermitteln | Selbst definierte Funktion (UDF), um die Druckseite einer bestimmten Zelle zu ermitteln. | 17.06.2013 |
| Feiertage berechnen (VBA) | Mit einer UDF (selbst definierten Funktion) berechnen, ob ein übergebenes Datum einen Feiertag darstellt. | 20.02.2014 |
| Enthält die Zelle ein Datum? | Selbst definierte Funktion um festzustellen, ob die Zelle ein Datum enthält oder nicht. | 20.02.2014 |
| ComboBox mit Monatsnamen füllen | Ein Kombinationsfeld mit 13 Monaten (MMMM JJJJ) füllen. | 20.02.2014 |
| Timestamp (Kurzversion) | Zeitstempel einfügen bei Änderung in einer Spalte | 20.02.2015 |
| Letzte Zeile/Spalte | Letzte Zeile|Spalte einer bestimmten Spalte|Zeile einer Tabelle als numerischen Wert ausgeben | 21.01.2010 |
| Existiert dieses Tabellenbatt? | 1 Sub und 1 Function zur Prüfung, ob es ein bestimmtes Tabellenblatt (Name) in diesem Workbook gibt | 23.03.2014 |
| Adresse der ersten Zelle in Markierung | Die Adresse der ersten Zelle einer Markierung als String | 23.03.2015 |
| Speed-Test VBA | Geschwindigkeit ist keine Hexerei! 3 Möglichkeiten, um zum gleichen Ziel zu gelangen. | 25.03.2014 |
| Wochentag einer Kalenderwoche | Den Wochentag einer gegebenen Kalenderwoche berechnen | 26.02.2015 |
| #Fehler! per VBA abfangen | Fehlermeldungen in einer Tabelle per VBA finden und entsprechend reagieren. | 27.03.2014 |
| Mehrzeiler in 1 Zelle → aufteilen | Mehrere Zeilen in 1 Zelle in mehrere Zellen aufteilen | 27.05.2014 |
| Nur Zahlen zulassen | In einer Textbox bur Ziffern oder Zahlen als Eingabe zulassen. | 28.03.2014 |
| UDF: Aktuelle Zelladresse nutzen | Adresse, Zeile oder Spalte der Zelle mit einer UDF bestimmen. | 25.07.2015 |
| UserForm zentriert | Eine UserForm immer zentriert im aktiven Fenster öffnen | 22.11.2015 |
| Anzahl Zeichen in Bereich | Einzelne Ziffern / Zeichen in einem Bereich zählen | 25.11.2015 |
| Kalenderwoche von..bis | Ausgabe eines Zeitbereichs der Kalenderwoche eines Datums | 04.12.2015 |
| Kalenderwoche nach ISO bzw. DIN | Kalenderwoche nach DIN/ISO für alle Excel-Versionen | 05.12.2015 |
| Zuletzt gespeicherte Datei öffnen | Die zuletzt gespeicherte Excel-Datei speichern | 06.12.2015 |
| Nur Werk- bzw. Arbeitstage | Nur Werk- bzw. Arbeitstage (ohne bzw. mit Feiertage) in das aktuelle Blatt eintragen | 25.02.2016 |
| Zusammenhängenden Bereich auswählen | Excel erkennt zusammen hängende Bereiche und kann hier verschiedene Selektionen vornehmen | 26.02.2016 |
| Integer-Zahl aus String extrahieren | Ganzzahl aus einem Text extrahieren, rechts, links, mittig | 02.03.2016 |
| VBA-Mappe ohne Makro speichern | Arbeitsmappe, die VBA-Code enthält, ohne den Code speichern | 22.05.2016 |
| Nachkommastellen berechnen | Nachkommastellen einer Zahl oder Ziffernfolge berechnen | 10.07.2016 |
| Nur die neuesten Zeilen anzeigen | Nach Neueingabe einer Zeile in einer Tabelle die oberste sichtbare Datenzeile ausblenden | 23.07.2016 |
| Zu definierter Zelle scrollen/springen | Nach ButtonKlick oder Aktivierung des Blattes Sprung zu Zelle_## | 15.08.2016 |
| Ziffernfolge bestimmter Länge extrahieren | Ziffernfolge einer definierten Länge aus einem Text extrahieren (Funktion) | 12.08.2016 |
| csv-Export mit Anführungsstrichen | Eine Tabelle als *.csv (oder *.txt) so exportieren, dass jedes Feld in Anführungsstriche eingefasst ist. | 18.10.2016 |
| Text-Filenamen in einen Link wandeln | Eine Liste der Filenamen eines (Unter)-Ordners in Hyperlinks umwandeln | 19.10.2016 |
| Hat die Zelle einen Kommentar? | Selbst definierte Funktion (UDF), ob eine Zelle einen Kommentar enthält oder nicht. | 05.12.2016 |
Datum und Zeit (Auszug)
| Link zum Beitrag | Hinweise zu den verLinkten Beiträgen | Datum |
|---|---|---|
| HEUTE() bleibt heute | Bei Änderung: Aktuelles Datum per Code in eine Zelle einfügen | 04.07.2014 |
| Enthält die Zelle ein Datum? | Selbst definierte Funktion um festzustellen, ob die Zelle ein Datum enthält oder nicht. | 18.02.2014 |
| Feiertage berechnen (VBA) | Mit einer UDF (selbst definierten Funktion) berechnen, ob ein übergebenes Datum einen Feiertag darstellt. | 21.02.2014 |
| Timestamp (Kurzversion) | Zeitstempel einfügen bei Änderung in einer Spalte | 20.02.2015 |
| Wochentag einer Kalenderwoche | Den Wochentag einer gegebenen Kalenderwoche berechnen | 26.02.2015 |
| UDF: aktuelle Zelladresse nutzen> | Adresse, Zeile oder Spalte der Zelle mit einer UDF bestimmen. | 25.07.2015 |
| Zusammenhängenden Bereich auswählen | Excel erkennt zusammen hängende Bereiche und kann hier verschiedene Selektionen vornehmen | 26.02.2016 |
Tabelle und Zelle (Auszug)
| Link zum Beitrag | Hinweise zu den verLinkten Beiträgen | Datum |
|---|---|---|
| Letzte Zeile/Spalte | Letzte Zeile|Spalte einer bestimmten Spalte|Zeile einer Tabelle als numerischen Wert ausgeben | 21.01.2010 |
| Autor in Mappe festschreiben | Bei jedem öffnen einer Mappe wird automatisch der im Code hinterlegte Autor in die Eigenschaften des Workbooks geschrieben. | 08.04.2011 |
| Ultimo()-Funktion | Berechnung des Monatsendes, auch für ältere Excel-Versionen | 11.06.2013 |
| Druck-Seite ermitteln | Selbst definierte Funktion (UDF), um die Druckseite einer bestimmten Zelle zu ermitteln. | 17.06.2013 |
| Leere Zellen → Zeilen aus/einblenden | In einem definierten Bereich bei leerer Zelle die Zeile aus bzw. einblenden | 11.08.2013 |
| Erste freie Zelle nach Spalte n | In einer definierten Zeile die erste freie Zelle nach einer angegebenen Spalte finden. Danach beispielsweise etwas hinein schreiben. | 04.02.2014 |
| Existiert dieses Tabellenbatt? | 1 Sub und 1 Function zur Prüfung, ob es ein bestimmtes Tabellenblatt (Name) in diesem Workbook gibt | 23.03.2014 |
| Wert statt Formel | Per VBA Formeln in Werte umwandeln | 08.04.2014 |
| Mehrzeiler in 1 Zelle → aufteilen | Mehrere Zeilen in 1 Zelle in mehrere Zellen aufteilen | 27.05.2014 |
| Alle leeren Zellen ansprechen | Per VBA alle leeren Zellen eines Bereichs ansprechen | 07.01.2015 |
| Spaltennummer ↔ Spaltenbezeichnung, VBA | Column(„A”)->Column(1), jeweils den anderen Wert berechnen | 10.03.2015 |
| Adresse der ersten Zelle in Markierung | Die Adresse der ersten Zelle einer Markierung als String | 23.03.2015 |
| Kommentare gleich groß | Kommentare auf gleiche Größe setzen | 02.04.2015 |
| Kalenderwoche von..bis | Ausgabe eines Zeitbereichs der Kalenderwoche eines Datums | 04.12.2015 |
| Kalenderwoche nach ISO bzw. DIN | Kalenderwoche nach DIN/ISO in allen Excel-Versioen berechnen | 05.12.2015 |
| Nur Werk- bzw. Arbeitstage | Nur Werk- bzw. Arbeitstage (ohne bzw. mit Feiertage) in das aktuelle Blatt eintragen | 25.02.2016 |
| Nur die neuesten Zeilen anzeigen | Nach Neueingabe einer Zeile in einer Tabelle die oberste sichtbare Datenzeile ausblenden | 23.07.2016 |
| „Zu definierter Zelle scrollen/springen”> | Nach ButtonKlick oder Aktivierung des Blattes Sprung zu Zelle_## | 15.08.2016 |
| csv-Export mit Anführungsstrichen | Eine Tabelle als *.csv (oder *.txt) so exportieren, dass jedes Feld in Anführungsstriche eingefasst ist. | 18.10.2016 |
| Hat die Zelle einen Kommentar? | Selbst definierte Funktion (UDF), ob eine Zelle einen Kommentar enthält oder nicht. | 05.12.2016 |
Kalkulation, Zahlen, … (Auszug)
| Wunsch – Brutto/Netto | Brutto- oder Netto „Wunschbetrag” in Abhängigkeit berechnen. | 07.03.2014 |
|---|---|---|
| Zähler oder Nenner ausgeben | Dividend oder Divisor einer Funktion als Rückgabe | 08.02.2015 |
| Zahl aus Text holen | Eine sehr einfache Funktion, die aus einem Text die erste Zahl ohne Nachkommastellen herauszieht und zurück gibt. Eher eine Basis zum lernen als für den täglichen Einsatz. | 15.08.2008 |
| Nur Zahlen zulassen | In einer Textbox bur Ziffern oder Zahlen als Eingabe zulassen. | 28.03.2014 |
| Wert statt Formel | Per VBA Formeln in Werte umwandeln | 08.04.2014 |
| Anzahl Zeichen in Bereich | Einzelne Ziffern / Zeichen in einem Bereich zählen | 25.11.2015 |
| Integer-Zahl aus String extrahieren | Ganzzahl aus einem Text extrahieren, rechts, links, mittig | 02.03.2016 |
| Ziffernfolge bestimmter Länge extrahieren | Ziffernfolge einer definierten Länge aus einem Text extrahieren (Funktion) | 12.08.2016 |
VBA, Makro (Auszug)
| Link zum Beitrag | Hinweise zu den verLinkten Beiträgen | Datum |
|---|---|---|
| Zahl aus Text holen | Eine sehr einfache Funktion, die aus einem Text die erste Zahl ohne Nachkommastellen herauszieht und zurück gibt. Eher eine Basis zum lernen als für den täglichen Einsatz. | 15.08.2008 |
| Mehrzeiler in 1 Zelle → aufteilen | Mehrere Zeilen in 1 Zelle in mehrere Zellen aufteilen | 27.05.2014 |
| Nur Zahlen zulassen | In einer Textbox bur Ziffern oder Zahlen als Eingabe zulassen. | 28.03.2014 |
| VBA-Mappe ohne Makro speichern | Arbeitsmappe, die VBA-Code enthält, ohne den Code speichern | 22.05.2016 |
Daten-Import, ‑Export, Copy&Paste (Auszug)
| Link zum Beitrag | Hinweise zu den verLinkten Beiträgen | Datum |
|---|---|---|
| VBA: csv-Export mit Semikolon | Per VBA das Semikolon als Trennzeichen für *.csv verwenden | 02.04.2013 |
| Nur sichtbare Zellen kopieren | In einem gefilterten Bereich sollen nur die sichtbaren Zellen in die Nachbarspalte kopiert werden. | 03.08.2011 |
| *.csv-Export (Bereiche) | Bestimmte Bereiche eines Arbeitsblattes als *.csv exportieren. | 14.01.2013 |
| csv-Export mit Anführungsstrichen | Eine Tabelle als *.csv (oder *.txt) so exportieren, dass jedes Feld in Anführungsstriche eingefasst ist. | 18.10.2016 |
Diverses (Auszug)
| Link zum Beitrag | Hinweise zu den verLinkten Beiträgen | Datum |
|---|---|---|
| Enthält die Zelle eine Formel? | Eigene Funktion, die als Wahrheitswert zurück gibt, ob die Zelle eine Formel enthält oder nicht | 02.04.2012 |
| Autor in Mappe festschreiben | Bei jedem öffnen einer Mappe wird automatisch der im Code hinterlegte Autor in die Eigenschaften des Workbooks geschrieben. | 08.04.2011 |
| Druck-Seite ermitteln | Selbst definierte Funktion (UDF), um die Druckseite einer bestimmten Zelle zu ermitteln. | 17.06.2013 |
| Timestamp (Kurzversion) | Zeitstempel einfügen bei Änderung in einer Spalte | 20.02.2015 |
| Kommentare gleich groß | Kommentare auf gleiche Größe setzen | 02.04.2015 |
| UserForm zentriert | Eine UserForm immer zentriert im aktiven Fenster öffnen | 22.11.2015 |
| Zuletzt gespeicherte Datei öffnen | Die zuletzt gespeicherte Excel-Datei speichern | 06.12.2015 |
| Text-Filenamen in einen Link wandeln | Eine Liste der Filenamen eines (Unter)-Ordners in Hyperlinks umwandeln |
Und noch ein letzter Hinweis: Ergänzungen und/oder Änderungen, die hier bei den Code-Schnipseln vorgenommen werden, vermerken wir nicht im Chrono-Blog. Hin und wieder wird dort aber darauf hingewiesen, dass sich ein Blick in diesen Teil des Blogs lohnt, weil der Umfang gestiegen ist. 😎
[NachObenLetzte Verweis=„Menü: VS-Code-Schnipsel”]