IsNumeric(Ausdruck) Beispiel: vba If IsNumeric(Range("A1").Value) Then MsgBox "Zahl" Else MsgBox "Keine Zahl" End If Rückgabewert: True = numerisch False = nich...
Wo liegt der Fehler im Excel 2021 VBA-Code mit Choose und Range.Locked?
Antwort vomDer Fehler in deinem VBA-Code liegt daran, dass die Variable `rge` nicht deklariert wurde. In VBA solltest du Variablen immer deklarieren, und für Zellbereiche ist der Typ `String` oder besser gleich `Range` geeignet. Außerdem ist es besser, die Variable als `String` zu deklarieren, wenn du sie als Adress-Text verwendest. Hier ist die korrigierte Version: ```vba Dim i As Integer Dim rge As String For i = 1 To 4 rge = Choose(i, "F5:L200", "D5:D6", "C13:D14", "C16:D17") Range(rge).Locked = True Next i ``` **Weitere Hinweise:** - Wenn du `Option Explicit` verwendest (was empfohlen wird), ist die Deklaration zwingend. - Falls du mit mehreren Arbeitsblättern arbeitest, solltest du das Arbeitsblatt explizit angeben, z.B. `Worksheets("Tabelle1").Range(rge).Locked = True`. **Zusammengefasst:** Der Fehler ist die fehlende Deklaration der Variablen `rge`. Füge `Dim rge As String` am Anfang deines Codes hinzu.
Verwandte Fragen
Gibt es die Excel-Funktion ZÄHLENWENN auch in Excel-VBA?
Ja. In Excel-VBA gibt es dafür WorksheetFunction.CountIf oder direkt Application.CountIf. Beispiel: vba Dim erg As Long erg = Application.WorksheetFunction.CountIf(Range("A1:A10"), &...
Wie nennt man das Zerlegen einer Excel-VBA-Prozedur in mehrere Teile?
Das nennt man meist Refactoring, genauer: Modularisierung: eine große Prozedur in mehrere kleinere Prozeduren/Funktionen aufteilen Extrahieren von Methoden/Prozeduren (Extract Method): Teilcode...
Wie lege ich in Excel eine UserForm an?
„UnserForm“ ist in Excel kein gängiger Begriff. Gemeint ist sehr wahrscheinlich UserForm. So legst du in Excel eine UserForm an: 1. Entwicklertools aktivieren Excel öffnen Date...
Kann man in Excel-VBA die Schriftgröße der MsgBox ändern?
Nein. Die Schriftgröße der eingebauten VBA-MsgBox lässt sich nicht direkt ändern. Möglichkeiten: Eigene UserForm verwenden → volle Kontrolle über Schriftgrö&s...
Ist dieser Excel-VBA-Code korrekt, um Spalten auszublenden und einen Bereich wieder einzublenden?
Nein. Korrekt ist bei Columns die Angabe von Spaltenbuchstaben oder Spaltennummern als Bereich, nicht "spaltevon:spaltebis" wörtlich. Beispiel: vba With Sheets("Tab1") .Co...
Excel-Makro: Spalten E:G per Button ein- und ausblenden?
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...
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...
