• 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.

Çözüldü Çalışma Kitabında Çalışan kod Eklentilerde çalışmıyor

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.

bulentkars

Yeni Üye
Kullanıcı Bilgileri
Aktiflik
Çevrimdışı
Katılım
30 May 2022
Mesajlar
602
Çözümler
5
Aldığı beğeni
95
Excel V
Office 365 TR
Konuyu Başlatan
Merhaba;

Aşağıdaki kodu çalışma kitabı içindeki modüleden çalıştırdığımda çalışıyor. Ancak kodu Kullandığım bir eklenti çalışmasındaki modüle içinden çalıştıramıyorum. Yardımcı olabilirseniz sevinirim. Şimdiden Teşekkürler
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
Çözüm
başka bir dosya üzerinden bu kodun bulunduğu dosyaya mı ulaşıyorsunuz.
eğer öyle ise;
Set wsGeneLozet = ThisWorkbook.Worksheets("GENELOZET")
satırı işlemi başlattığınız dosyada GENELOZET sayfasını arayacak
bulamayınca da hataya düşecektir.
bunu aşmak için,
Set wsGeneLozet = Workbooks(".......xlsm).Worksheets("GENELOZET") şeklinde değiştirin.
..... olan yere dosya adını yazın.
Bu satırda hata veriyor.
Set wsGeneLozet = ThisWorkbook.Worksheets("GENELOZET")

aynı makroyu ilgili çalışma kitabının modülünde çalıştırdığımda çalışıyor ama.
 
Eklenti olarak kullanacaksanız eklentinin bir Excel kısmı olmaz yani Excel dosyası olmaz.
Muhtemelen aktif dosya üzerinde işlem yapmak istiyorsunuz o halde o satırı aşağıdaki gibi yapın.
Kod:
Değerli Misafirimiz İçeriği Görebilmek İçin Üyemiz İseniz Giriş Yap'ın Ya da Üye Ol'un.
 
başka bir dosya üzerinden bu kodun bulunduğu dosyaya mı ulaşıyorsunuz.
eğer öyle ise;
Set wsGeneLozet = ThisWorkbook.Worksheets("GENELOZET")
satırı işlemi başlattığınız dosyada GENELOZET sayfasını arayacak
bulamayınca da hataya düşecektir.
bunu aşmak için,
Set wsGeneLozet = Workbooks(".......xlsm).Worksheets("GENELOZET") şeklinde değiştirin.
..... olan yere dosya adını yazın.
 
Çözüm
başka bir dosya üzerinden bu kodun bulunduğu dosyaya mı ulaşıyorsunuz.
eğer öyle ise;
Set wsGeneLozet = ThisWorkbook.Worksheets("GENELOZET")
satırı işlemi başlattığınız dosyada GENELOZET sayfasını arayacak
bulamayınca da hataya düşecektir.
bunu aşmak için,
Set wsGeneLozet = Workbooks(".......xlsm).Worksheets("GENELOZET") şeklinde değiştirin.
..... olan yere dosya adını yazın.
Tamam, oldu çok teşekkür ederim
 
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst