• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Makro Kayıt

  • Konbuyu başlatan Konbuyu başlatan CenTay
  • Başlangıç tarihi Başlangıç tarihi
Katılım
27 Haziran 2010
Mesajlar
394
Excel Vers. ve Dili
Türkçe 2010 Ofis
Selamlar arkadaşlar iyi yıllar
Bir butona atayacağım kod,
Modül yada sayfa olabilir.
Sub isimleri_kayıt()
Eğer İSİM_KAYIT sayfası E1 Ayşe ise userform1 i aç,
eğer E1 Hasan ise userform2 yi aç,
Eğer E1 Namık ise usergorm3 ü aç diye devam etsin istiyorum.
Teşekkürler arkadaşlar.
 
Merhaba.

Kod:
sub isimleri_kayıt ()
    select case range("e1")
    case "Ayşe"
        userform1.show
    case "Hasan"
        userform2.show
    case "Namık"
        userform3.show
    end select
end sub
 
Geri
Üst