Sie möchten dafür sorgen, eine ganze Reihe von leeren Tabellenblättern in Ihrer Tabelle anzulegen und diese alle nach Ihren Wünschen umzubenennen?

Das kostet viel Zeit, wenn Sie es manuell erledigen. Vor allem das manuelle Umbenennen der Tabellen ist aufwendig.

Einfacher geht es per Makro. Tragen Sie die Tabellennamen in einen Bereich in einer Tabelle ein. Die folgende Abbildung zeigt, wie das aussehen kann:

Rufen Sie anschließend das folgende Makro auf, um die Tabellen anzulegen:

Sub FuegeBlaetterMitNamenEin()
Dim Bereich As String
Dim Zelle As Range
Dim Tabelle As Worksheet
Bereich = "a1:a24"
With ActiveWorkbook
For Each Zelle In ActiveSheet.Range(Bereich).Cells
 Set Tabelle = .Sheets.Add(After:=.Sheets(Sheets.Count))
 Tabelle.Name = Zelle.Text
Next Zelle
End With
End Sub

Legen Sie mit der Variablen Bereich fest, aus welchem Bereich Ihrer Tabelle die Namen für die Tabellenblätter übernommen werden.

Die folgende Abbildung stellt eine Arbeitsmappe dar, in der die Tabellennamen der Monate der Jahre 2010 und 2011 angelegt wurden:

Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html

Tabellenblätter automatisch per Makro anlegen ist im Original erschienen auf ExcelDaily am Thursday, den 02. September um 10:11. Bitte beachten Sie unsere Bedingungen zur Nutzung des RSS-Feeds.

Artikel weiterempfehlen | Link zum Artikel

Beim Einsatz von Makros müssen häufig Zellen einer Tabelle ausgelesen oder mit neuen Inhalten gefüllt werden. Wenn Sie den aktuell markierten Bereich einer Tabelle verarbeiten möchten, erledigen Sie das über die Eigenschaft Selection. Sie liefert Ihnen den gerade markierten Bereich als Range-Objekt. Über eine Schleife können Sie auf die einzelnen Zellen zugreifen, wie das folgende Makro zeigt:

Dim Zelle As Range
For Each Zelle In Selection
'Hier Kommandos
Next Zelle

Falls Sie stattdessen einen Bereich in Ihrem Makro als Text festlegen oder durch den Anwender ein Text eingeben möchten, müssen Sie anders vorgehen.

In diesem Fall ist es komfortabel, den gewünschten Bereich mit einer Textvariablen zu erfassen und anschließend in ein Range-Objekt umzuwandeln. Das geht so:

Dim Bereich As String
Dim Zelle As Range
Bereich = "A5:D60"
For Each Zelle In Range(Bereich)
'Hier Kommandos
Next Zelle

Der Einsatz der For-Each-Schleife macht Ihre Makros flexibel. Die Schleife durchläuft alle markierten Zellen unabhängig davon, wie sie markiert sind.

Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html

Bereiche per Makro verarbeiten ist im Original erschienen auf ExcelDaily am Thursday, den 02. September um 10:10. Bitte beachten Sie unsere Bedingungen zur Nutzung des RSS-Feeds.

Artikel weiterempfehlen | Link zum Artikel

Wenn Sie eine komplette Zeile ausblenden möchten, können Sie das erledigen, indem Sie die Spaltennummer in Navigationspalte anklicken und aus dem Kontextmenü die Funktion "Ausblenden" wählen. In VBA erledigen Sie das über das folgende Makro:

Sub BlendeZeileAus()
ActiveSheet.Rows(2).Hidden = True
End Sub

Mit dem Beispielmakro wird Zeile 2 in der aktiven Tabelle komplett ausgeblendet. Der Spaltenbuchstabe taucht anschließend in der Navigationsspalte nicht mehr auf, wie es in der folgenden Abbildung zu sehen ist.

Mit den Zellinhalten in der verborgenen Zeile können Sie wie gewohnt weiterrechnen. Alle Formeln funktionieren weiterhin, allerdings können Sie die Inhalte der Zeile nicht mehr sehen.

Um eine andere Zeile auszublenden, passen Sie die Nummer im Kommando entsprechend an. Wenn Sie die Zeile wieder einblenden möchten, ersetzen Sie das Kommando True durch False.

Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html

Zeilen per Makro unsichtbar machen ist im Original erschienen auf ExcelDaily am Friday, den 27. August um 13:04. Bitte beachten Sie unsere Bedingungen zur Nutzung des RSS-Feeds.

Artikel weiterempfehlen | Link zum Artikel

Zur Kontrolle von Daten kann es sinnvoll sein, eine Arbeitsmappe gleichzeitig in zwei Fenstern übereinander darzustellen. Dann können Sie in den beiden Fenstern unterschiedliche Ausschnitte derselben Tabelle gleichzeitig anzeigen.

