if value exists

[ashleykelley]

Have a lot of data organized on worksheet "closed cases". Need the worksheet to be organized by day. Currently am calling the following macro from another macro and then using a delete duplicate rows to get the duplicate dates out but I know there's an easier way to do it code wise. Have over 6000 rows so the duplicate one is not ideal.

I want the macro to check column B for today's date and if it exists, do nothing, if it does not exist, put today's date under the last row of data.

Here's what I currently have. I put the paste special in there so that the date doesn't change. I'm not very good at if then statements yet

Please Login or Register  to view this content.

[mudraker]

here is one way

I have replaced the

Please Login or Register  to view this content.

Please note that you should avoid using macro & variables names that match commands used by Excel & VBA. e.g. Today, Rows, Sheets etc
Using such names can cause unexpected results

For Your Info
Most times you do not need to select sheets, cells etc to work with them
Macros actually run faster & can be easier on the eyses if you do not select or activate sheets etc

The code you posted could be replaced by a single line command

Please Login or Register  to view this content.

[ashleykelley]

thank you