Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
12/01/2011 14:25
Konu Sahibi
TUNCAY
Yorumlar
5
Okunma
1731
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

TUNCAY

Üye
Üye
21
4
04/11/2008
0
İstanbul
Ofis 2003
22/09/2011,13:21
Çözüldü 
Merhabalar ;

Ekli listedede belirtilen Dergi formunda Var & Yok Metin kutusunda otomatik tamamlama modülü uygulanmıştır.
Benim içinde çıkamadığım konu;

1 Otomatik tamamlama olayı bir önceki girilen metin ne ise onu aynen yazması benim istediğim metinin sabit değer VAR olması

2 metinin güncelleme sonrasına makro atadım ve makronun koşullu olması koşulunda girilen kaydın en sonuna gelindiğinde makronun çalışmaması.

Bilmem Anlatabildimmi?

Yardımcı olan Yada olmayan herkese Teşekkür Ederim...








Ek Dosyalar
.rar   deneme.rar(Dosya Boyutu: 126,44 KB / İndirme Sayısı: 8)

Kullanici Avatari

C*e*l*o*y*c*e

Celosoft Yazılım
Uzman
ME.... B.....
3.118
29/10/2008
944
Ankara
Yazılım
Ofis 2010 32 Bit
Bugün,13:05
Çözüldü 
ne yapmak istediginizi anlayamadım,biraz daha ayrıntılı açıklayı lütfen



Kullanici Avatari

TUNCAY

Üye
Üye
21
4
04/11/2008
0
İstanbul
Ofis 2003
22/09/2011,13:21
Çözüldü 
1 Otomatik tamamlama olayı bir önceki girilen metin ne ise onu aynen yazması benim istediğim metinin sabit değer VAR olması

modül
Function otomotiktamamla(kutuadi As String)
Dim ctl As Control
Dim LenOldText As Long
Static Once As Boolean
Dim rst As Object
If Once = False Then
If GetAsyncKeyState(vbKeyBack) = 0 _
And GetAsyncKeyState(vbKeyDelete) = 0 Then
Once = True
On Error Resume Next
Set ctl = Screen.ActiveForm.ActiveControl
Set rst = Screen.ActiveForm.RecordsetClone
If ctl.Text <> "" Then
rst.FindFirst kutuadi & " LIKE '" & ctl.Text & "*'"
If Not rst.NoMatch Then
LenOldText = Len(ctl.Text)
ctl.Text = rst(kutuadi)
ctl.SelStart = LenOldText
ctl.SelLength = Len(ctl.Text) - LenOldText
End If
End If
Set ctl = Nothing
Set rst = Nothing
On Error GoTo 0
Once = False
End If
End If
End Function

Bu modülde nerede değişiklik yapılırsa sadece sadce VAR yazılır


2 metinin güncelleme sonrasına makro atadım ve makronun koşullu olması koşulunda girilen kaydın en sonuna gelindiğinde makronun çalışmaması.

koşullu eylem makrosunda kadda git eylemi eğer kaydın ensonunda ise makronun çalışmaması olabilirmi?



Kullanici Avatari

TUNCAY

Üye
Üye
21
4
04/11/2008
0
İstanbul
Ofis 2003
22/09/2011,13:21
Çözüldü 
Konu ile ilgili bir bilgisi olan yokmudur acaba?



Kullanici Avatari

alpeki99

Düşünmek en zor iştir...
Uzman
OL....
6.119
29/10/2008
Bursa
Yazılım Geliştirici
Ofis 2010 32 Bit
17/04/2018,11:04
Çözüldü 
Bence önce Hızlı Cevap Almanın Püf Noktaları konusunu okumalısınız.

Bilgileri teorik olarak değil pratik hayattan örneklendirerek anlatın. Sade, kısa, anlaşılabilir ve anlamlandırılabilir olması hızlı cevap almanızı sağlar.


AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.

Kullanici Avatari

TUNCAY

Üye
Üye
21
4
04/11/2008
0
İstanbul
Ofis 2003
22/09/2011,13:21
Çözüldü 
Sayın Alpeki99 Hocam

Hatırlatmanız için teşekkür ederm.




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Terazi veya Tartı ile accesse anlık ağırlık bilgisi alma hakkında sertac76 2 964 21/03/2016, 15:54 sertac76
Çözüldü Farklı Tablodan Alan Bilgisi Çağırma MEHMET_T 2 576 03/03/2016, 13:42 MEHMET_T
Çözüldü Access Visual Basic Otomatik Kod Tamamlama Alper Mete 2 1.213 30/07/2015, 16:28 Alper Mete
Çözüldü form satırına açıklama bilgisi girmek izmirteacher78 2 581 06/07/2015, 12:35 izmirteacher78
Çözüldü tekrar eden alan bilgisi aliyuzen 6 1.043 30/06/2015, 17:21 atoz112

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.