• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Excel Bugün Tarih Fonksiyonu Sabitleme

Katılım
29 Aralık 2004
Mesajlar
2
Merhaba excel'e =bugün() formül yazdığımda ertesi gün tarih değişiyor
tarihin sabitlenmesi için ne yapabilirim.
 
hücreye doğrudan tarihi yazın 11/03/2011 gibi.
 
=bugün() - kopyala - özel yapıştır - değerleri
 
cevap veren iki arkadaşa da teşekkür ederim
nasıl düşünemedim
iki farklı çözümü varmış müthiş
 
Selamlar,

Excelde otomatik olarak hücreye günün tarihini ve o anki saati yazmak için aşağıdaki kısayolları kullanabilirsiniz.

Tarih için; CTRL+SHIFT+;
Saat için; CTRL+SHIFT+:
 
arkadaşlar bu problem ile ilgili bir çözümü olan varmı..
tarihi formül olarak bir hücreye aktardığımız için BUGÜN formülü ertesi gün o günün tarihini alıyor.. bunun fonksiyon ile çözümü mümkün mü acaba.. saygılar..
 
arkadaşlar bu problem ile ilgili bir çözümü olan varmı..
tarihi formül olarak bir hücreye aktardığımız için BUGÜN formülü ertesi gün o günün tarihini alıyor.. bunun fonksiyon ile çözümü mümkün mü acaba.. saygılar..

fonksiyon devamlı hesap yaptığı için bunun olanağı yoktur. kod ile çözebilirsiniz.
ilgili sayfanın kod bölümüne kopyalayınız
Kod:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("A1:A10")) Is Nothing Then Exit Sub
Target.Offset(0, 1) = Format(Now, "dd.mm.yyyy")
End Sub
bu kod A1:A10 aralığında veri girdiğinizde karşısındaki B sütununa tarih yazar
 
ihsan bey teşekkür ediyorum yardımınız için.. benim kulladığım sayfada D sutununa veri girildiğinde a hücresine sayı b hücresine tarih yazıyor.. verdiğiniz kodu buna göre düzenleyebilir misiniz.. dosyayı ekliyorum.. çok teşekkür ediyorum yardımlarınız için
 

Ekli dosyalar

ihsan bey teşekkür ediyorum yardımınız için.. benim kulladığım sayfada D sutununa veri girildiğinde a hücresine sayı b hücresine tarih yazıyor.. verdiğiniz kodu buna göre düzenleyebilir misiniz.. dosyayı ekliyorum.. çok teşekkür ediyorum yardımlarınız için

merhaba
Gelen Evrak Sayfasının Kod bölümüne
Kod:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim ts
If Intersect(Target, Range("D6:D65536")) Is Nothing Then Exit Sub
Target.Offset(0, -2) = Format(Now, "dd.mm.yyyy")
ts = Range("D65536").End(xlUp).Row
Range("A6") = 1
Range("A6:A" & ts).DataSeries rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, step:=1, Trend:=True
End Sub
bı kodu kopyalayın ve deneyin.
D Sütununda işlem yaptığınızda otomatik sıra no ve tarih atar
eki inceleyiniz
 

Ekli dosyalar

İhsan Bey yardımlarınız için çok teşekkür ediyorum.. Sağolun..
 
Merhaba ihsan bey bir yardıma ihtiyacım var.. gelen evrakda bir hata oluştu.

Range("A6:A" & ts).DataSeries rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, step:=1, Trend:=True satırını sarı olarak gösteriyor ve sayı fonksiyonu çalışmıyor.
yardımcı olabilirseniz çok sevinirim

saygılar, selamlar
 
Merhaba ihsan bey bir yardıma ihtiyacım var.. gelen evrakda bir hata oluştu.

Range("A6:A" & ts).DataSeries rowcol:=xlColumns, Type:=xlLinear, Date:=xlDay, step:=1, Trend:=True satırını sarı olarak gösteriyor ve sayı fonksiyonu çalışmıyor.
yardımcı olabilirseniz çok sevinirim

saygılar, selamlar

Dosya ekleyin lütfen hatırlayamadım. Hatalı çalıştığı şekli dosya içinde açıklayın. Hangi işlemi yaptığınızda hata alıyorsunuz.
 
teşekkür ediyorum öncelikle cevabınız için..

normalde Evrak türünü seçtiğimde sayı ve tarihi otamatik olarak atıyordu.. ancak bugün ne olduysa sürekli belirttiğim satıra yönlendiriyor ve hata diyor.

yardımınız için şimdiden teşekkürlerl..
 

Ekli dosyalar

teşekkür ediyorum öncelikle cevabınız için..

normalde Evrak türünü seçtiğimde sayı ve tarihi otamatik olarak atıyordu.. ancak bugün ne olduysa sürekli belirttiğim satıra yönlendiriyor ve hata diyor.

yardımınız için şimdiden teşekkürlerl..

Merhaba
Hata verme sebebi E sütununda Filtre mevcut filtreyi kaldırıp dener misiniz_?
 
çok teşekkür ediyorum İhsan Bey, dediğiniz gibi düzenlemeyi yaptım sorun ortadan kalktı.. çok teşekkürler ediyorum tekrar
saygılar, selamlar
 
çizgiler hk. Yardım

,,,,,,,,,,,,,,,,,
 
Geri
Üst