AW: Zugriff auf anderes Workbook
17.01.2008 15:58:00
Erich
Hallo Udo,
die Entscheidung, ob die beiden Zellen per String (=Zelladresse) oder als Bereichsobjekt (Range) als Parameter
übergeben werden sollten, hängt vor allem davon ab, was beim Aufruf leichter fällt.
Wenn es Range-Parameter sind, kann die Angabe des Workbooks und des Wo0rksheets entfallen.
Jeder Bereich kennt das Blatt und die Mappe, zu denen er gehört.
( Das könntest du abfragen mit MsgBox rngA.Parant.Name und rngA.Parant.Parant.Name )
Deine Funktion sähe dann so aus:
Function VerketteR(rngZ1 As Range, rngZ2 As Range) As String
VerketteR = rngZ1 & rngZ2
' oder anderer, umfangreicherer Code
End Function
Wenn die Zelladressen Parameter sein sollen:
Gehören beide Zellen immer im selben Blatt? Wenn nicht, wären auch zwei Mappen- und zwei Blatt-Parameter sinnvoll.
Gehören beide Zellen immer im selben Blatt, sähe das etwa so aus:
Function VerketteS(strWbName As String, strWsName As String, _
strR1 As String, strR2 As String) As String
With Workbooks(strWbName).Worksheets(strWsName)
VerketteS = .Range(strR1) & .Range(strR2)
' oder anderer, umfangreicherer Code
End With
End Function
Rückmeldung wäre nett! - Grüße von Erich aus Kamp-Lintfort