Soru Range Sınıfının PasteSpecial Yöntemi Başarısız Hatası

[arionemre]

Herkese merhaba;

Kendimce bir stok takip listesi hazırlıyorum ve bir makroda sıkıntı yaşıyorum. Konu hakkında bilgisi olanlar yardımcı olurlarsa sevinirim. Hata olarak kırmızı yazdığım yer gösteriyor.

Saygılarımla


Sub KAYDET_LİSTELE()
'
' KAYDET_LİSTELE Makro
'

'
Sheets("Stok_Hareketleri").Select
Application.Goto Reference:="R100000C1"
Selection.End(xlUp).Select
ActiveCell.Offset(1, 0).Range("A1").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=True
Range("A3").Select
Sheets("Stok_Giriş_Çıkış").Select
Range("C5:C13").Select
Application.CutCopyMode = False
Selection.ClearContents
Range("C3").Select
End Sub


Şimdiden teşekkür ederim.

 

[arionemre]

Kendi hatamı farkettim altın üyelik olmadığı için silemedim.