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.Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen