VBA inputbox Greater Than or Equal to for Date, UTC Date Time Now Format

[vbanewbie68]

Hello

Please see my screenshots below.

I enter a date, using this greater than or equal to this 2021-12-07T14:03:36 UTC. I get blank cells.

I am not sure what went wrong with the codes?

The data can be either big or small. I get it weekly data.

Hope the everything makes sense?

Thank you

Regards

Vbanewbie68

 

[Dan_W]

You'll need to adjust the code a bit, I think - namely, the range of the cells that you want to convert into dates (currently it's looking at cells G2:G10). You should also play with the date pattern until you get it working just the way you want it to.

Assuming that the cell to be processed contains data like 2022-04-04T10:10:10 UTC - it should retain the time data as well. If you want to change the formatting in the actual cells, you should do that by adjusting the custom formatting options (press ctrl 1).

Hope that helps.

 

[vbanewbie68]

This might help you process the data into dates before filtering it:

Sub ProcessCells()
   
    Const DATEPATTERN = "dd/mm/yyyy"
    Const TARGETRANGE = "G2:G10"
   
    Dim CurrentCell     As Range
    Dim CurrentDate     As String
    Dim FormattedDate   As Date
    Dim TempDate        As Variant
       
    For Each CurrentCell In Range(TARGETRANGE)
        CurrentDate = VBA.Replace(CurrentCell.Value, "UTC", "")
        TempDate = Split(Application.Trim(CurrentDate), "T")
        FormattedDate = CDate(Format(TempDate(0), DATEPATTERN)) + CDate(TempDate(1))
        CurrentCell.Value = FormattedDate
    Next
   
End Sub

Not sure what went wrong as below.

 

[vbanewbie68]

I got it working now even though I change this DATEPATTERN= "MM/DD/YYYY and that works with this date 07/12/2021

Also how to add code as I get a large data and sometime small data. How do I add Range.End Xldown code?

There is a bug I can't move it to a new workbook. What went wrong with my code? Should it be in public?

 

[vbanewbie68]

Hi
Thank you for your help and your time writing codes to solve my issue, I really appreciate it. I have managed to figure out the other issue I mentioned earlier.
Again thank you!
Best regards
V

 

[Dan_W]

Sorry, I meant to respond, but i was busy yesterday. I suspect the problem was that you hadn't defined the final workbook and worksheet variables, is that right?

 

[vbanewbie68]

Move it into a new Workbook is no problem. Just an issue with end. Xldown codes that I am struggling with because data can be large or small.