• DİKKAT !

    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 Dosya Yükleme 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
Katılım
30 May 2022
Mesajlar
605
Çözümler
5
Aldığı beğeni
103
Excel V
Office 365 TR
Konu Sahibi
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
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
Çö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.
Konu Sahibi
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.
HTML:
Kod:
İçeriği görebilmek için Giriş yap ya da Üye ol.
 
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
Konu Sahibi
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