Hallo
Ich habe ein Problem.
In Quick Basic war der Tausch von 2 Variablen kein Problem.
Mit dem Schlüsselwort SWAP ging das wie eine eins.
Aber VBA kennt das nicht.
Gibt es da was anderes, oder muss man das über eine Hilfsvariable machen?
mit freundlichen grüßen
Hermann
Hallo Hermann,
kenne den Befehl zwar nicht, aber:
Function Myswap(ByRef a As Variant, ByRef b As Variant) As Boolean
Myswap = True
On Error GoTo abbruch
Dim c As Variant
c = a
a = b
b = c
Myswap = True
abbruch:
End Function
mfg
Dirk.Pegasus
Nachsatz: nächstes mal in einem andern Brett!
OWT