Excel Vba Forum - Excelce.Net

SORU ve CEVAPLAR (Yazılabilir) => Microsoft Excel, Vba, Makro, Formül vb. Soruları => Çözülen Excel, Vba, Makro, Formül vb. Soruları => Konuyu başlatan: yesilyurtlu - 24 Mayıs 2010, 18:41:35

Başlık: [Çözüldü] Onaya Bağlı Artırımlı Sayı
Gönderen: yesilyurtlu - 24 Mayıs 2010, 18:41:35

Üstadım Selamün Aleyküm;
Yine başınızın belası olarak mazur görün bir istirhamım olacak üstadlarımdan.
Excelde sayfayı açtığım zaman "ÖDEME YAPACAK MISINIZ ?"  Evet dersem AA1 hücresine 1 verecek. Hayır dersem rakam vermeyecek. Her açtığımda evet onayı verilirse AA1 hücresi devamlı artacak.1,2,3,4 diye

Yardımcı olabilir misiniz?

Başlık: Ynt: Onaya Bağlı Artırımlı Sayı
Gönderen: Orion1 - 24 Mayıs 2010, 20:41:06

İlgili sayfanın kod modülüne aşağıdaki kodları yapıştırınız. 8)

Kod: [Seç]

Private Sub Worksheet_Activate()
If MsgBox("ÖDEME YAPACAK MISINIZ ?", vbYesNo + vbQuestion, "ÖDEME") = vbNo Then Exit Sub
Range("AA1").Value = Range("AA1").Value + 1
End Sub

Başlık: Ynt: Onaya Bağlı Artırımlı Sayı
Gönderen: yesilyurtlu - 25 Mayıs 2010, 07:34:55

Evren Abi ;
Teşekkür Ederim. Sağolasın.

"ÇÖZÜLDÜ"

Başlık: Ynt: Onaya Bağlı Artırımlı Sayı
Gönderen: Orion1 - 25 Mayıs 2010, 16:58:22

Alıntı yapılan: yesilyurtlu - 25 Mayıs 2010, 07:34:55

Evren Abi ;
Teşekkür Ederim. Sağolasın.

"ÇÖZÜLDÜ"

Rica ederim.
İyi çalışmalar. 8)