kopiere zellen deren inhalte funktionen sind
10.10.2003 19:32:39
ChrisNa
ich kopiere den Inhalt eins Zellbereiches welcher eine Funktion enthält mit dem Codeschnipsel
Workbooks(A_DN).Sheets(A_AB1).Activate
ActiveSheet.Range("A" & CountUCN).Copy _
Destination:=Workbooks(A_DN).Sheets _
(A_AB5).Cells(CountSchreiben, 1)
CountUCN = 4
CountSchreiben = 3
Workbooks(A_DN).Sheets(A_AB1).Activate
ActiveSheet.Range("A" & CountUCN) enhält die Funktion =wenn(B4>0;zeile(A1);"")
Das Problem ist das nun das Workbooks(A_DN).Sheets _
(A_AB5).Cells(CountSchreiben, 1) nicht die gewünschte Funktion enthält sondern
stattdessen =WENN(B3>0;ZEILE(#BEZUG!);"").
Was mach ich da falsch?
Wie kann ich statt der Funktion, nur den Wert, sprich oder besser schreib den eingetragenen wert kopieren? Geht dies überhaupt?
gruß ChrisNa