besteht die Möglichkeit (ohne Combobox) die Schriftgröße einer DropDown-Liste zu vergrößern?
LG
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim B As Boolean
On Error Resume Next
B = Target.Validation.InCellDropdown
ActiveWindow.Zoom = IIf(Err.Number, 55, 100) '55%,100%
Err.Clear
End Sub
gefunden, muss aber das Makro mit Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells(1).Column = 7 Then
Target.Cells(1).Offset(1, 0).EntireRow.Hidden = Target.Cells(1) = ""
End If
If Target.Cells.Count = 1 Then
TabFarbeAenedern
End If
Dim rngBereich As Range
Set rngBereich = Range("H136")
If Not Intersect(Target, rngBereich) Is Nothing Then
Call EndeMarkierung
End If
Set rngBereich = Nothing
End Sub
kombinieren.