Stactic Time Stamp based on Formula being True

chells_free

New Member
Joined
Mar 17, 2022
Messages
4
Office Version
  1. 365
  2. 2021
  3. 2019
  4. 2016
Platform
  1. Windows
I am trying to have my excel give back a timestamp that will not update once a formula is deamed true for the first time.

The formula is based on cells in the column and if the number is greater than or equal to 46, the if statement returns "X" in column V, if not it remains blank. Once the formula returns an "X" I need a the respective cell in column "W" to give me a date that wont change if the next time I open the workbook and with the new data being entered into the same data range is less than 46 and therfore returning a blank in column V.

This workbook is an on going and used once a week. The goal is to track each time the amount is over 46 without having to manually enter the dates.

Please help as soon as possible. I'm needing this active by this saturday.
 

Attachments

  • Screenshot 2022-03-17 113222.png
    Screenshot 2022-03-17 113222.png
    26 KB · Views: 14

Excel Facts

Excel Can Read to You
Customize Quick Access Toolbar. From All Commands, add Speak Cells or Speak Cells on Enter to QAT. Select cells. Press Speak Cells.
This for sure would be the quickest way to do it before saturday: LINK
 
Upvote 0
This for sure would be the quickest way to do it before saturday: LINK
Thank you for sending me that link. I have tried using those funtions, although week-to-week I need the date to stay even though the data changes. Using the static control keys become combersome when, multiple people enter the data.

I was hoping to set a vba to have everything set.
 
Upvote 0
Have a try with this macro to be pasted in a standard module and launched when needed. Since no dummy data is available, I guessed; eventually you can adapt it to your needs.
VBA Code:
Option Explicit
Sub Check_FH()
    Dim cell   As Range
    Dim cRow   As Long
    For Each cell In Range("N3:N9")               '<- adjust range as needed
        cRow = cell.Row
        If cell.Value >= 46 Then
            Cells(cRow, "V") = "X"
            Cells(cRow, "W") = Date               'insert date
        Else
            Cells(cRow, "V") = ""
            If Not Cells(cRow, "W") = "" Then Cells(cRow, "W") = Date 'update date
        End If
    Next cell
    MsgBox "Done!"
End Sub
 
Upvote 0

Forum statistics

Threads
1,214,879
Messages
6,122,065
Members
449,064
Latest member
scottdog129

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top