VBA Dynamischer Zellbereich mit Variabler

Function als eigenes Modul in dem Projekt angelegt ist also der Aufbau wie Folgt aussieht:
Module:
Function_CluForm_KL
Function_CluForm_Sald
Function_CluForm_xxx
Sub_Ablauf
Über das Makro Sub_Ablauf werden die Functions Aufgerufen:
Public row As Integer

Sub Ablauf()
'Ermitteln der Anzahl der vorhandenen Datensätze amhand der Kundnenummern
'zur verwendung als Globale Variable in den Functions "CluForm..."
Sheets("Cluster").Select
Srow = 1
Columns("B:B").Select
Range("B1").Select
Do Until ActiveCell.Value = ""
Srow = Srow + 1
ActiveCell.Offset(rowOffset:=1, columnOffset:=0).Select
Loop
row = Srow - 1
'Auswertungsformeln in Cluster schreiben
Call CluForm_KL
Call CluForm_Sald
Call CluForm_xxx
Die Functions sind alle Ähnlich hier als Beispiel die Function_CluForm_KL:

Function CluForm_KL()
Dim row As Integer
'Formel Für NYD 1 Monat in Cluster eintragen
Sheets("Cluster").Select
Range("AB2").Select
ActiveCell.FormulaR1C1 = "=SUMIF(KL!C[-27],RC[-26],KL!C[-24])"
Range("a1").Select
Range("AB2").Select
Selection.Copy
Range("AB3:AB" & row).Select
Selection.PasteSpecial Paste:=xlFormulas, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Range("A1").Select
End Function


Excel aktzeptiert in dieser 

Function die Variable "row" nicht, mit der ich das Ende des Zellbereich definieren möchte.
Hat jemand eine Idee wie ich das Problem gelöst bekomme?
Vielen Dank für Eure Mithilfe
Steffen