CheckBox1 yardımı

[musaagac]

CheckBox1 butonu işaretli ise A1 hücresine X işareti koymak istiyorum nasıl yapabilirim.

 

[janveljan]

Checkbox ın bulunduğu yere sayfa yada form kodlarına aşağıdaki kodları yazın.

Private Sub CheckBox1_Change()
If CheckBox1 Then Range("A1") = "X" Else Range("A1") = ""
End Sub

 

[musaagac]

Teşekkür ederim .

Txtbox kutucuğuna yazmış olduğum t.c. kimlik noyu sorgulatarak kişinin sadece baba adı doğum yeri ve doğum tarihini sorgulatacağım nasıl yapabilirim.

 

[janveljan]

Teşekkür ederim .

Txtbox kutucuğuna yazmış olduğum t.c. kimlik noyu sorgulatarak kişinin sadece baba adı doğum yeri ve doğum tarihini sorgulatacağım nasıl yapabilirim.

Örneği incelerseniz faydalı olacaktır

 

[musaagac]

Daha önce bilgiler kayıtlı değil internetden sorgulatmak istiyorum. ilk kayıt yaparken t.c. sorgulasın öyle kayıt etsin.

 

[janveljan]

İnternette bu işi yapabileceğiniz bir yer var mı?
Nüfus idaresinin sayfasında TC Kimlik No doğrulama var ama orada sadece adı soyadı ve doğum tarihi bilgisini döndürüyor. Ayrıca Resim Doğrulama da istiyor bu kısmı atlatılabilirmi bilmiyorum.

 

[musaagac]

Textboxda T.C. kimlik noyu yazıp internetden kimlik paylaşımla ilgili bilgilerini sorgulamak için idi