Forum Discussion

jamesmevans's avatar
jamesmevans
Copper Contributor
Oct 21, 2021
Solved

looking for Excel/VBA macro to use "+" to increase a date in a cell by one day - like in Quicken'

I'm a programming novice.  Have spent a couple of days trying to accomplish this.  Would be extremely handy.

  • jamesmevans 

    Here is an example code with an example file to try out.

     

    Sub dateplusone()
    ActiveCell.Value = ActiveCell.Value + 1
    End Sub

     

     

    I would be happy to know if I could help.

     

    NikolinoDE

    I know I don't know anything (Socrates)

     

    Was the answer useful? Mark them as helpful!

    This will help all forum participants.

3 Replies

  • NikolinoDE's avatar
    NikolinoDE
    Platinum Contributor

    jamesmevans 

    Here is an example code with an example file to try out.

     

    Sub dateplusone()
    ActiveCell.Value = ActiveCell.Value + 1
    End Sub

     

     

    I would be happy to know if I could help.

     

    NikolinoDE

    I know I don't know anything (Socrates)

     

    Was the answer useful? Mark them as helpful!

    This will help all forum participants.

    • jamesmevans's avatar
      jamesmevans
      Copper Contributor

      NikolinoDE 

      Too Simple!  Thanks.  Problem was I was trying to test field type and keystroke: all I had to do was let the macro assign the keystroke with Ctrl+letter.  Also made a similar macro to subtract a day.

      • NikolinoDE's avatar
        NikolinoDE
        Platinum Contributor

        jamesmevans 

        With your permission, if I may recommend that you read this link carefully for your future questions.

        The information in the Link will help you to get a proposal solution quickly and precisely.

         

         Welcome to your Excel discussion space!

        If you are looking to ask a question or start a conversation about Excel, you are in the right place!  Ask away.

         

        Thank you for your understanding and patience

         

        Nikolino

        I know I don't know anything (Socrates)

Resources