İki hücrenin yer değiştirmesi.

[leumruk]

Selamlar...
Mümkün mü bilmiyorum;ama bana kodlarla iki hücre içindeki verilerin yerlerinin değişmesi lazım. Örnek: A1'deki veri C1'e, C1'deki veri A1'e gidecek. Mümkünse en kısa şekilde.
NOT: Başka hücreye kopyalayıp transfer etme şeklinde olmayacak. Bir hamlede gerçekleşecek.
Saygılar...

 

[Orion1]

Sub yer_degistir()
Dim deg As Variant
deg = Range("C1").Value
Range("C1").Value = Range("A1").Value
Range("A1").Value = deg
End Sub

 

[leumruk]

Olabileceğine pek ihtimal vermiyordum; ama excel bu işte... Belli olmuyor.
Syn. Evren Bey, çok teşekkür ederim. Gerçekten harika bir kod.
Saygılar...

 

[Orion1]

Olabileceğine pek ihtimal vermiyordum; ama excel bu işte... Belli olmuyor.
Syn. Evren Bey, çok teşekkür ederim. Gerçekten harika bir kod.
Saygılar...

Rica ederim.
İyi çalışmalar.

 

[skyking]

merhabalar; bu işlemi macro kodu olmadan yapabileceğimiz bir kısayol var mıdır? teşekkürler.

 

[Bora K]

Sub yer_degistir()
Dim deg As Variant
deg = Range("C1").Value
Range("C1").Value = Range("A1").Value
Range("A1").Value = deg
End Sub

Merhabalar.
Evren Hocam.

Hücredeki veriler ile beraber resimlerinde
yer değştirmesini istiyorum.
Şayet yapılabilme imkanı var ise
ilgilenirseniz çok sevinirim.