• Foruma hoş geldin 👋 Ziyaretçi

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü Run-time-error '1004': Range sınıfının PasteSpecial yöntemi başarısız hatası

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
mert25

mert25

Bronz Üye
Kullanıcı Bilgileri
Aktiflik
Çevrimdışı
Katılım
25 Ağu 2022
Mesajlar
264
Çözümler
1
Aldığı beğeni
54
Excel V
Office 2016 TR
Konuyu Başlatan
Merhabalar

İnternette bulduğum aşağıdaki kod ile bir web sayfasından kopyaladığım verileri (ctrl + shift + z kısayolu ile) excel sayfasına değer olarak yapıştırabiliyordum. Fakat şimdi
Ziyaretçiler için gizlenmiş link,görmek için Giriş yap veya üye ol.
veriyor. Eğer excel sayfasından bir veri kopyalarsam bunda hata vermiyor fakat web sayfasından kopyaladığım veride bu hatayı veriyor. Çözümü ne olabilir?

Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Tarihe göre sırala Oylara göre sırala
Pratik olarak başka bir hücreye yapıştırıp oradan kopyalayıp veri olarak yapıştırma işlemi yapabiliriz.
Bunun için hücre yapıştırma özelliği değil de sayfa yapıştırma özelliğini kullanabiliriz.
Bu şekilde deneyiniz:

Dim ss1 As Worksheet, gecici1 As Range, hedef1 As Range

Set ss1 = ActiveSheet: Set gecici1 = ss1.Range("CC1"): Set hedef1 = Selection
ss1.Paste gecici1: gecici1.Copy
hedef1.PasteSpecial xlPasteValues, xlNone, False, False
gecici1.Clear
 
Son düzenleme:
Olumlu oy 0 Negatif oyla
Ümit Bakacak' Alıntı:
Pratik olarak başka bir hücreye yapıştırıp oradan kopyalayıp veri olarak yapıştırma işlemi yapabiliriz.
Bunun için hücre yapıştırma özelliği değil de sayfa yapıştırma özelliğini kullanabiliriz.
Bu şekilde deneyiniz:

Dim ss1 As Worksheet, gecici1 As Range, hedef1 As Range

Set ss1 = ActiveSheet: Set gecici1 = ss1.Range("CC1"): Set hedef1 = Selection
ss1.Paste gecici1: gecici1.Copy
hedef1.PasteSpecial xlPasteValues, xlNone, False, False
gecici1.Clear
Genişletmek için tıkla...

Cevap için teşekkür ederim fakat bu şekilde yine iki işlem yapmış olacağım, diğer türlü tek işlemde halledebiliyordum. Daha önce çalışan kod ne oldu da çalışmamaya başladı onu anlayamadım.
 
Olumlu oy 0 Negatif oyla
Siz iki işlem yapmayacaksınız. Bütün işi kodlar yapacak. Siz web sayfasından veriyi kopyaladıktan sonra Excel sayfasında makroyu çalıştıracaksınız. Hepsi bu kadar.
 
Olumlu oy 0 Negatif oyla
Deneyiniz.
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Olumlu oy 1 Negatif oyla
Çözüm
Olumlu oy 0 Negatif oyla
Olumlu oy 0 Negatif oyla
Cevaplar için teşekkür ederim. Elinize emeğinize sağlık.
 
Olumlu oy 0 Negatif oyla
Cevap yazmak için giriş yap yada kayıt ol.
Geri
Üst