MS EXCEL Tipps & Tricks © 2003 Klaus-Martin Buss

<body> <p align="center">(<a href="http://www.kmbuss.de">http://www.kmbuss.de</a>)</p> <p align="center">kmbuss Excel 2000 VBA-Codes Formelsammlung Tipps und Tricks Workshop AddIn Addin Addins Forum Formatierung Formatierungen</p> <p align="center">Schlüsselwörter Shortcuts Tastenkombinationen Datum Uhrzeit Funktionen Beispiele </p> <p align="center">Auf dieser Seite findet der Excel-Anwender jede Menge Informationen zu Microsoft Excel Version 10.0.</p> <p align="center">Es gibt über 300 Beispielarbeitsmappen, eine Formelsammlung, einen Excel-Workshop, AddIns, Formatierungshilfen, VBA-Codes und vieles mehr.</p> <p align="center"><font size="2"><a href="home.htm">Home</a><a href="suchen.htm"><br> Suchen</a><a href="download.htm"><br> Downloads</a><a href="formel.htm"><br> Formelsammlung</a><a href="funktion.htm"><br> Funktionen</a><a href="formate.htm"><br> Zellformatierung</a><a href="date_time.htm"><br> Datum & Uhrzeit</a><a href="shortcut.htm"><br> Shortcuts</a><a href="tipps.htm"><br> Tipps & Tricks</a><a href="workshop.htm"><br> </a><a href="schulung.htm">Schulung</a><a href="vba-codes.htm"><br> VBA-Codes<br> </a><a href="addins.htm">AddIns</a><br> <a href="xlviewer.htm">xlviewer</a><a href="parametr.htm"><br> Startparameter</a><br> <a href="forum.htm"><b>Forum</b></a><a href="kontakt.htm"><br> Kontakt</a><br> <a href="games.htm">Just For Fun</a><br>  </font></p> <div align="center"> <p align="center">Funktionalität "Vorschlagwerte" aktivieren Uhrzeiten und Stundenangaben komfortabel erfassen Tabellenbereich als Bitmap in die ZA kopieren "Ziehen" von Zellen mit der rechten Maustaste Springen in Eingabezellen Videos abspielen Fehler beim Zellinhalt löschen Datum dauerhaft in Zelle A1 "stempeln" Zeilen ohne VBA einfügen Suchen nach "*" oder "?" Jede zweite Zeile ohne VBA löschen Suchen über mehrere Tabellenblätter Schrift in Kommentaren / Quickinfos ändern Formeln übersichtlicher gestalten Sonderzeichen über das Kontextmenü einfügen Zellen nach Datenimport formatieren Animierte Grafiken in ein Tabellenblatt einbinden Tabellenwerte komfortabel ändern Übersicht Tabellenblätter Schriftgrösse der Tabellenblattregister "Ziehen" von Formeln   "Balkendiagramme" ohne Diagramme   ERSETZEN von Zeichen in Zellen ohne Formeln   Rücksprung nach zeilenweiser Erfassung   Alle TabBlätter mit einer Ausnahme drucken   Formel / Funktion deutsch - englisch übersetzen   Rechnen mit Datum vor 01.03.1900   Hyperlink in Zelle "deaktivieren"   Formelergebniss in Werte umwandeln   Textimport in EINE Zelle   Darstellung von Brüchen   Relative / absolute Bezüge ändern    "Verbinden und zentrieren" Datum ("Datümer") erleichtert erfassen </p> <p>Automatische eMail Speichern unter Namen in A1 Filterfunktion trotz Blattschutz Inhalt A1 als Blattname übernehmen Öffnen nach best. Datum nur mit PW Makrostart nach Tabellenaufruf Code nach Verlassen Zelle A1 Passwortabfrage vor Makrostart Übernahme A1 als Kopfzeile links Makro nach Bestätigung MsgBox Datensicherung Datum & Uhrzeit in A1 stempeln Sprung in letzte Zelle eines Bereichs Nach Öffnen Wert in A1 erhöhen Wert in A1 durch 100 teilen Nach Filter sichtbare Zeilen löschen Suche nach Daten über InputBox Listet und markiert Verknüpfungen Prüft, ob Tabellenblatt vorhanden Fügt gezielt neue Zeilen ein Datum & Uhrzeit letzte Speicherung Speichern bei Schliesen / Beenden Letzten Wert Spalte A in B1 einlesen Liest verfügbare Schriftarten aus Abfrage, ob Blattschutz eingeschaltet Automatische Breite und Höhe Aktive Zelle gelb unterlegen Dateipfad & -name in Fusszeile Tabellenblätter alphabetisch sortieren Verknüpfungen  zu Workbooks finden Setzt Zelle auf Grundwert zurück Öffnet CD-ROM-Laufwerk Schliesst CD-ROM-Laufwerk Liest Dateinamen aus Verzeichnis B1 Delete-Taste bei Formel deaktivieren Spalten trotz Blattschutz ausblenden Optimale Spaltenbreite einstellen Nach Eingabe Passwort-Blattschutz Druck bestimmter Seite Symbolleiste auf Standard setzen Datum & Uhrzeit Dateierstellung Liest den Druckbereich aus Datum Zelländerung im Kommentar Löscht Zeilenumbruch in aktiver Zelle Schaltet Computer vollständig ab MsgBox mit Speicherdatum Zellwert im Kommentar anzeigen Tabellenblattnamen auslesen Schliessen ohne Speichern Persönlichen Assistenten rufen AutoKorrektur-Liste lesen / schreiben "Glätten" eines Bereichs In A1 angegebene Anwendung starten Datei bei jedem Beenden speichern "Del"-Taste bei Formel deaktivieren Cursor (Mauszeiger) positionieren  UserForm nicht über "X" schliessen Zellkommentare nur mit Passwort Spaltenbreite nach Zellmarkierung Spaltenbreite nach Spaltenmarkierung Zugriffsprotokoll Zeile ausblenden, wenn Zelle leer ist Zeilen ausblenden, wenn Zellwert = 0</div> <p align="center">Ermittlung der beweglichen Feiertage Gehe zu HEUTE (in der Arbeitsmappe) Halbjahreskalender Jahreskalender anlegen (Beispiel 1) Jahreskalender anlegen (Beispiel 2) Kalenderwoche (Beispiel 1) Kalenderwoche (Beispiel 2) Stopuhr Terminplaner TimeFinder Datum & Uhrzeit in MsgBox  Feiertagsgenerator Stunden im Format "hh,mm" addieren Datum in blattgeschütztes Tabellenblatt "stempeln" Datum mit Doppelklick stempeln Datum über Steuerelement "Kalender" einfügen Datum mit Doppelklick "stempeln Echtzeituhr in Menüleiste Analoguhr Datum uhrzeitabhängig stempeln Datum in Spalte A nur bis Ultimo fortschreiben Datum über Steuerelement "Date Time Picker" Geburtstagskalender Bundesländerdauerkalender Rechnen mit Datum vor 01.03.1900 Dynamischer Geburtstagskalender Datum aus Kalendersteuerelement übernehmen Aktuelles Datum / Uhrzeit mit "SendKeys" stempeln Aktuelles Datum vor Ausdruck stempeln Gehe zu HEUTE (im Tabellenblatt) Dynamischer Geburtstagskalender Monatsletzte ("Ultimo's") auch bei Schaltjahren ermitteln Datum über Steuerelement "MonthView" Datum aus Jahr, Kalenderwoche und Wochentag ermitteln Datum festen Wochentagen zuordnen Datum und Uhrzeit mit "SendKeys" eintragen Datumsabhängiger AutoFilter AutoFilter über CommandButton schalten AutoFilter mit Teilbegriff als Filterkriterium AutoFilter-Kriterien aus Zellen verwenden Anzahl der AutoGefilterten Zeilen in Statusleiste Drei-D-Effekt Aktive Zelle gelb unterlegen Bedingte Formatierung mit mehr als 3 Bedingungen Beispiele für Bedingte Formatierungen Spaltenbreite automatisch anpassen Spaltenbreite prozentual festlegen Zeilenhöhe und Spaltenbreite Zeilenumbruch in der aktiven Zelle löschen Zentrieren über Zellen ohne Verbinden "Ringbuchoptik" Buchstaben um 90° drehen Negative Potenz hochstellen Färben, wenn Summe pro Spalte > 8 "Fadenkreuze" zum Hervorheben der aktiven Zelle Ziffern hoch- oder tiefstellen Ganze Zeile der aktiven Zelle hervorheben "Fadenkreuz" unter Beibehaltung bestehender Formatierungen "Bedingte Formatierung" mit mehr als 3 Bedingungen Gezogene Lottozahlen farblich kennzeichnen Farbliche Formatierung in Formeln verwenden Zellwerte nach Farben addieren Farbwechsel nach Kalenderwochenwechsel Schrift- und Füllfarbenindizes ohne VBA auslesen Code nach Änderungen in Spalte B ausführen Dateipfad und -name in Fusszeile stempeln In B enthaltene Werte aus A löschen Laufschrift MsgBox alle 30 sec einblenden Rechtschreibprüfung Strasse und Hausnummer trennen Suchen und Ersetzen Summe nach gleichen Namen SVerweis in unsortierter Matrix Tabellen auf doppelte Einträge prüfen Tabellenblätter auf- oder absteigend sortieren Tabellenblattnamen auslesen UserForm mit Fortschrittsanzeige Vergleichen und kopieren Verweis in einer Matrix Wert aus InputBox in Zelle A1 schreiben Wert in A1 auf Grundwert zurücksetzen Werte fortschreiben Zahlen in Worte Zoom ändern bei Auflösung 800x600 Zoom automatisch auf 80% setzen Hyperlinks deaktivieren Sonderzeichen über das Kontextmenü einfügen Eingabe doppelter Werte verhindern Wochenenden farblich hervorheben Alle gelb unterlegten Zellen löschen Dynamischen Hyperlink erstellen Mehr als 7 Wenn-Bedingungen Daten - Gültigkeit Simulierte MsgBox für 10 sec. einblenden UserForm für 10 sec. einblenden AutoKorrektur-Liste bearbeiten (Danke an P. Haserodt) Eingabe in "Mussfelder" erzwingen Verteilung Zufallszahlen Zellen in einem Bereich "glätten" Makro durch Formelergebnis starten Menü mit Untermenüs in der Menüleiste anlegen "Wurzeln ziehen" (Danke an D. Steffens) Cursor (Mauszeiger) positionieren Eingescannte Formulare ausfüllen "Abiturzulassung" "Umsatzstärkster Monat" Werte zwischen X und Y zählen Ausfüllhilfe mit ComboBox (von Bert Körn) "Titelleiste" individuell beschriften Summe aller in "ROT" formatierten Zahlen "Ankreuzen" durch Doppelklick Ergebnis bei mehreren Suchkriterien Spaltenbreite für DropDown Daten-Gültigkeit Spaltenbreite ändern bei Klick in Spalte Teilergebnis bei AutoFilter Prüfen, ob Bereich vollständig ausgefüllt Daten fortlaufend übertragen Werte der letzten beiden gefüllten Spalten Wertabhängige "Ampel" Zeilen ausblenden, wenn Zelle leer Zeilen ausblenden, wenn Zellwert = 0 ist Ampel (Rot / Gelb / Grün in Werteabhängigkeit) Anzahl Filterergebnisse Spaltenvergleich DropDown (Daten-Gültigkeit) ohne leere Zellen Unsortierte Liste tabellenblattweise aufteilen MwSt-Auswahl über Optionsfeld Laufschrift in Statuszeile "Balkendiagramme" ohne Diagramme Farbige "Trend"-Pfeile Teilstring zwischen Leerzeichen auslesen AutoKorrekturListe temporär Zellwertabhängiges DropDown (Beispiel 1)   TOP Zellwertabhängiges DropDown (Beispiel 2) Zellwertabhängiges DropDown (zum Üben & Nachbauen)   TOP Forumspielerei "Aufmass" Formellösung "Letzter Wert Spalte C" =MIN() ohne Nullwerte Symbolleiste mit Schaltflächen anlegen Tabellen auf gleiche Werte prüfen Textbox während Codeausführung Zahl als Text in englisch InputBox mit Vorschlagwert Markieren der drei höchsten Werte Hyperlink, wenn Bedingung erfüllt ist Funktion =MAX() im AutoFilter Abfrage "Meldung anzeigen" & Zugriffszähler UDF "Nachname isolieren" Zoomen, wenn DropDown-Zelle aktiv  Seitenwechsel nach Namenswechsel in Spalte A  Verhindern, dass Summe pro Spalte > 8 wird   Summe der fünf höchsten Werte Code ausführen, wenn Formelergebnis = ... "AutoScroll" Formeln im Blatt ohne VBA hervorheben Zwingende Datumsübernahme aus UserForm Zahl in einzelne Worte zerlegen Alle Leisten ein / aus Zellwerte als Filterkriterien C1 minus B1, wenn A1 gleich 6 Werte in C:C plus B1, wenn A1 gleich 6 Dynamischer Druckbereich (von Aliba) Druck unterbinden, wenn "Pflicht"-Zellen leer sind Excel aus- und MsgBox einblenden Eingabe- und Begrüssungs"fenster" beim Start Aktive Zelle immer nach oben links "rücken" "Manuelle" Ampel über Optionsfelder Zelländerungen mit "Zeitstempel" protokollieren Startet die Mappe mit Dialog aus DATEN - MASKE Tabellenblatt kopieren, umbenennen und einsortieren Tabellenblätter aus- und wieder einblenden Ausgeblendete Tabellenblätter einblenden CheckBox (Steuerelement) per Code steuern Datenübernahme und Sortieren OHNE VBA (Dank an Berai) Wieviele Tage bis Heilig Abend Fehlerunterdrückung bei SVERWEIS Farben zählen "Ausgesternte" Kennwortabfrage Markierung nach ENTER verschieben Geschlechts- und altersabhängige Anrede Löschen, wenn Bedingung erfüllt Blinkender Pfeil im TabBlatt Ge-"X"-te Dienstplanauswertung SVERWEIS mit variabler Suchmatrix SVERWEIS über mehrere Tabellenblätter SVERWEIS auf nicht zusammenhängende Matrix "SVERWEIS" bei mehreren Ergebnissen "SVERWEIS" bei zwei Suchkriterien "SVERWEIS" bei drei Suchkriterien SVERWEIS mit fixer Matrix in SVERWEIS-Formel DropDown (aus Formular) per Code leeren Benutzerdefiniertes Sortieren ohne VBA SVERWEIS mit "Matrixkoordinaten"   TOP Jeden x.ten Wert aus Spalte A untereinander auslesen X-Y-Koordinatenwerte aus Matrix Steuerlemente aus der Formularsymbolleiste Summenprodukt "Wer was wieviel" Zwischensumme und Seitenumbruch bilden Numerische Eingabe in Zelle A1 erzwingen Nach Zellmarkierung Zellkontextmenü öffnen ZÄHLENWENN mit Bedingung Wert des "jüngsten Datums" Auswahl-"DropDown" nach Zellmarkierung Grafik als *.gif im Kommentar Auswertung von CheckBoxen (Kontrollkästchen) "CountDown" in Statuszeile Dateiname und -endung per Formel trennen Die "Steuerelemente" aus der Formularsymbolleiste Einmalige MsgBox, wenn "Sollzellwert" erreicht ist Tabellenblatt mit Namen aus Zelle anlegen Dynamischer Bereichsname Zeile löschen, wenn Zelle leer ist "Workbook_AfterPrint"-Workarround Nur sichtbare (d.h. keine ausgeblendeten) Zellen kopieren Tabellenblattauswahl über DropDown (Daten - Gültigkeit) "Amerikanisches" Datum in Kopfzeile Neues TabBlatt anlegen und umbenennen Code nach DropDownAuswahl "Daten - Gültigkeit" Adressen auftrennen Jeder markierten Zelle Bereichsnamen zuordnen Bearbeitungsleiste bei mehr als 51 Zeichen ausblenden Bereich nach Doppelklick kopieren Beispiel für Verwendung der Bildlaufleiste Tabellenblatt je nach Formelergebnis ein- oder ausblenden (1) Tabellenblatt je nach Formelergebnis ein- oder ausblenden (2) Tabellenblatt bei Kennwort ein- oder ausblenden Zwischensummen vor Seitenumbruch Buchstaben in einem Bereich zählen Code nur ausführen, wenn aktive Zelle in bestimmten Bereich ist CommandButton ein- und ausblenden CommandButton wechseln Eingelesene Dateitypen erkennen Daten per Einfachklick kopieren Formel oder Fixwert in Zelle Fortschrittsbalken in UserForm Grafik abhängig vom Zellwert ein- oder ausblenden Grafik in alle Tabellen einfügen Animierte Grafik (*.gif) im Tabellenblatt Bilder auslesen, thumbnailen und hyperlinken Tabellenblattbereich als *.gif speichern Teil einer Grafik aus- und einblenden Diagramm ohne Leerwerte Anzahl der Tabellenblätter in MsgBox ausgeben Dateinamen auslesen Daten einer Website in WORD einlesen Datum / Uhrzeit der letzten Zelländerung im Kommentar Druckbereich auslesen Letzten Wert aus Spalte A in Zelle B1 einlesen Systemdaten auslesen Uhrzeitabhängige Datenausgabe Username in Zelle A1 einlesen Verfügbare Schriftarten auslesen Zeilen pro Spalte zählen Zellwert im Kommentar anzeigen Tabellenblattnamen auslesen Tabellenblattnamen auslesen und Hyperlinks einfügen Persönlichen Assistenten rufen Spaltenbuchstaben auslesen Änderungsdatum protokollieren "Googeln" in www.kmbuss.de Dateien in bestimmten Ordner auslesen Tabellenblattnamen ohne VBA auslesen Zeichen- / Chr-Codes auslesen Datum / Uhrzeit der Mappenzugriffe protokollieren Speicherdatum in Zelle A1 und in Fusszeile Ordner auslesen Zelländerungen in Spalte A protokollieren Name der aktiven Arbeitsmappe in MsgBox    "excel-lex.de.vu" im Tabellenblatt  Verzeichnis auslesen und mit Hyperlink listen   Ordner und Unterverzeichnisse auslesen   Mappengrösse in MsgBox  Kommentare anzeigen und listen  MsgBox "Letzte gefüllte Zelle in Zeile ..." Adresse der aktiven Zelle in MsgBox Verzeichnis(se) auslesen und hyperlinken 1 Verzeichnis(se) auslesen und hyperlinken 2 Beliebiges Verzeichnis in Variable auslesen Seriennummer Festplatte auslesen Systemdaten auslesen Titellänge MP3's auslesen Datum Änderung Spalte A in B protokollieren Anzahl Zahlen in Textbox im TabBlatt ausgeben Adresse der aktiven Zelle auslesen Mappen- und Tabellenblattdialoge aufrufen Farben anzeigen (auslesen)(von Hajo Ziplies) Anzeige von Zellwerten in der Statuszeile Anzeige von Zellwerten in einer Symbolleiste Anzeige von Zellwerten in der Titelleiste Verzeichnis aus "Browser" in A1 einlesen Info's zu "Dieser Mappe" über Formeln Verbundene Zellen rot markieren Zellen A1 aus allen Tabellenblättern auslesen Automatisch nach 1 Minute schliessen Schliessen ohne Speichern Datei bei jedem Beenden speichern Schliessen einer UserForm durch "X" verhindern Backup mit Datum & Uhrzeit speichern CD-ROM-Laufwerk öffnen und schliessen Computer ausschalten Anwendung (*.exe) starten / beenden "Sound" auf Rechnern ohne Soundkarte Abfrage Blattschutz Ja Nein Arbeitsmappe nur anzeigen, wenn Makros aktiviert sind Datei nach dem 14.05.2003 nur noch mit PW 36 öffnen Entfernen-Taste bei Formel in Zelle deaktiviert Passwortabfrage nach 1 min Inaktivität Blattschutz ein- und ausschalten Zellen mit Formeln schützen Entfernen-Taste bei Formel im Bereich deaktiviert Kommentare nur nach Kennworteingabe einfügen Passwortschutz für 2 Zellen (ohne Blattschutz) Tabellenblätter erst nach Passwort einblenden Änderungen der Zellinhalte in *.txt-Datei protokollieren Tabellenblätter  nur bei aktivierten Makros anzeigen Zeilen einfügen / löschen trotz Blattschutz "Ausgesternte" Passwortabfrage Abfrage, ob Tabellenblätter in Mappe ungeschützt sind Nur Zellen in bestimmtem Bereich auswählen Datenexport verhindern (Kennwort: kmb) Änderungen in einer *.txt-Datei protokollieren Roadbook_blanko (etwas für Motorradfahrer) Kettensätze (verschachtelte Dreisätze) berechnen Das Würfelspiel "Kniffel" in einer Excel-Version "Kniffel" in der Version für 2 Spieler Erläuterungen zu "Einfügen - Name - Beschriftung" Einlesen von mehr als 65.536 Datensätzen Wechsel zwischen "A1"- und "Z1S1"-Bezugsart Desktop-Icon der aktiven Mappe anlegen Windows-Explorer (ggf. mit Unterordner) öffnenZudem findet der Anwender das freundlichste Excel-Forum im Web, </p> <p align="center">(<a href="http://phorum.excelhost.de/index.php?0">http://phorum.excelhost.de/index.php?0</a>)</p> </body>