gurbuzs
Altın Üye
- Katılım
- 10 Kasım 2004
- Mesajlar
- 200
- Excel Vers. ve Dili
- Office 360 Tr
- Altın Üyelik Bitiş Tarihi
- 12-11-2026
DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Sub Button3_Click()
ActiveSheet.Shapes("Düğme 3").Visible = False
ActiveSheet.Shapes("Düğme 4").Visible = True
End Sub
Sub Button4_Click()
ActiveSheet.Shapes("Düğme 3").Visible = True
ActiveSheet.Shapes("Düğme 4").Visible = False
End Sub
çok teşekkürler...Merhaba
Bunu deneyiniz.
Kod:Sub Button3_Click() ActiveSheet.Shapes("Düğme 3").Visible = False ActiveSheet.Shapes("Düğme 4").Visible = True End Sub Sub Button4_Click() ActiveSheet.Shapes("Düğme 3").Visible = True ActiveSheet.Shapes("Düğme 4").Visible = False End Sub