Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
02/03/2012 01:28
Konu Sahibi
Ziya Guven
Yorumlar
4
Okunma
1287
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

Ziya Guven

Üye
 57
 5
 20
 27/01/2012
10
 Ordu
 
 Ofis 2003
 13/11/2012,12:09
Çözüldü 
alt formda LineNumber kodu arıza yapınca aşağıdaki kodu yazdım yine hata veriyor sizde hata veriyormu bana yazarmısınız.
bir örnek yolluyorum
düzgün çalışırsa kullanırız


Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Option Compare Database
'Bu Haliyle Çalışıyor Ama Form Yüklenince Otomatik vermesini isteyince yeni kayda gidiyor ve hata veriyor
Private Sub Komut65_Click()
 Dim i As Long
 If Status <> acDeleteOK Then Exit Sub

 With Me.Recordset
 .MoveLast
 For i = .RecordCount To 1 Step -1
 .Edit
'AltFormda SıraNo Metin Kutusu Tablodan kayıt kaynağı var
 Me.SıraNo = i
 .Update
 .MovePrevious
 Next
 End With
End Sub[vb]

Ek Dosyalar
LineNum.rar(20.34 KB)



Kullanici Avatari

alpeki99

Uzman
Ol....
 38
 162
 6.134
 29/10/2008
 Bursa
 Yazılım Geliştirici
 Ofis 2010 32 Bit
 07/01/2019,22:57
Çözüldü 
Bende bir problem olmadı.

Win 7 32 Bit Ultimate Türkçe
Office 2010 32 Bit İngilizce


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

Ziya Guven

Üye
 57
 5
 20
 27/01/2012
10
 Ordu
 
 Ofis 2003
 13/11/2012,12:09
Çözüldü 
teşekkürler hocam bu kodun geliştirilmesi lazım galiba

alttaki kodu ekleyince hata oluyormu birde öyle baksanız
komut düğmesine koyunca benimkide çalışıyor ama bu kod hata veriyor

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Form_Current()
Dim i As Long
 If Status <> acDeleteOK Then Exit Sub

 With Me.Recordset
 .MoveLast
 For i = .RecordCount To 1 Step -1
 .Edit
'AltFormda SıraNo Metin Kutusu Tablodan kayıt kaynağı var
 Me.SıraNo = i
 .Update
 .MovePrevious
 Next
 End With
End Sub



Kullanici Avatari

ozanakkaya

Kurucu
Oz.... Ak....
 39
 477
 11.738
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Dün,20:46
Çözüldü 
Kodu Formun geçerli olduğunda olayına ekledim, hata veriyor mu deneyiniz.

Ek Dosyalar
LineNum_sled.rar(17.14 KB)


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

Kullanici Avatari

Ziya Guven

Üye
 57
 5
 20
 27/01/2012
10
 Ordu
 
 Ofis 2003
 13/11/2012,12:09
Çözüldü 
teşekkür ederim
iş yerindeyim kod gayet güzel çalışıyor ama evde aynı kod hata veriyor
sistemde bir gariplik var ofisi yeniden yükledim yine düzelmedi.
çocuklar ağ üzerinden çalışan oyun kurunca oldu kodun içindeki loop komutu sanki çalışmaya devam ediyor boş kayda gelince hata veriyor. windowsun ayarlarıyla ilgili birşey sanırım




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Kullanıcı Giriş Kontrol Kodu untouchable 4 147 30/11/2018, 14:48
Son Yorum: haliliyas
Çözüldü Raporu Önizleme İçin Yazılacak Vba Kodu Nedir. Oğuz Türkyılmaz 2 98 15/11/2018, 17:15
Son Yorum: Oğuz Türkyılmaz
Çözüldü Vba Kodu Yazarken Ctrl+aratuşu İle Açılan Açılan Kutu Menüsünde Hata. Oğuz Türkyılmaz 5 106 15/11/2018, 17:08
Son Yorum: Oğuz Türkyılmaz
Çözüldü Açık Pdf Dosyasını Kapatma Vba Kodu ssdestek 3 125 15/11/2018, 15:58
Son Yorum: ssdestek
Çözüldü Vba Kodu Yada Makro olcay.akkaya 2 157 15/10/2018, 11:57
Son Yorum: olcay.akkaya

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