Code Snippet "VBA Excel"

Wählt alle Zeilen des Blocks um die aktive Zelle aus, sofern der Block mehr als 1 Zelle umfasst

  If ActiveCell.CurrentRegion.Cells.Count > 1 Then
    ActiveCell.CurrentRegion.Rows.EntireRow.Select
  End If