tarih problemi

[nuklay2003]

Merhaba arkadaslar,
hazriladigim fatura dosyasinda yer alan tarih hücresine =Bugün() seklinde tarih formati atamistim. günler sonra kaydetmis oldugum faturayi actigim zaman fatura hazirlanan tarih degil, dosyayi actigim tarih görünüyor. formda bu konuda arama yapmama ragmen tam cevabini bulamadim, konuda hakim ardaslarin yardimina ihtiyacim vardir. Simdiden tesekürler

 

[Orion1]

=Bugün() formülü adında anlaşıldığı üzre her zaman günün tarihini gösterir.
Bil amcam bunu böyle düşünmüş.Ne yapalım.!

 

[Necdet]

Merhaba arkadaslar,
hazriladigim fatura dosyasinda yer alan tarih hücresine =Bugün() seklinde tarih formati atamistim. günler sonra kaydetmis oldugum faturayi actigim zaman fatura hazirlanan tarih degil, dosyayi actigim tarih görünüyor. formda bu konuda arama yapmama ragmen tam cevabini bulamadim, konuda hakim ardaslarin yardimina ihtiyacim vardir. Simdiden tesekürler

Bunun çözümü var olmasına var da, hele bir dosyayı görelim ne yapmak istediğinizi anlayalım, çözüm arkasından gelir.

 

[nuklay2003]

fatura dosyasi

 

[Orion1]

Sanırım necdet hocam formüllerin hesaplamısını manuel ile yapmayı kastediyor.
Bu yapılırsa diğer formüllerinizde manuele ayarlancak .Herhangi bir değer girdiğinizde otomatik güncellenmeyecektir.

 

[nuklay2003]

aslinda her defa dosya acildiginda tarih otomatik eklenmesi gerekmektedir, ve gecmiste yapilan faturalari actigimda, faturanin hazirlandigi tarih görüntülenmesi lazim, acaba bu funksiyonel kod ile degil vba kodu ile mi yazilmasi gerek ?

 

[Necdet]

Merhaba,

Yazdırıldığında ya da sizin dediğiniz gibi her açılışta günün tarihi yazdırılabilinir.

Sub yazdir()
If MsgBox("Wollen Sie  Rechnung ausdrucken?", vbYesNo, "DRUCKEN") = vbNo Then Exit Sub
Sheets("Rechnung").PageSetup.PrintArea = "rechnung!b1:i60"
Sheets("Rechnung").[I12] = Date
Sheets("rechnung").PrintOut
End Sub

Yukarıdaki kod yazdırıldığında günün tarihi yazdırılıyor.

Aşağıdaki kod ise Açılışta günün tarihi yazdırılıyor.

Private Sub Workbook_Open()
Sheets("Rechnung").[I12] = Date
End Sub

 

[nuklay2003]

cevabiniz icin tesekürler necdet bey. kodlari yazdim , ancak deneme icin tabii bir ikki gün gecmesi gerek. umarim kesin olacaktir. tekrar bir soru sorabilirmiyim
herayin basinda ben mauell olarak o ayin adini iceren bir klasör hazirliyorum, ve kod kisminda kayit yerini actigim ayin adina degistiriyorum, peki bunu otomatige dünüstürme söz konusu olabilir mi. mesela 1 Kasimda otomatik belirtigim klasörün bir alt kalsör acip faturalari oraya otomatik kaydetme