textboxtaki değere bağlı olarak buton aktif

[zulfuernek]

TextBox1 ve Button1 var;

TextBox1 e tarih yazıyorum.

TARİH FORMÜLÜM:

If TextBox1.Tag = "1" = True Then Exit Sub
If Len(TextBox1) = 2 Then
If InStr(TextBox1, ".") = 0 Then TextBox1 = TextBox1 & "."
ElseIf Len(TextBox1) = 5 Then
If Len(TextBox1) - Len(Application.Substitute(TextBox1, ".", "")) < 2 Then
TextBox1 = TextBox1 & "."
End If

Ben 01012017 yazıyorum ve otomatik olarak anında 01.01.2017 gibi görünüyor. buraya kadar sorunum yok.

Şimdi gelelim bununl ilgili sorum


TextBox1 = 10 karakter oluşunca Button1 aktif olmalı, değilse pasif olmalı.

 

[zulfuernek]

umarım anlatabilmişimdir. hocalarım

 

[Ömer BARAN]

Merhaba.

Visible (görünürlük) =True/False ......... , Enabled (kullanılabilirlik)=True/False
şeklinde anatılabilir.
Kendiniz halledebilirsiniz diye düşünüyorum.
.

 

[zulfuernek]

ömer hocam formülleri birleştirmede henüz pişemedim. ama sizden öğreniyorum hiç kuşkusu.

CommandButton.Enabled = False

ve

TextBox1.MaxLength = 10
CommandButton.Enabled = true

işlemlerini birleştiremiyorum.

10 karakter olunca buton aktif olsun diye

 

[zulfuernek]

TextBox1.Length <10_(commandButton1.Enebled = False)

?

 

[Ömer BARAN]

Aşağıdaki gibi olabilir.
.

If Len(TextBox1)=10 Then
    CommandButton1.Enabled=True
Else
    CommandButton1.Enabled=False
End If

 

[zulfuernek]

ömer hocam şöyle diyeyim

If = eğer
Else = değil ise
End if = uygula
demek sanırım.

Len ne demek ?

 

[zulfuernek]

len = karakter sayırı, length yani ok. bu da tamamdır.

gizleme tamam ama aktif edemiyorum

 

[Ömer BARAN]

Aynen LEN=>LENGHT anlamında.

If ... Then... Else...End If yapısına gelince, sayfada kullanılan EĞER formülünden bir farkı yok.
=EĞER(koşul;koşul doğruysa yapılacak işlem;koşul yanlışsa yapılacak işlem)

If koşul Then (koşul gerçekleşiyor ise)
yapılacak işlem
Else (koşul gerçekleşmiyorsa)
yapılacak işlem
End If

yapılacak işlem kısmı uzun da olabilir, başka bir kod blokunun çalıştırılması da olabilir,
belgeyi kaydet-kapat da olabilir, yeni bir If...End If kod bloku da olabilir vs.

 

[zulfuernek]

TEŞEKKÜR EDERİM ÖMER HOCAM.

Kodu düzenledim dediğiniz şekilde. başta yapamadım. daha sonra userform activateye false kodunu ekleyince düzeldi. tam istediğim gibi oldu.