Herkese Merhaba,
Başlıktaki konu için internetten bir çözüm buldum ve projeme uyguladığımda sorun olmadı ama biliyorsunuz her ihtimali bazen deneyemiyoruz o yüzden aşağıdaki kod resimlerdeki sonucu üretme açısında handikapları var mı? 

objRegex.Pattern = "^\s+(.+?)$" yazan kısmın mesela ne işe yaradığını anlayamadım.

[code=vba]   Dim db As DAO.Database
   Dim rsInput As DAO.Recordset
   Dim rsOutput As DAO.Recordset
   Dim strSQL As String
   Dim strArr() As String
   Dim objReg

Herkese merhabalar,

Konu başlığına yazdığım ifade biraz kafa karıştırıcı gibi görünüyor ama eklediğim örnek veri tabanında ve resimde ne istediğim daha açık olarak görülebilir.

Uzun süredir üzerinde çalıştığım "Site ve Apartman Yönetimi" isimli uygulamamda, resmini eklediğim "Frm_Apt_DaireisYeri_Kayit" formumda "[color=#666666]AltForm_Apt_DaireisYeri_Kayit[/color

[attachment=26228]Merhaba ,
Sürekli formda TEV Durumu alanında "Boş" ifadesi olan satırlardaki Onay Kutusunun mümkünse otomatik olarak işaretli gelmesi, değilse bir buton ile şartı sağlayan satırlardaki kutuların işaretlenmesi.

If Tev_Durumu ="Boş" Then
 
Kutu=1
Else
Kutu=0
End If 
kodunu  Butona uyguladım ama  yalnızca bir satırda işlem yaptırabildim. Şartı sağlayan tüm alanlarda beceremedim. Otomatik olarak hiç yaptıramadım zaten. Örnek dosyam ektedir. Yardımlarınızı rica ediyorum.