Bugün formülü : bu formülde dosyayı yarın açtığımda yarınki tarih olmasın istiyorum nasıl yapabilirim ?

[aydgur]

 

[AdemCan]

Yarın dosyayı açtığınız zaman 29.05.2024 olarak tarih değişir.

BUGÜN işlevi - Microsoft Desteği

Sözdizimi: BUGÜN()

support.microsoft.com

Tarihin değişmemesi için Makro ile yapmanız gerekir. Forumda örnekleri mevcut.
Örnek olarak;

Otamatik tarih atma

a stunundaki formül b stununa veri girildikce a stununa bu günün tarihini yazıyor. Ama yarın formül yarının tarihini atıyor.Her gün tarih değişiyor. =EĞER(B3="";"";BUGÜN()) Bu formülü nasıl düzenlemeliyiz ki B stununu yazdığımız gün bu günün tarihini atsın ama yarın veya daha sonra tarih...

excel.web.tr

Soru - Makro ile Sabitlenen Otomatik Tarih yazdırma

Herkese günaydın, Örnek VBA ile çalıştıramadım. Makroyu da çok bilmiyorum. Örnekleri İnceledim, bir şeyler yapmaya çalıştım. Ama çalışmadı. Ekteki dosya için yardımlarınızı rica ediyorum. Yapmak istediğim şey; H ve J sütununa herhangi bir kişiyi seçtiğimde I ve K sütununa o günün tarihi otomatik...

excel.web.tr

İstenen Koşul Sağlandığında Tarih Yazılması

Merhabalar; Excelde ulaşmak istediğim sonuç için hem forumda hem diğer platformlarda gezdim araştırdım ama formülle yapılabilecek bir işlem bulamadım. Sanırım formülle çözümü yok. Kısaca derdimi anlatmam gerekirse; Örneğin ; A1 hücresindeki değer %100'e ulaşınca B1 hücresinde %100'e ulaştığı...

excel.web.tr

 

[muhasebeciyiz]

Excel'de sadece formül kullanarak günü sabitlemek mümkün değildir çünkü formüller dinamik olarak çalışır ve hücredeki tarih her gün güncellenir. Ancak, bazı manuel veya programatik yöntemlerle günü sabitlemek mümkündür

Hücreye =METNEÇEVİR(BUGÜN();"g.A.yyyy") formülünü girin

Ctrl+c tuşu ile kopyalayıp aynı hücreye sağ tıklayın buradan özel yapıştır sonrasındada değerleri seçerek işlemi tamamlayın

Bu adımlar, hücredeki formülü kaldırarak yerine statik bir tarih koyacaktır.

veya

Ctrl+Shift+Noktalı virgül( ; ) tuşlarına basarak seçili hücreye tarih yazdırırsınız.

Aşağıdaki kodu modüle yapıştırın:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim cell As Range
    For Each cell In Target
        If cell.Value = "bugün" Then
            cell.Value = Format(Date, "d.m.yyyy")
        End If
    Next cell
End Sub

VBA düzenleyicisini kapatın ve Excel'e geri dönün.
Bu kod, aktif sayfada herhangi bir hücreye "bugün" yazıldığında, hücreye bugünün tarihini statik olarak ekleyecektir.

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim cell As Range
    Dim watchCell As Range
    Set watchCell = Me.Range("I14")
   
    If Not Application.Intersect(Target, watchCell) Is Nothing Then
        For Each cell In Target
            If cell.Value > 0 And IsEmpty(cell.Offset(0, 1).Value) Then
                cell.Offset(0, 1).Value = Date
            End If
        Next cell
    End If
End Sub

Bu kod, I14 hücresinde bir değer olduğunda (sıfırdan büyük olduğunda) yanındaki hücreye (aynı satırda bir sütun sağa) bugünün tarihini statik olarak ekler.Bu yöntemle, hücreye girilen tarih statik kalır ve ertesi gün değişmez. Bu, EĞER(I14>0;BUGÜN();"") formülüne benzer bir işlevsellik sağlar ancak tarih statik olur.

 

[aydgur]

Hepinize çok ama çok teşekkür ederim