Excel Forum
ALTIN ÜYELİK Hakkında Bilgi


Geri Git   Excel Forum > EXCEL-Soruları > Makro-VBA
Atatürk
Şifremi Unuttum

DUYURU SİSTEMİ / REKLAM PANOSU

Makro-VBA Makro veya VBA ile ilgili sorularınızı buraya gönderebilirsiniz.
Dosya ekleyebilirsiniz

Özel Arama


Yanıtla
 
Paylaş Konu Araçları Görünüm Modları
Eski 12-10-2017, 09:48   #1
bistrobellman
 
Giriş: 04/10/2004
Mesaj: 155
Varsayılan Call komutu ile Image1_Click makrosu çalışmıyor?

Selam arkadaşlar,
Image1_Click olayında bir koşul sonrası Call Image1_Dbclick makrosunu neden çalıştıramıyorum acaba?

Public, Option EXplict gibi bir şeyler hatırlıyorum bunlar mı lazım neden Image1_DblClick makrosu çalışmaz Call ile yönlendirdiğim halde? kodlar bu şekilde:


Private Sub Image1_Click()
.
.
MsgBox "Veri Dosyaları Kayıt Edilmemiş", vbInformation, "Uyarı": Call Image1_DblClick: Exit Sub
ElseIf MyRng.Offset(0, 23) <> "" Then
.
.
.End Sub

--------------------------------------------------------------------------------
Private Sub Image1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
.
.
.
End Sub
__________________
Ofis2000- Türkçe -Excel 2000 9.0.3821 (SR-1)
bistrobellman Çevrimdışı   Alıntı Yaparak Cevapla
Eski 12-10-2017, 20:17   #2
bistrobellman
 
Giriş: 04/10/2004
Mesaj: 155
Varsayılan

@leumruk hocam ya da diğerleri yardımcı olabilirler mi acaba?
__________________
Ofis2000- Türkçe -Excel 2000 9.0.3821 (SR-1)
bistrobellman Çevrimdışı   Alıntı Yaparak Cevapla
Eski 12-10-2017, 20:33   #3
Mahmut Bayram
Özel Üye
 
Mahmut Bayram kullanıcısının avatarı
 
Giriş: 25/06/2005
Mesaj: 1,679
Excel Vers. ve Dili:
2007 Excel Tr
Varsayılan

Call ile niye çalıştırıyorsunuz ki direkt
Image1_DblClick içindeki kodları oraya alsanız olmuyor mu?
__________________
Alıntı:
Menzil'de bir ALLAH (CC) Dostu var.
Mahmut Bayram Çevrimdışı   Alıntı Yaparak Cevapla
Eski 12-10-2017, 20:56   #4
PLİNT
 
Giriş: 30/12/2014
Şehir: Gürün
Mesaj: 1,204
Excel Vers. ve Dili:
Excel 2010
Varsayılan

Merhaba
Aşağıdaki gibi olabilir.
Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Private Sub Image1_Click()
Dim Cancel As MSForms.ReturnBoolean
MsgBox "Veri Dosyaları Kayıt Edilmemiş", vbInformation, "Uyarı": Call Image1_DblClick(Cancel): Exit Sub

End Sub
PLİNT Çevrimdışı   Alıntı Yaparak Cevapla
Eski 12-10-2017, 22:58   #5
systran
Destek Ekibi
 
Giriş: 15/12/2007
Mesaj: 1,317
Excel Vers. ve Dili:
2007 [TR]
Varsayılan

şu şekilde deneyin. kendiniz bir alt yordam oluşturarak (kontrol) click ve dblclick işlemlerinden sonra bu yordamı çağırın.

Kod: (Rahat kopyalayabilmeniz için tüm kodu seçmenizi sağlar)
Private Sub Image1_Click()
.
.
.
call kontrol()
end Sub

Private Sub Image1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
.
.
.
call kontrol()
End Sub

sub kontrol()
.
.
.
end sub
systran Çevrimdışı   Alıntı Yaparak Cevapla
Yanıtla


Konu Araçları
Görünüm Modları

Gönderme Kuralları
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is Açık
SimgelerAçık
[IMG] kodu Açık
HTML kodu Kapalı


Saat 08:12


Bu forum Elit NET - www.elitnet.com.tr tarafından sunulmaktadır.

Excel Eğitimi - Mobil Uygulama - Çorlu - Çorlu Web Tasarım - Tarot Falı - invest in turkey - Lingerie - Dyeing Machine - Karton Bardak- Çorlu Özel Eğitim- Site Yönetimi- Led Aydınlatma- Pronet Tekirdağ- Çorlu Kamera- Pronet Edirne- Pronet Kırklareli- Pronet Çerkezköy- Pronet Çorlu- Pronet Lüleburgaz- Pronet Keşan- Çorlu Araç Takip- Çorlu Su Arıtma- Boru Profil- Gebze Emlak- Beylikdüzü Temizlik- İstanbul Burun Estetiği- Bakır Sülfat- Rampa- Rotary- Çorlu İnternet Sitesi- youngblood- Çorlu Palet- Çerkezköy Palet-
Powered by vBulletin Version 3.7.2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Advertisement System V2.6 By   Branden