- Katılım
- 1 Mart 2005
- Mesajlar
- 22,248
- Excel Vers. ve Dili
-
Win7 Home Basic TR 64 Bit
Ofis-2010-TR 32 Bit
Merhabalar.
Aşağıdaki kodlar ile yaklaşık 36000 satırlı kayıtlı veriyi değiştiriyorum.KS6.Update
satırında aşağıdaki hatayı alıyorum.
Dosya paylaşım kilidi sayısı aşıldı.MaxLocksPerFile Kayıt defteri girdisini arttırın.
Sayın üstadlarımın ve arkadaşlarımın bu konuda önerisini bekliyorum.
Aşağıdaki kodlar ile yaklaşık 36000 satırlı kayıtlı veriyi değiştiriyorum.KS6.Update
satırında aşağıdaki hatayı alıyorum.
Dosya paylaşım kilidi sayısı aşıldı.MaxLocksPerFile Kayıt defteri girdisini arttırın.
Sayın üstadlarımın ve arkadaşlarımın bu konuda önerisini bekliyorum.
Kod:
If KS6.RecordCount > 0 Then
KS6.MoveFirst
Do While Not KS6.EOF
KS6("Blok") = ComboBox1.Value
KS6("Daire") = TextBox1.Value
KS6("Isim") = TextBox2.Value
KS6.Update
KS6.MoveNext
Loop
End If