Zeilenhöhe automatisch wie vorige Zeiele

Bild

Betrifft: Zeilenhöhe automatisch wie vorige Zeiele
von: Burghard
Geschrieben am: 27.08.2015 12:47:44

Hallo,
ich möchte gerne über das "Change-Ereignis" in Spalte A per VBA erreichen, dass die Eingabezelle in Spalte A die Zeile nach Verlassen auf die Zeilenhöhe der Vorzeile eingestellt wird. Hilfe wäre nett.
Grüße Burghard

Bild

Betrifft: AW: Zeilenhöhe automatisch wie vorige Zeiele
von: Rudi Maintaire
Geschrieben am: 27.08.2015 13:28:12
Hallo,

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column = 1 Then
    If Target.Count = 1 Then
      If Target.Row > 1 Then
        Target.RowHeight = Target.Offset(-1).RowHeight
      End If
    End If
  End If
End Sub

Gruß
Rudi

Bild

Betrifft: AW: Zeilenhöhe automatisch wie vorige Zeiele
von: Burghard
Geschrieben am: 27.08.2015 13:59:24
Hallo Rudi,
uih, das ging ja superschnell. Vielen Dank! Deine Lösung funktioniert wie gewünscht.
Grüße Burghard

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Zeilenhöhe automatisch wie vorige Zeiele"