Sie erledigen diese Aufgabe über das Fenster-Menü und rufen dort zuerst die Anweisung "Neues Fenster" und anschließend den Befehl "Anordnen" auf. Wenn Sie das mit einem Makro erledigen möchten, teilen Sie die aktuelle Tabelle auf zwei Fenster auf und ordnen diese Fenster anschließend nebeneinander an:

Sub ZeigeFensterUebereinander()
ActiveWindow.NewWindow
Windows.Arrange ArrangeStyle:=xlHorizontal
End Sub

Sie erhalten auf diese Weise blitzschnell zwei Fenster übereinander. Die folgende Abbildung zeigt, wie das Ergebnis aussieht:

Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html

Fenster per Makro verdoppeln und anordnen ist im Original erschienen auf ExcelDaily am Friday, den 27. August um 13:03. Bitte beachten Sie unsere Bedingungen zur Nutzung des RSS-Feeds.

Artikel weiterempfehlen | Link zum Artikel

Sie möchten Zellinhalte addieren, aber dabei die Farbe der Zellen berücksichtigen? Das können Sie mit einem Makro erledigen. Die folgende Abbildung zeigt eine Datentabelle, in der einige Zellen mit einem gelben Hintergrund (gelbe Füllfarbe) hinterlegt sind:

Um nur die Zellen aus der aktuellen Markierung zu addieren, die eine gelbe Hintergrundfarbe besitzen, setzen Sie das folgende Makro ein:

Sub AddiereFarbzellen()
Dim Summe As Long
Dim Zelle As Range
For Each Zelle In Selection
If Zelle.Interior.ColorIndex = 6 Then
 Summe = Summe + Zelle.Value
End If
Next Zelle
MsgBox "Die Farbsumme lautet: " & Summe
End Sub

Nach dem Start des Makros zeigt Ihnen Excel in einem Fenster die Summe der Zellen an, die mit gelber Hintergrundfarbe hinterlegt sind. Die folgende Abbildung zeigt, wie das Ergebnis aussieht, wenn Sie den zuvor vorgestellten Zellbereich markieren:

Um anstelle gelb hinterlegter Zellen andere Farben zu verwenden, passen Sie den Vergleichswert in der If-Abfrage an. Setzen Sie anstelle von 6 für Gelb andere Werte ein. Um herauszufinden, welchen Wert für ColorIndex Sie für eine Farbe Ihrer Wahl einsetzen müssen, können Sie ein kleines Makro verwenden. Klicken Sie eine Zelle Ihrer Wahl an und starten Sie das folgende Makro, um herauszufinden, mit welcher Hintergrundfarbe die aktive Zelle formatiert ist:

Sub AktiveFarbe()
MsgBox "Aktive Hintergrundfarbe: " & _
(Selection(1, 1).Interior.ColorIndex)
End Sub

Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html

Zellen mit Hintergrundfarbe per Makro zählen ist im Original erschienen auf ExcelDaily am Saturday, den 21. August um 08:04. Bitte beachten Sie unsere Bedingungen zur Nutzung des RSS-Feeds.

Artikel weiterempfehlen | Link zum Artikel

In vielen Makro werden Vorgänge ausgeführt, die einen Augenblick dauern können. Das sollten Sie den Anwendern Ihrer Lösungen mitteilen. Eine Möglichkeit dazu besteht darin, während der Laufzeit des Makros den Mauszeiger auf die Sanduhr umzuschalten. Das signalisiert in jedem Windows-Programm, dass auf das Beenden eines Vorgangs gewartet werden muss.

Setzen Sie das folgende Makro ein, um anstelle des normalen Mauszeigers eine Sanduhr anzuzeigen:

Sub SchalteSanduhrEin()
Application.Cursor = xlWait
End Sub

Nach dem Vorgang wird innerhalb des Excel-Fensters eine Sanduhr als Mauszeiger angezeigt. Bevor Sie das Makro beenden oder nachdem der zeitintensive Vorgang abgeschlossen ist, sollten Sie den Mauszeiger wieder auf den Standardwert zurückschalten. Das erledigen Sie mit dem folgenden Makro:

Sub SchalteStandardzeigerEin()
Application.Cursor = False
End Sub

Tipp: Falls Sie wissen möchten, wie Sie Makros in Excel eingeben und starten, finden Sie hier eine Kurzbeschreibung: http://www.exceldaily.de/excel-makros-vba/artikel/d/so-geben-sie-makros-in-excel-ein.html

Mauszeiger in einem Makro ändern ist im Original erschienen auf ExcelDaily am Saturday, den 21. August um 08:03. Bitte beachten Sie unsere Bedingungen zur Nutzung des RSS-Feeds.

Artikel weiterempfehlen | Link zum Artikel

