Office: Nur Ergebnis kopieren

Ich will das Ergebnis einer Formel, hier in Zelle "E1" auslesen und nur den Zahlenwert in die aktive Zelle Kopieren um mit ihm von dort aus weiter zu rechnen.
Nachfolgendes Macro kopiert mir aber nur die Formel mit der ich nichts anfangen kann.
Was muss ich verändern um nur den Wert in die Zielzelle zu schreiben?

Sub kopieren()
Sheets("Bilanz").Range("e1").Copy Destination:=Sheets("Bilanz").Range(ActiveCell.Address)
End Sub

Danke im voraus

 

Warum kopierst du nicht das Ergebnis in die Zelle und sagt dann bei der Einfügen-Option "Zellen verknüpfen" ? Also das wäre der einfachste Weg.

Gruß
Mafiosi

 

Weil ich eine Ursprungszelle aber immer andere Zielzellen habe

 

Grüezi Torbin

Arbeite mit den Referenzen und vor allem den Eigenschaften der Ranges:

ActiveCell.Value = Sheets("Bilanz").Range("e1").Value

 

Hi Thomas,
könntest du das für einen Dau genauer erklären?
wenn ich
Sheets("Bilanz").Range("e1").Copy
durch
ActiveCell.Value = Sheets("Bilanz").Range("e1").Value
ersetze, bekomme ich einen systaxfehler.

 

Code:

Option Explicit

Sub kopieren()
    Sheets("Bilanz").Range("e1").Copy
    Sheets("Bilanz").Range(ActiveCell.Address).PasteSpecial Paste:=xlValues
    Application.CutCopyMode = False         'Zwischenspeicher löschen
End Sub

 

Danke Hajo,
genau das was ich gesucht habe.
Funktioniert 1a

 

Grüezi Torbin

Wrum den Zwischenspeicher verwenden und ihn anschliessend löschen wenn es auch direkt geht?

Wo genau bekommst Du denn den Syntax-Fehler?

Mit Code-Fragmenten alleine kommen wir hier kaum weiter, wenn Du bloss vorne ersetzt hast, den zweiten Teil aber stehen liessest kann es nicht klappen.

Der vollständige Code wäre:

Sub tr()
ActiveCell.Value = Sheets("Bilanz").Range("e1").Value
End Sub