Butona Basınca hücrenin aşağıya geçmesini engelleme

Katılım
27 Şubat 2023
Mesajlar
37
Excel Vers. ve Dili
2016-TR
Herkese iyi iftarlar, iyi ramazanlar dilerim.

Gördüğünüz gibi basit bir matrah uygulaması yapıyorum. Şu anlık neredeyse her şey çalışıyor. Sadece şu problemim kaldı. Hesapla tuşuna bastığımda lütfen kdv tutarını giriniz uyarısını veriyor ama alt hücreye geçiyor. Onu engellemem gerekiyor. Bir de aynı zaman da yan tarafta bulunan kdv oranlarından birini seçmeyince yine aynı uyarıyı vermesini ve hücre atlamamasını istiyorum. Amacım sizlerden öğrenmek. Öğrene öğrene geliştirmek istiyorum. Destekleriniz için teşekkür ederim.

 
Katılım
20 Haziran 2008
Mesajlar
697
Excel Vers. ve Dili
Microsoft Office ev ve iş 2019
Altın Üyelik Bitiş Tarihi
03-07-2024
Hayırlı ramazanlar
Dosyayı görmedim fakat butonun kodun sonuna

End sub dan öncesine

Range ("A1").Select A1 örnektir.
Koyarsanız istediğiniz satırı seçmiş olursunuz
 
Katılım
27 Şubat 2023
Mesajlar
37
Excel Vers. ve Dili
2016-TR
Hayırlı ramazanlar
Dosyayı görmedim fakat butonun kodun sonuna

End sub dan öncesine

Range ("A1").Select A1 örnektir.
Koyarsanız istediğiniz satırı seçmiş olursunuz
öncelikle teşekkürler. O zaten seçilmiş durumda şu an. Ben aktif satırın bir aşağısına geçmesin istiyorum.
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
Selamlar

Sayın: @leylabalse

size naçizane tavsiyem; Nesnelerin adlarını daha kısa yazmanız. Çünkü, kodlama yaparken hem daha anlaşılır olur, hem de nesne adlarını kısaltmış olursunuz. Yine de tabi ki karar sizin

örneğin :

Nekadarlikfaturakesebilirimtxtkdvnintutari Yerine aşağıdaki
txtKdvTutar

nekadarlikfaturakesebilirimopyuzdeonsekiz
optOnsekiz

nekadarlikfaturakesebilirimcbhesapla
btnHesapla
 
Katılım
27 Şubat 2023
Mesajlar
37
Excel Vers. ve Dili
2016-TR
Selamlar

Sayın: @leylabalse

size naçizane tavsiyem; Nesnelerin adlarını daha kısa yazmanız. Çünkü, kodlama yaparken hem daha anlaşılır olur, hem de nesne adlarını kısaltmış olursunuz. Yine de tabi ki karar sizin

örneğin :

Nekadarlikfaturakesebilirimtxtkdvnintutari Yerine aşağıdaki
txtKdvTutar

nekadarlikfaturakesebilirimopyuzdeonsekiz
optOnsekiz

nekadarlikfaturakesebilirimcbhesapla
btnHesapla
Çok teşekkür ederim hocam. Önerinizi dikkate kesinlikle alacağım. Çözüm için herhangi bir öneriniz var mıdır? Ya da neyi aramalıyım? Yönlendirmeniz sonucunda sonuca ulaşabilirim. Hayırlı ramazanlar dilerim
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
Selamlar
Teşekkür ederim.
Umarım doğru anlamışımdır

İnceleyiniz
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
Selamlar
18 olan option buton form açıldığında seçili gelecek

Buyrun
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
Selamlar
Rica ederim.
İyi çalışmalar
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
Selamlar
InputBox dan boş çıkarken hata veriyordu onu düzelttim.

DosyaSonHali
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
Selamlar

Rica ederim.
İyi çalışmalar
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
Selamlar
Sayın: @leylabalse
Hesaplama sayfasını kopyaladık tamam. Sonra kopyalanan sayfaya gönderdiğiniz resimde kırmızı kare içine aldığınız kod (Formül) yerine ne olmasını istiyorsunuz?
Ayrıca bu sayfaya yine form üzerinden hesaplama mı yaptıracaksınız?
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
Selamlar
çerçeve ile belirttiğiniz kod yerine aşağıdaki kodu kullanabilirsiniz.
Kod:
ws.Cells(ss, "C").Value = ws.Cells(ss, "A").Value * ws.Cells(ss, "B").Value / 100
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
Selamlar

Bir örnek üzerinden gidelim. Örneğin, KDV tutarı 180, KDV oranı ise %18 olsun. Matrah= 180 / (18/100) formülünü uygulayarak 1000 TL sonucuna ulaşılır.

bu sonuç nasıl 1000 TL çıkıyor merak ettim gerçekten
 
Katılım
27 Şubat 2023
Mesajlar
37
Excel Vers. ve Dili
2016-TR
Selamlar

Bir örnek üzerinden gidelim. Örneğin, KDV tutarı 180, KDV oranı ise %18 olsun. Matrah= 180 / (18/100) formülünü uygulayarak 1000 TL sonucuna ulaşılır.

bu sonuç nasıl 1000 TL çıkıyor merak ettim gerçekten
önce parantez içi işlem= 18/100 = 0,18 180/0,18= 1000
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
o zaman buradaki 180 değeri örnek , Textbox da ne yazarsa o tutar üzerinden bu işlemi yapacak doğru mu?
 

Mdemir63

Altın Üye
Katılım
7 Temmuz 2006
Mesajlar
2,860
Excel Vers. ve Dili
Ofis2010 32Bit Türkçe
Altın Üyelik Bitiş Tarihi
19-02-2026
Peki çıkan sonucu buradaki örnekteki gibi (Yani 1000TL) nereye yazdıracağız
 
Üst