Bei diesem Code funtioniert alles gut, ausser dass er beim kopieren der Zellen nicht den Wert sondern die Formel übernimmt.
Kurz gesagt, in einer Zelle habe ich einen Wert und eine Formel drin. Kopieren möchte ich allerdings nur den Wert ohne Formel.
Wie mache ich das?
Ich denke der Fehler liegt in der 3.Zeile des Codes.
Hat das etwas zu tun, weil ich beim kopieren zuerst Cells.Copy und dann Destination Range verwendet habe?
Do
Temp = Worksheets("Übersicht").Cells(3, Spalte).Value
Worksheets("Übersicht").Cells(Zei, Spalte).Copy Destination:=Worksheets("Kandidat (2)").Range(Temp)
Spalte = Spalte + 1
Worksheets("Übersicht").Select
If Cells(Zei, Spalte).Value = "" Then Zei = Zei + 1
If Worksheets("Übersicht").Cells(Zei, Spalte).Value = "" Then Sheets("Kandidat (2)").Name = Worksheets("Übersicht").Range("A" & Zeile)
Loop