B

Çözüldü hücredeki rakamı çift ya da çiftin katı yapma

  • Konuyu başlatan Konuyu başlatan berkbaba
  • Başlangıç tarihi Başlangıç tarihi
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
B

berkbaba

Normal Üye
Excel Versiyonu
Excel 2016
Excel Sürümü
64 Bit
Excel Dili
Türkçe
VBA kodu ile
I6 hücresindeki rakam tek ise L6 hücresine +1 ekleyerek çift yapacak
I6 hücresindeki rakam çift ise L6 hücresine +2 ekleyerek katı yapacak
Örnek:
I6 = 3
L6 = 4
veya
I6 = 2
L6 = 4
makroya ihtiyacım var. Yardımcı olabilir misiniz?
 
Tarihe göre sırala Oylamaya göre sırala
malatyalı' Alıntı:
VBA kodu ile
I6 hücresindeki rakam tek ise L6 hücresine +1 ekleyerek çift yapacak
I6 hücresindeki rakam çift ise L6 hücresine +2 ekleyerek katı yapacak
Örnek:
I6 = 3
L6 = 4
veya
I6 = 2
L6 = 4
makroya ihtiyacım var. Yardımcı olabilir misiniz?
Genişletmek için tıklayın ...

Merhaba,
Makronun henüz M'sine gelememiş biri olarak şöyle basit bir çözüm sunayım.

Kod: 
Görüntülemek için giriş yapmanız gerekmektedir.
(8 satır)

Kodu bir butona bağlayabilirsiniz.
 
Oyla 0 Olumsuz oyla
malatyalı' Alıntı:
VBA kodu ile
I6 hücresindeki rakam tek ise L6 hücresine +1 ekleyerek çift yapacak
I6 hücresindeki rakam çift ise L6 hücresine +2 ekleyerek katı yapacak
Örnek:
I6 = 3
L6 = 4
veya
I6 = 2
L6 = 4
makroya ihtiyacım var. Yardımcı olabilir misiniz?
Genişletmek için tıklayın ...
VBA: 
Görüntülemek için giriş yapmanız gerekmektedir.
(3 satır)

Düzenleme: Sayın @PriveT İlyas hocam doğru cevabı vermiş zaten.
 
Oyla 0 Olumsuz oyla
Sayın PriveT bu yardımınız makronun M' sini bilmeden yaptığınız ise ya bir de bilseydiniz. Allah ilminizi artırsın.
Feyzullah abime de PriveT abime de teşekkür ederim.
Bir şey sormak istiyorum abilerime
For ya da case ile veya başka bir şekilde textboxlara birinci çift tık ile "A" ikinci çift tık ile "B" üçüncü çift tık ile de "C" yazılabilir mi?
 
Oyla 0 Olumsuz oyla
malatyalı' Alıntı:
Sayın PriveT bu yardımınız makronun M' sini bilmeden yaptığınız ise ya bir de bilseydiniz. Allah ilminizi artırsın.
Feyzullah abime de PriveT abime de teşekkür ederim.
Bir şey sormak istiyorum abilerime
For ya da case ile veya başka bir şekilde textboxlara birinci çift tık ile "A" ikinci çift tık ile "B" üçüncü çift tık ile de "C" yazılabilir mi?
Genişletmek için tıklayın ...
Teşekkürler.
İşte burdan itibaren sizi makro üstadlarıma devrediyorum. ☺️
 
Oyla 0 Olumsuz oyla
Sayın @malatyalı .

Sorularınızı örnek belge üzerinden sormamaya devam ediyorsunuz.
Cevap/fikir yazılsa bile sorun yaşanması muhtemel.

Örneğin Userform üzerindeki bir Textbox'tan söz ediliyorsa, aşağıdaki gibi düşünülebilir.
Textbox sayısı fazla ise en iyisi Class Module kullanmak. Yoksa tüm textboxlar için ayrı ayrı, aynı kodun çoğaltılması gerekir.

TextBox'a çift tıklama için:
ilk seçenek BOŞ veya C olması durumu ve değer A olarak değiştirilir, Değer A ise B, B ise C olur.

VBA: 
Görüntülemek için giriş yapmanız gerekmektedir.
(5 satır)

.
 
Oyla 0 Olumsuz oyla
Ömer abi Israrla yapmak ya da muhalif olmak amacı ile değil, örnek dosya vallahi aklıma gelmiyor. Haklısınız özür dilerim.
Cevabınız için de teşekkür eder, ellerinden öperim ustamın
 
Oyla 0 Olumsuz oyla
Durum
Üzgünüz bu konu cevaplar için kapatılmıştır...
Üst