Page 2 of 2 FirstFirst 12
Results 11 to 16 of 16

Thread: VBA Code to drop values in cells at the same time
Thanks Thanks: 0 Likes Likes: 0

  1. #11
    Board Regular
    Join Date
    Apr 2013
    Location
    UK
    Posts
    219
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default Re: VBA Code to drop values in cells at the same time

    Hello Fluff
    you asked me to let you know how I got on, well for some strange reason, I could not get the code to drop the values from either the calendar or TextBox,s into the cell range on my spread sheet. Is it me?..

  2. #12
    MrExcel MVP
    Moderator
    Fluff's Avatar
    Join Date
    Jun 2014
    Location
    Chippenham
    Posts
    28,234
    Post Thanks / Like
    Mentioned
    471 Post(s)
    Tagged
    47 Thread(s)

    Default Re: VBA Code to drop values in cells at the same time

    Does AO7 have anything in it? If so do you have values below that with no blanks anywhere in that column?
    Last edited by Fluff; Sep 12th, 2019 at 12:06 PM.
    - Posting Data try one of these tools
    - Posting guidelines, forum rules and terms of use
    - Read the FAQs

    Running Office 365 on Win 10

  3. #13
    Board Regular
    Join Date
    Apr 2013
    Location
    UK
    Posts
    219
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default Re: VBA Code to drop values in cells at the same time

    AO7 has nothing in it, AO6, AP6 & AQ6 all have text sub headings in, below this is completely clear

  4. #14
    MrExcel MVP
    Moderator
    Fluff's Avatar
    Join Date
    Jun 2014
    Location
    Chippenham
    Posts
    28,234
    Post Thanks / Like
    Mentioned
    471 Post(s)
    Tagged
    47 Thread(s)

    Default Re: VBA Code to drop values in cells at the same time

    In that case check the very last row of your sheet, you should find the values there.
    Once you delete those rows try
    Code:
    Private Sub CommandButton1_Click()
       Application.ScreenUpdating = False
       ActiveWorkbook.Sheets("OUT").Activate
       Range("AC5").Value = 1
       Range("AO" & Rows.Count).End(xlUp).Offset(1).Resize(, 3).Value = Array(Calendar1.Value, TextBox1.Value, TextBox2.Value)
       Range("AC5").Value = 0
       Range("AB4").Select
       Application.ScreenUpdating = True
    End Sub
    - Posting Data try one of these tools
    - Posting guidelines, forum rules and terms of use
    - Read the FAQs

    Running Office 365 on Win 10

  5. #15
    Board Regular
    Join Date
    Apr 2013
    Location
    UK
    Posts
    219
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default Re: VBA Code to drop values in cells at the same time

    Quote Originally Posted by Fluff View Post
    In that case check the very last row of your sheet, you should find the values there.
    Once you delete those rows try
    Code:
    Private Sub CommandButton1_Click()
       Application.ScreenUpdating = False
       ActiveWorkbook.Sheets("OUT").Activate
       Range("AC5").Value = 1
       Range("AO" & Rows.Count).End(xlUp).Offset(1).Resize(, 3).Value = Array(Calendar1.Value, TextBox1.Value, TextBox2.Value)
       Range("AC5").Value = 0
       Range("AB4").Select
       Application.ScreenUpdating = True
    End Sub
    Thank you Fluff , will give it a go tomorrow

  6. #16
    MrExcel MVP
    Moderator
    Fluff's Avatar
    Join Date
    Jun 2014
    Location
    Chippenham
    Posts
    28,234
    Post Thanks / Like
    Mentioned
    471 Post(s)
    Tagged
    47 Thread(s)

    Default Re: VBA Code to drop values in cells at the same time

    Ok
    - Posting Data try one of these tools
    - Posting guidelines, forum rules and terms of use
    - Read the FAQs

    Running Office 365 on Win 10

Some videos you may like

User Tag List

Tags for this Thread

Like this thread? Share it with others

Like this thread? Share it with others

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •