+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Subscript Out Of Range Hatası (/konu-subscript-out-of-range-hatasi.html)
Subscript Out Of Range Hatası - mazhartaktak - 11/10/2010
Arkadaşlar AÇILAN KUTU ekledim çalışırken birden bu hatayı vermeye başladı. Aslında hiç bir şey yapmadım. Nasıl oldu bende anlamadım. Eğer yardım ederseniz çok sevinirim.
Yazdığım Programı aşağıya ekledim. İlginize Şimdiden teşekkürler. İyi çalışmalar...
Cvp: Subscript Out Of Range Hatası - ozanakkaya - 11/10/2010
Açılan kutunun "satır kaynak türü"nü "Tablo/Sorgu" olarak değiştirdim.
Açılan kutunun denetim kaynağını sildim.
Güncellenme sonrasında olayına aşağıdaki kodu ekledim.
Private Sub Açılan_Kutu68_AfterUpdate()
' Denetime uyan kaydı bul.
Dim rs As Object
Set rs = Me.Recordset.Clone
rs.FindFirst "[TC KİMLİK NO] = '" & Me![Açılan Kutu68] & "'"
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
sorgudadaki Adı soyadı alanını 2. satıra alıp açılan kutunun sütun sayısını 2 yapıp sütun genişliklerini 0cm;2,542cm olarak değiştirdim.
Doğru açılan kutudan bahsediyorsak şu anda sorunsuz çalışıyor.
Ayrıca konu başlığınızdaki "Acil Yardım" ibaresi silinmiştir.
Cvp: Subscript Out Of Range Hatası - mazhartaktak - 11/10/2010
sledgeab
Arkadaşım, Teşekkür ederim. Doğru AÇILAN KUTU'dan bahsediyoruz..
Eline sağlık, İyi akşamlar..