Timespan Starting With Active Cell Value Using Input Box Value

[Rick Rothstein]

Thank you for the direction and solution. I did several tests with the adjusted code and it worked like the original. Thank you

Just to follow up...

Admin's solution does not actually work like you intended your original code to... in your original code, you were able to select the cell that contained the date if your active cell was not the correct one, Admin's solution would have you typing the date in under that circumstance. The following method would default the InputBox to the active cell's address, but would allow you to select a different cell if the active cell was not on the correct date to begin with (no typing required)...

Set Cel = Application.InputBox(Prompt, Title, ActiveCell.Address, , , , , 8)


https://www.youtube.com/channel/UCnxwq2aGJRbjOo_MO54oaHA