Formula mit ActiveCell.Offset(r,c) ?

[VBAdvanced]

Hi,

folgende Zeile wird nicht richtig ausgeführt:
TargetAddress.Offset(tarrow, tarcol).Formula = "=CHAR(HEXINDEC(ActiveCell.Offset(0,curcoloff) ))"

Ich möchte damit Folgendes erreichen:
Auf meinem Tabellenblatt hab ich links eine Tabelle mit Hex-Werten.
Abhängig von diversen Kriterien möchte ich rechts daneben eine gefilterte Tabelle anlegen, und gleichzeitig die Hex-Werte in ASCII-Zeichen konvertieren.

Wenn ich die Werte einfach rüberkopieren möchte, und statt ".Formula" ".Value" angebe und der Ausdruck dann einfach TargetAddress.Offset(tarrow, tarcol).Value = ActiveCell.Offset(0,curcoloff).Value lautet, klappt alles.

Es kommt keine Fehlermeldung, sondern der Zielzelle wird der Wert "#NAME?" zugewiesen.


Was muß ich ändern, damit das funktioniert ?

[Severus]

Das funktioniert so nicht!
Muß entweder

Target.Offset(TarRow, TarCol).Formula = "=CHAR(HEXINDEC(" & ActiveCell.Offset(0, CurColOff).Address & "))"

heißen, oder, wenn relative Adressen gewünscht sind,

Target.Offset(TarRow, TarCol).Formula = "=CHAR(HEXINDEC(" & ActiveCell.Offset(0, CurColOff).Address(False, False) & "))"

heißen.
Severus