Wie kann ich in einer For-Next-Schleife von Zeile 11 bis 73 alle Zeilen mit Null-Werten in Spalte H (8) auf eine Zeilenhöhe von 1 setzen, unter Verwendung von Select Case?

Antwort vom

Um in einer For-Next-Schleife in VBA die Zeilen von 11 bis 73 zu durchlaufen und die Zeilenhöhe auf 1 zu setzen, wenn der Wert in Spalte H (Spalte 8) gleich Null ist, kannst du den folgenden Code verwenden. Der Code nutzt eine Select Case-Anweisung, um die Bedingung zu überprüfen: ```vba Sub SetRowHeight() Dim i As Long For i = 11 To 73 Select Case Cells(i, 8).Value Case 0 Rows(i).RowHeight = 1 Case Else ' Hier kannst du andere Fälle behandeln, falls nötig End Select Next i End Sub ``` Dieser Code durchläuft die Zeilen 11 bis 73 und prüft den Wert in Spalte H. Wenn der Wert Null ist, wird die Zeilenhöhe auf 1 gesetzt. Andernfalls passiert nichts.

Verwandte Fragen

Was bedeutet ErrNum 75 in Access VBA?

Der Fehlercode ErrNum = 75 in Microsoft Access VBA steht für "Pfad/Datei-Zugrifffehler" (englisch: "Path/File access error"). Dieser Fehler tritt auf, wenn ein Zugriff auf ein...

Was bedeutet 'On Error GoTo 0'?

Die Anweisung On Error GoTo 0 stammt aus der Programmiersprache Visual Basic (z. B. VBA, VB6). Sie wird verwendet, um die aktuelle Fehlerbehandlung zu deaktivieren. Das bedeutet: Nach On Error GoTo 0...

Ist Shapes("Rechteck 1").Visible = True korrekt in Excel-VBA?

Der Ausdruck Shapes("Rechteck 1").Visible = True ist in Excel-VBA nicht korrekt, da das Visible-Eigenschaftsmerkmal für Shapes in Excel-VBA nicht existiert. In Excel-VBA steuerst du d...

Ist folgender Excel-VBA-Code korrekt: HeightPt = Rows("4:" & Cells(49,19).Row).Height?

Der gezeigte Code ist in Excel-VBA nicht korrekt und führt zu einem Fehler. Das Problem liegt in der Syntax innerhalb der Rows-Funktion. Hier die Analyse: Dein Code: vba HeightPt = Rows("4:...

Wie kann man in Excel-VBA einen RGB-Code aus einer Zelle lesen?

Um in Excel-VBA einen RGB-Code aus einer Zelle zu lesen und diesen z.B. für die Füllfarbe eines Shapes zu verwenden, kannst du wie folgt vorgehen: Angenommen, in Zelle A1 steht der RGB-Code...

Was bewirkt der VBA-Code mit shp.Line.Visible = msoFalse und shp.Fill.ForeColor.RGB = 0?

Der gezeigte VBA-Code (Visual Basic for Applications) wird typischerweise in Microsoft Office-Anwendungen wie PowerPoint oder Excel verwendet, um die Formatierung einer Form (Shape) zu steuern. Hier i...

Was bewirkt der VBA-Code mit shp.Line.Visible = msoFalse, shp.Fill.Visible = msoTrue und shp.Fill.ForeColor.RGB = 0?

Der gezeigte VBA-Code (Visual Basic for Applications) wird typischerweise in Microsoft Office-Anwendungen wie PowerPoint oder Excel verwendet, um die Formatierung einer Form (Shape) zu steuern. Hier i...

Wie gebe ich ein Array in PHP 8 per Schleife aus?

Um einen Array in PHP 8 in einer Schleife anzuzeigen, kannst du zum Beispiel eine foreach-Schleife verwenden. Hier ein einfaches Beispiel: php <?php $fruits = ["Apfel", "Banane"...

Wie erstelle ich in Access VBA eine SQL-Abfrage?

Um in Microsoft Access per VBA eine Abfrage (Query) mit SQL zu erstellen, kannst du das DAO-Objektmodell verwenden. Hier ein Beispiel, wie du per VBA eine neue Abfrage mit einer SQL-Anweisung erstells...

Was ist falsch an folgendem Access VBA SQL-Statement: strSQL = "INSERT INTO tbl_Bestände_HZV (Datum, RLEx) IN " & strPfadExtern & "." & ZielTabelle & ...?

In deinem SQL-Statement gibt es mehrere Probleme: 1. Syntaxfehler bei IN: Das IN-Schlüsselwort wird in Access-SQL für das Einfügen in eine externe Tabelle verwendet, aber die Syntax...