• DİKKAT

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

Sayfaya göre Form aç.

  • Konbuyu başlatan Konbuyu başlatan alpay1
  • Başlangıç tarihi Başlangıç tarihi
Katılım
22 Ekim 2004
Mesajlar
178
Merhaba,
Eğer "anasayfa" aktifse Makro1
eğer "Sayfa5" aktifse Makro2
eğer "Sayfa6" aktifse Makro3
Else Makro4
Anlatabildimmi bilmiyorum.Bu kodlar Form üzerindeki bir Butonla çalışacak.Butona tıklayınca Form kapanacak ve koşula uygun form açılacak.
Teşekkürler.
 
@alpay1;

Sayfa, CommandButton ve makro isimlerini kendi çalışmana göre düzenlersin.


Kod:
Private Sub CommandButton1_Click()
    Select Case ActiveSheet.Name
        Case "Sheet1"
        Makro1
            Case "Sheet2"
            Makro2
                Case "Sheet3"
                Makro3
        Case Else
        Makro4
    End Select
    Unload Me
End Sub
 
Sayın Raider,
Kodlraınız için çok teşekkürler.
 
Geri
Üst