Excel 2010 stellt für Entwickler ein eigenes Befehlsregister in der Multifunktionsleiste zur Verfügung. Das Register heißt "Entwicklertools": Über dieses Register können Sie die wichtigsten Kommandos rund um Ihre Makros in Excel 2010 aktivieren:

Normalerweise wird das Register "Entwicklertools" aber in Excel 2010 nicht angezeigt. Gehen Sie folgendermaßen vor, wenn Sie dieses Register darstellen und verwenden möchten:

1. Wählen Sie das Kommando "Optionen" aus dm Datei-Menü.
2. Aktivieren Sie links in der Liste die Einstellung "Menüband anpassen".
3. Setzen Sie einen Haken vor "Entwicklertools".
    
   
    
4. Schließen Sie das Dialogfenster über die OK-Schaltfläche.

Nach diesem Vorgang zeigt Excel die Registerkarte "Entwicklertools" dauerhaft in Excel an.

So bereiten Sie Excel 2010 für Ihre Makros vor ist im Original erschienen auf ExcelDaily am Friday, den 13. August um 17:07. Bitte beachten Sie unsere Bedingungen zur Nutzung des RSS-Feeds.

Artikel weiterempfehlen | Link zum Artikel

In der Statuszeile unten zeigt Excel Hinweise zum Programm an. Wussten Sie, dass Sie per Makro auf diese Zeile zugreifen können?

Indem Sie der Eigenschaft Application.StatusBar einen Text zuweisen, steuern Sie die Anzeige der Statusleiste. Das folgende Makro demonstriert dieses Verfahren, indem der Text "Hallo Welt" in der Statuszeile angezeigt wird:

Sub TextInStatusZeile()
Application.StatusBar = "Hallo Welt"
End Sub

Das Makro den Text in die Statuszeile ein. Die folgende Abbildung zeigt, wie das aussieht, wenn Sie Excel 2010 einsetzen. Auch in allen anderen Excel-Versionen funktioniert das Verfahren:

Der neue Text bleibt dauerhaft in der Statuszeile stehen, um Die Kontrolle über die Statuszeile wieder an Excel zurückzugeben, setzen Sie das folgende Makro ein:

Sub TextAusStatusZeile()
Application.StatusBar = False
End Sub

Mit diesem Kommando übernimmt Excel die Verwaltung der Statuszeile wieder.

Hinweistext in der Excel-Statusleiste anzeigen ist im Original erschienen auf ExcelDaily am Friday, den 13. August um 17:06. Bitte beachten Sie unsere Bedingungen zur Nutzung des RSS-Feeds.

Artikel weiterempfehlen | Link zum Artikel

Um den Zellschutz einer Zelle oder eines Zellbereichs zu verändern, rufen Sie das Kommando "Zellen formatieren" auf und aktivieren das Register "Schutz".

Sie können das Dialogfenster auch aus einem Makro heraus aufrufen. So geben Sie dem Anwender Ihrer Makrolösungen die Möglichkeit, den Schutz selbst festzulegen.

Um das Dialogfenster "Zellen formatieren - Schutz" in Ihren Makros aufzurufen, setzen Sie folgende Kommandos ein:

Sub ZellschutzAufrufen()
Application.Dialogs(xlDialogCellProtection).Show
End Sub

Beim Aufruf startet Excel das bekannte Dialogfenster "Zellen formatieren" mit dem aktivierten Register "Schutz", wie in der folgenden Abbildung zu erkennen ist:

Sie können auch sehen, dass dieses Register das einzige ist, das im Dialogfenster dargestellt wird.

Zellschutz-Dialogfenster per Makro aufrufen ist im Original erschienen auf ExcelDaily am Friday, den 06. August um 12:07. Bitte beachten Sie unsere Bedingungen zur Nutzung des RSS-Feeds.

Artikel weiterempfehlen | Link zum Artikel

Sie möchten die Systemsteuerung über ein Makro starten? Das kann sinnvoll sein, um dem Anwender die Möglichkeit zu geben, Einstellungen am System selbst direkt anzupassen. Setzen Sie das folgende Makro ein:

Sub SystemsteuerungStarten()
Dim Explorer As Integer
Explorer = Shell("control.exe", 1)
End Sub

Mit dem Makro wird Windows veranlasst, die Systemsteuerung aufzurufen. Die folgende Abbildung zeigt, wie das Ergebnis aussehen kann:

Je nach eingesetzter Windows-Version und installierten Komponenten sieht die Systemsteuerung bei Ihnen anders aus.

Systemsteuerung per Excel starten ist im Original erschienen auf ExcelDaily am Friday, den 06. August um 12:06. Bitte beachten Sie unsere Bedingungen zur Nutzung des RSS-Feeds.

Artikel weiterempfehlen | Link zum Artikel