Stefan's Weblog

20Feb/151

Nur bestimmte Werte in neues Tabellenblatt kopieren

In der Spalte A stehen die Werte 1 und 2. Es sollen aber nur die Werte 1 samt den Einträgen den Spalten B:E in das Tabellenblatt "Ziel" kopiert werden.

Quelle:

Excel VBA- Nur bestimmte Werte in neue Tabelle übertragen

Excel VBA- Nur bestimmte Werte in neue Tabelle übertragen

18Feb/150

Anzahl von Einträgen in einer Spalte ermitteln

In einer Spalte stehen unterschiedliche Werte, von denen einige doppelt aufgelistet werden. Man möchte aber die Anzahl der Einträge ermitteln, wobei die Doppelten nur als ein Eintrag gezählt werden sollen.

Excel VBA - Anzahl

Excel VBA - Anzahl

17Feb/150

Daten aus anderer Arbeitsmappe in aktuelle Tabelle kopieren

Ziel

Man möchte in die aktuell geöffnete Arbeitsmappe in eine bestimmte Tabelle Daten aus einer anderen, Arbeitsmappe aus einer definierten Tabelle kopieren.

Wir unterscheiden einfachheitshalber zwischen

  • Zielarbeitsmappe: Die geöffnete Arbeitsmappe, in die die Daten kopiert werden sollen
  • Quellarbeitsmappe: Die Arbeitsmappe, die die zu kopierenden Daten enthält.
2Jun/140

Excel – Letzte befüllte Zelle einer Spalte ermitteln

Mit der folgenden kleinen Formel lässt sich ganz einfach die letzte befüllte Zelle einer Spalte ermitteln.

=VERGLEICH(0;B3:B36;-1)

EXCEL - Letzte befüllte Zelle einer Spalte ermitteln

Letzte befüllte Zelle einer Spalte ermitteln

Eine Kombination mit einem SVERWEIS könnte so aussehen.
Es wird die letzte befüllte Zelle in der Nummernspalte ermittelt und dann das Ergebnis, das Datum, ausgegeben.
Die Formel in C2 hierfür lautet

10Feb/142

Text in Zahlen umwandeln mit VBA

Text in Zahlen umwandeln - manuell

In einem meiner früheren Post habe ich bereits ein Makro hierfür gepostet ➡ Text in Zahlen umwandeln. Bei diesem Makro wird der zu formatierende Bereich dynamisch ermittelt. Es wird der Bereich A4 bis zu letzten beschriebenen Zelle in eine Zahl umgewandelt, anstatt dies manuell über den grünen Pfeil vorzunehmen, geht das bequem über das Makro.

23Okt/130

Excel – Forlaufende Nummerierung trotz leerer Zellen

Excel bietet eine einfache Möglichkeit, Zeilen zu nummerieren. Was macht man aber, wenn einige Zellen keine Werte enthalten oder einen anderen Inhalt haben und nicht mit in die Nummerierung mit einbezogen werden sollen?

Excel - ZÄHLENWENN

Excel - ZÄHLENWENN

Im Screenshot ist zu sehen, dass nur die Zellen die ein x enthalten in der Nummerierung berücksichtigt werden. Die leeren Zellen werden ignoriert.

14Aug/130

Tabellen nach einer Tabelle in eine Excel Arbeitsmappe einfügen

Das nachfolgende Makro kopiert die Tabelle CW1 und fügt diese nach einer definierten Tabelle in die bestehende Excel-Arbeitsmappe ein.

Der Name der neuen Tabelle beginnt mit einer fest definierten Buchstabenkombination die durch eine vom User eingegebenen Buchstaben oder Zahlenkombination ergänzt wird.

Der vom Benutzer eigegebenen Tabellenname wird zudem in der Zelle B7 ausgegeben.

24Apr/131

Fortschrittsbalken in Excel

Fortschrittsbalken, wie man sie z.B. in einer Projektmanagementsoftware findet, lassen sich auch sehr einfach in Excel erzeugen.

Fortschrittsbalken

Fortschrittsbalken

Im Screenshot ist der Fortshrittsbalken dargestellt, der den aktuellen Status der jeweiligen Aufgabe anzeigt. Mit Hilfe einer Excel-Formel lässt sich dies sehr einfach erstellen. In der Zelle E4 steht dies:

11Apr/132

Navigation via ListBox in einer Excel Arbeitsmappe

Navigation für Excel Arbeitsmappe

Mit Hilfe eines Listenfelds (ListBox) kann man sehr einfach eine Navigation innerhalb einer Excel-Arbeitsmappe erstellen.

Die Navigation soll folgende Funktionen beinhalten

  • Bei jedem Öffnen der Arbeitsmappe sol sich die Navigation dynamisch füllen, je nach Anzahl und Benennung der einzelnen Tabs innerhalb der Arbeitsmappe
5Apr/131

Tabellen in einer Arbeitsmappe aufsteigend nummerieren

Innerhalb einer Excel Arbeitsmappen kann man die einzelnen Tabellen fortlaufend nummerieren lassen.

Das Makro dafür lautet:

Sub Nummerierung()
    Dim i As Long
    For i = 1 To Sheets.Count
    Sheets(i).Name = "CW" & i '+ 1
    Next
End Sub

Seiten: 1 2 3