Otomatik veri kaydı.

[mktekniker]

Merhabalar
xml (vers1) tabanındaki verileri excel de ara sıra manuel olarak kayıt ediyorum.
Bunu otomatik 1 dk ara ile nasıl gerçekleştire bilirim?
Dosya kapalı durumda da kayıt eklemeye devam edecek.
Yardımcı olabilirseniz sevinirim.

 

[Murat OSMA]

Dosyalarınızı eklerseniz bakalım.

 

[mktekniker]

Dosyalarınızı eklerseniz bakalım.

Dosyamız ektedir.

 

[Murat OSMA]

İlk mesajınızı biraz detaylandırabilir misiniz ?

 

[Sarigol_937]

şu linki incelermisin ben bi örnek yapmıştım http://www.excel.web.tr/f48/excelde...det-yapmak-steyenler-ozum-buldum-t137264.html otomatik veri kaydı

 

[mktekniker]

şu linki incelermisin ben bi örnek yapmıştım http://www.excel.web.tr/f48/excelde...det-yapmak-steyenler-ozum-buldum-t137264.html otomatik veri kaydı

İlginize teşekkür ederim
ama istediğim bu değil

http://212.175.34.150:8086/connectioncounts adresinden anlık bağlantı bilgilerini kontrol ediyorum ve yukarıda ekte verdiğim dosyaya ara sıra veri/ bağlantı ile kayıt ediyorum.

bu işlemi ben müdahale etmeden dosya kendisi yapsın.
dosya kapalı iken de buna devam etsin.

Yani bir nevi 1 dk ara ile log tutsun istiyorum.

diğer bir sorun ise sondaki tarih sütununda ilave etmiş olduğu "şimdi()" o andaki tarih ve saat bilgisini bir daha değiştirmesin.

Şimdiden teşekkürler

 

[mktekniker]

İlk mesajınızı biraz detaylandırabilir misiniz ?

http://212.175.34.150:8086/connectioncounts adresinden anlık bağlantı bilgilerini kontrol ediyorum ve yukarıda ekte verdiğim dosyaya ara sıra veri/ bağlantı ile kayıt ediyorum.

bu işlemi ben müdahale etmeden dosya kendisi yapsın.
dosya kapalı iken de buna devam etsin.

Yani bir nevi 1 dk ara ile log tutsun istiyorum.

diğer bir sorun ise sondaki tarih sütununda ilave etmiş olduğu "şimdi()" o andaki tarih ve saat bilgisini bir daha değiştirmesin.

Şimdiden teşekkürler

 

[mktekniker]

Yok mu bu konuda yardımcı olabilecek bir arkadaş?

 

[lider22]

Eğer A1 hücresinde bir değişiklik olursa aşağıdaki makro sayfayı otomatik olarak kaydeder.
Siz değişikliği nerede yapıyorsanız, A1 yazan yeri o hücre ile değiştirin.

Private Sub Worksheet_Change(ByVal Target As Range)

If Intersect(Target, [A1]) Is Nothing Then Exit Sub
ThisWorkbook.Save

End Sub

 

[mktekniker]

Eğer A1 hücresinde bir değişiklik olursa aşağıdaki makro sayfayı otomatik olarak kaydeder.
Siz değişikliği nerede yapıyorsanız, A1 yazan yeri o hücre ile değiştirin.

Private Sub Worksheet_Change(ByVal Target As Range)

If Intersect(Target, [A1]) Is Nothing Then Exit Sub
ThisWorkbook.Save

End Sub

Teşekkürler Lider22
Fakat yeni kayıtlar dosya da listenin sonuna kayıt edilir.
Eğer tarih sutunu için önerdiyseniz, kayıt edilen zamanı o sutundaki son kayıt hücresine kayıt edecek, dosya da herhangi bir değişiklikte bahsedilen zaman ("ŞİMDİ()") yenilenmeyecek

 

[lider22]

O zaman kodunuzu hangi sütunda değişiklik oluyorsa aşağıdaki gibi değiştirebilirsiniz.

Private Sub worksheet_change(ByVal target As Range)

If Intersect([A:A], target) Is Nothing Then Exit Sub
ThisWorkbook.Save

End Sub