Hafızadaki verileri seçili hücreye değer olarak yapıştırma

[Carpintero]

İyi günler.

Alttaki gibi deneme yaptığımda hata alıyorum.
Şu şekilde bir kod yazmak istemiştim:

Bilgisayarın hafızasına aldığı kopyalanmış veriler.
Komut düğmesine bastığım zaman; excel sayfasında seçili olan
hücreye değer olarak yapıştırılsın. A1 seçili ise A1 e B10 seçili ise B10 a
(hangi hücre seçili ise o hücreye) yapıştırılacak.
Yardımcı olabilirseniz çok sevinirim. Teşekkür ederim şimdiden.

Sub Makro2()
'
' Makro2 Makro
'

'

Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub

 

[NBATMAN]

Merhaba,

aşağıdaki gibi deneyin

Sub Makro1()
ActiveCell.Select
ActiveSheet.Paste
End Sub

 

[Carpintero]

Merhaba yardımınız için teşekkür ederim.

Tam olarak istediğim aşağıdaki şekilde bir kod idi.
Kod çok işime yaradı. Ama bazen olmadık şekilde hata veriyor.
Bu şekilde basit bir kod hangi durumda hata verebilir acaba?
Dosya ekleyeceğim lakin her zaman hata vermiyor.
Zaten kodun içeriğinde de hücre adresleri de yok.
Ne yapacağımı bilemiyorum şuan

Sub Makro1()
ActiveSheet.PasteSpecial (xlPasteValues)
End Sub

 

[Emir Hüseyin Çoban]

. . .

Kodlarınızda örneğin txt dosyasından kopyalama yapınca hata vermiyor.
Ancak excelden hücre kopyalayınca hata veriyor.

Bir kodlama denedim ancak hatalı sonuç üretti.

. . .

 

[Orion1]

Aşağıdaki olur.

range("A1").PasteSpecial (xlPasteValues)

 

[Carpintero]

Aşağıdaki olur.

range("A1").PasteSpecial (xlPasteValues)

Abi hücre adresi olmaması lazım kodun için.
Daha önceden kopyalanan veriyi (Bir başka excel sayfasından yada
başka bir programdan da olabilir.) Yapıştır butonuna bastığımız zaman
o anki aktif olan hücreye değer olarak yapıştırmasını istiyorum.

. . .

Kodlarınızda örneğin txt dosyasından kopyalama yapınca hata vermiyor.
Ancak excelden hücre kopyalayınca hata veriyor.

Bir kodlama denedim ancak hatalı sonuç üretti.

. . .

Biraz daha açıklama yapabilir misiniz acaba? Ben epey acemiyim.
Tam olarak ne yapmam gerekli. Hata olmaması için.

 

[Emir Hüseyin Çoban]

. . .

Bu şekilde deneyiniz.
ActiveSheet.PasteSpecial (xlValue)

. . .

 

[Orion1]

Abi hücre adresi olmaması lazım kodun için.
Daha önceden kopyalanan veriyi (Bir başka excel sayfasından yada
başka bir programdan da olabilir.) Yapıştır butonuna bastığımız zaman
o anki aktif olan hücreye değer olarak yapıştırmasını istiyorum.



Biraz daha açıklama yapabilir misiniz acaba? Ben epey acemiyim.
Tam olarak ne yapmam gerekli. Hata olmaması için.

range("A1") yerine activecell yazınız.

 

[Carpintero]

Çok çok teşekkür ederim.
Ellerinize sağlık.