Ja. Verwende dieses Makro und weise es dem Button zu: vba Sub SpaltenEGUmschalten() Columns("E:G").EntireColumn.Hidden = Not Columns("E").EntireColumn.Hidden End Sub So funktio...
Wie können die Tabellenblätter automatisch nach den Namen in Spalte A benannt werden?
Antwort vomUm Tabellenblätter in Excel automatisch nach den Namen in Spalte A zu benennen, kann ein VBA-Makro verwendet werden. Hier ist ein Beispiel, wie das geht: 1. Öffne Excel und drücke `Alt + F11`, um den VBA-Editor zu öffnen. 2. Wähle `Einfügen` > `Modul`, um ein neues Modul zu erstellen. 3. Füge den folgenden Code in das Modul ein: ```vba Sub BenenneTabellenblaetter() Dim ws As Worksheet Dim i As Integer Dim BlattName As String ' Schleife durch alle Zeilen in Spalte A des aktiven Blattes For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row BlattName = Cells(i, 1).Value ' Überprüfen, ob der Name nicht leer ist If BlattName <> "" Then ' Überprüfen, ob das Blatt bereits existiert On Error Resume Next Set ws = Sheets(BlattName) On Error GoTo 0 ' Wenn das Blatt nicht existiert, erstelle es If ws Is Nothing Then Sheets.Add(After:=Sheets(Sheets.Count)).Name = BlattName End If ' Setze ws zurück für die nächste Iteration Set ws = Nothing End If Next i End Sub ``` 4. Schließe den VBA-Editor und kehre zu Excel zurück. 5. Drücke `Alt + F8`, wähle `BenenneTabellenblaetter` und klicke auf `Ausführen`. Dieses Makro durchläuft die Namen in Spalte A des aktiven Blattes und erstellt für jeden Namen ein neues Tabellenblatt, sofern es noch nicht existiert.
Verwandte Fragen
Kann man in Excel nur einen bestimmten Bereich schützen, ohne den Blattschutz zu verwenden?
Nein. In Excel lässt sich ein bestimmter Bereich nicht wirksam separat schützen, ohne am Ende doch den Blattschutz zu verwenden. Das Prinzip ist: Zellen bekommen die Eigenschaft „Gesp...
Wie Excel-Tabelle in Word-Datei umwandeln?
Eine Excel-Tabelle lässt sich in Word auf mehrere Arten übernehmen: 1. Kopieren und einfügen Tabelle in Excel markieren Strg + C In Word klicken Strg + V 2. Als verknüpfte Tabell...
Excel-Makro: Im Bereich B10:B20, wenn der IndentLevel in Spalte B = 1 ist, dann in dieser Zeile in B:O oben eine dünne Rahmenlinie setzen?
vba Sub RahmenObenBeiIndent1() Dim ws As Worksheet Dim c As Range Set ws = ActiveSheet For Each c In ws.Range("B10:B20") If c.IndentLevel = 1 Then With ws.Range(ws.Cells(c.Row, &q...
Kann man mit einem Excel-Makro abfragen, ob und wie stark ein Zellinhalt eingerückt ist?
Ja. In Excel-VBA kannst du die Einrückung einer Zelle über IndentLevel abfragen. Beispiel: vba Sub EinrueckungPruefen() Dim wert As Long wert = Range("A1").IndentLevel MsgB...
Syntax von IsNumeric in Excel-VBA?
IsNumeric(Ausdruck) Beispiel: vba If IsNumeric(Range("A1").Value) Then MsgBox "Zahl" Else MsgBox "Keine Zahl" End If Rückgabewert: True = numerisch False = nich...
Lässt sich die Excel-Warnung „Pivot enthält schon Daten“ per Makro ausschalten?
Ja. Die Meldung lässt sich im Makro meist mit deaktivierten Excel-Warnungen unterdrücken: vba Application.DisplayAlerts = False ' Pivot-Aktion hier, z. B. Aktualisieren / Ersetzen / L...
Kann man mit einem Excel-Makro den Filter einer Pivot-Tabelle ändern?
Ja. Mit einem Excel-Makro (VBA) kannst du den Filter einer Pivot-Tabelle ändern, zum Beispiel: Berichtsfilter setzen einzelne Pivot-Felder filtern bestimmte Elemente ein-/ausblenden Datums- oder...
Wie speichert man Kontakte vom Samsung A35 in Excel?
Kontakte vom Samsung A35 lassen sich am einfachsten so in Excel speichern: Methode 1: Über Google-Konto als CSV 1. Auf dem Samsung die Kontakte-App öffnen. 2. Prüfen, ob die Kontakte im...
Excel-Makro: Einfärbung der Zellen B10:D15 aufheben?
Ja. In VBA z. B. so: vba Range("B10:D15").Interior.Pattern = xlNone Alternativ: vba Range("B10:D15").Interior.ColorIndex = xlColorIndexNone Falls auch andere Formatierungen e...
