2017-06-16 10 views
0

Ich habe nach einer Möglichkeit gesucht, in VBA zu kodieren: wenn ich auf eine bestimmte Zelle im Bereich X10: X5000 klicken, sollte Excel diese Zelle Wert in eine bestimmte Zelle kopieren B10.VBA Kopie Wert der ausgewählten Zelle in bestimmten Spalte

Derzeit habe ich folgendes, aber es funktioniert nur, wenn die Zelle, die ich auswähle, ein tatsächlicher Wert ist. Wenn die ausgewählte Zelle das Ergebnis einer Formel ist, zeigt die Zielzelle den Wert für einen Bruchteil einer Sekunde an und die Zelle wird leer.

Also wie kann ich sicherstellen, dass ich immer den Wert der ausgewählten Zelle und nicht die Formel kopieren? Im Beispiel habe ich den Bereich nicht berücksichtigt, sondern nur eine ausgewählte Spalte.

Danke für die Hilfe!

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 

If Target.Column = 19 Then ' check if cell modifed is in column "S" 
Target.Copy Range("B10") 
End If 

End Sub 

Vielen Dank!

Antwort

2

Versuchen

Range("B10").Value = Target.Value 

statt

Target.Copy Range("B10") 

Dies sollte den Wert über, anstelle der Formel

+0

Arbeitete wie ein Charme Transfer mit! Vielen Dank! –

Verwandte Themen