Bereich an Range-function übergeben
19.04.2018 14:32:27
Kevin
um meinen Code übersichtlicher zu gestalten möchte ich eine definierte range mehreren Funktionen übergeben. Habe bisher keinen Text finden können der diese frage löst.
Diese Variante einen String an die range-function zu übergeben funktioniert offensichtlich nicht. Käre super wenn mir jemand sagen kann wie ich einen bestimmten Bereich an Subs übergeben kann und in der Range Funktion nutze.
Private Sub Bereich(ByVal K As String)
K = "A1:CA220"
End Sub
Public Sub
Call Bereich(KB)
Range("KB").Select
Selection.EntireRow.Hidden = False
End Sub
Anzeige