Ctrl C Kopyalama Sorunu

[baydeniro]

Merhaba Arkadaşlar,

Bir Excel dosyamda bol miktarda makro var. Bu dosyadan dışarıya veri kopyalanamıyor. Ctrl C yapıyorum ama öbür dosyaya geçince kopyalama aktivitesi sona eriyor ve dolayısıyla kopyalama gerçekleşmiyor.
Buna hangi urum sebep oluyor olabilir ?

 

[Korhan Ayhan]

Kodlarda Application.CutCopyMode = False şeklinde satır varsa silip deneyiniz.

 

[baydeniro]

CTRL C dışındaki CTRL kısa yolları çalışıyor.
Mouse sağ kliki ile de denedim ama o da çalışmadı.
CTRL C ve sağ klik kopyala diğer dosyalarda çalışıyor.

 

[baydeniro]

Korhan Ayhan üstadım, ilginize teşekkür ediyorum. Manuel olarak yaptığımda da çalışmıyor.

 

[Korhan Ayhan]

Dosyanızı ekleyin kontrol edelim.

 

[baydeniro]

Üstad çok teşekkür ederim. sorunu buldum ama nedenini çözemedim :

ThisWorkbook altında aşağıdaki kod var. Bu kodu kaldırınca Ctrl C ve kopyalama çalışıyor.

Private Sub Workbook_DeActivate()
Application.Calculation = xlCalculationAutomatic
End Sub

 

[Ömer BARAN]

Merhaba.

Anladığım kadarıyla belgenizde kullanılan makrolar (belki de bunlardan sadece bir tanesi) hesaplama yöntemini ELLE olarak değiştiriyor ki;
yukarıda verdiğiniz kod'a ihtiyaç duyulmuş.
Hesaplama yöntemini ELLE haline getiren makroyu bulup, makronun End Sub satırından önce bunu OTOMATİK olarak değiştirmesini sağlayan,
son cevabınızdaki kod satırını eklemeyi deneyin.
Tabi burada sorun yaşamanız muhtemel durum; Workssheet olaylarıyla ilgili Selection_Change veya Change gibi bir kod'un kullanılıyor olmasıdır.

Bence; kullanılan tüm makroların içerisinde olduğu bir örnek belge yüklerseniz,
bir üye mutlaka çözüm yolunda mesafe almanızı sağlayacak cevap yazacaktır diye düşünüyorum.
.

 

[baydeniro]

Ömer Baran üstadım ilginize çok teşekkür ediyorum. Sorunu buldum. Aşağıdaki koddan kaynaklanıyormuş. Şimdilik bu koda satırını kaldırdım, sorun halloldu. Ama buna alternatif çözümler düşüneceğim. Sağlıcakla kalınız.

 

[Ömer BARAN]

Sorunu çözdüğünüze göre mesele yok.
İhtiyaç olduğunda, FORUM ve destek verecek üyeler her zaman burada.

Kolay gelsin.
.