DoğanD
Altın Üye
- Katılım
- 22 Eylül 2023
- Mesajlar
- 427
- Excel Vers. ve Dili
- Office 365 TR
- Altın Üyelik Bitiş Tarihi
- 05-10-2028
Merhaba,
Uzun süredir (yaklaşık 2 yıl) sorunsuz kullandığım makro 3 gündür çalışmıyor ve aşağıdaki hatayı alıyorum ve Debug tıkladığımda Excel tümden kapanıyor. Adım adım çalıştırarak hatanın Özel Yapıştır satırında olduğunu tespit ettim. Bu forum da dahil biraz araştırdım fakat sorunumu çözemedim. Dosya şirkete ait veriler içerdiği için paylaşamıyorum. Fakat başka makrolu dosyalarda, aynı işlevi kullanırken hata almıyorum. Hata ve hatayı aldığım satırlar aşağıdaki gibi, daha önce yaşayan yada çözüme dair fikri olan varsa desteğini rica ediyorum.
3 farklı alanda formülden kurtarmak için Özel Yapıştır > Değerleri işlevini kullanıyorum. Bunun yerine uygulayabileceğim başka bir yöntem varsa o da işimi görebilir.
Run-Time Error '-2147417848 (80010108)
Automation error
çağırılan nesne istemcilerinden ayrılmış.
Range("A2:A" & dolu).Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Şimdiden teşekkürler.
Uzun süredir (yaklaşık 2 yıl) sorunsuz kullandığım makro 3 gündür çalışmıyor ve aşağıdaki hatayı alıyorum ve Debug tıkladığımda Excel tümden kapanıyor. Adım adım çalıştırarak hatanın Özel Yapıştır satırında olduğunu tespit ettim. Bu forum da dahil biraz araştırdım fakat sorunumu çözemedim. Dosya şirkete ait veriler içerdiği için paylaşamıyorum. Fakat başka makrolu dosyalarda, aynı işlevi kullanırken hata almıyorum. Hata ve hatayı aldığım satırlar aşağıdaki gibi, daha önce yaşayan yada çözüme dair fikri olan varsa desteğini rica ediyorum.
3 farklı alanda formülden kurtarmak için Özel Yapıştır > Değerleri işlevini kullanıyorum. Bunun yerine uygulayabileceğim başka bir yöntem varsa o da işimi görebilir.
Run-Time Error '-2147417848 (80010108)
Automation error
çağırılan nesne istemcilerinden ayrılmış.
Range("A2:A" & dolu).Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False
Şimdiden teşekkürler.