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 kann ein Nutzer beim Speichern einer Excel-Datei unter neuem Namen einen Dateinamen eingeben?
Antwort vomUm in Excel den neuen Dateinamen vom Benutzer abzufragen, kannst du ein sogenanntes **InputBox**-Dialogfeld in VBA (Visual Basic for Applications) verwenden. Damit kann der Benutzer einen Namen eingeben, der dann zum Speichern der Datei verwendet wird. Hier ein Beispiel für einen VBA-Code: ```vba Sub SpeichernUnterMitEingabe() Dim dateiname As String dateiname = InputBox("Bitte gib den neuen Dateinamen ein:", "Datei speichern unter") If dateiname <> "" Then ThisWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & dateiname & ".xlsx" Else MsgBox "Speichern abgebrochen." End If End Sub ``` **So funktioniert es:** 1. Es erscheint ein Eingabefeld (InputBox), in das der Benutzer den neuen Dateinamen eingibt. 2. Wenn ein Name eingegeben wird, wird die Datei unter diesem Namen im aktuellen Ordner gespeichert. 3. Wenn nichts eingegeben wird, erscheint eine Abbruchmeldung. **Hinweis:** - Der Code muss im VBA-Editor (Alt + F11) in ein Modul eingefügt werden. - Der Benutzer muss ggf. Makros aktivieren. Weitere Infos zu InputBox findest du hier: [Microsoft InputBox-Funktion](https://learn.microsoft.com/de-de/office/vba/language/reference/user-interface-help/inputbox-function)
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...
