Thanks Thanks:  0
Likes Likes:  0
Page 2 of 2 FirstFirst 12
Results 11 to 13 of 13

Thread: Need to insert rows with formulas

  1. #11
    Board Regular
    Join Date
    Jun 2017
    Location
    Nth Vic, Australia
    Posts
    411
    Post Thanks / Like
    Mentioned
    4 Post(s)
    Tagged
    3 Thread(s)

    Default Re: Need to insert rows with formulas

    Quote Originally Posted by jolivanes View Post
    You should have mentioned all of this in your first post so people don't waste time on code that is not what is required.
    Read your last post again and see if there is anything in it that should be explained. Hint" "I got one column that got manual input"
    I don't really think this is Sachi's fault, we naturally assumed that each cell in the A:Q range held formulae.
    I think from his comment:
    this template got columns from A to Q and need to copy down all these formulas
    that he assumed that we provide code for only those cells with formulae.
    You may see and know but until you tell me exactly I am blind; I cannot read your mind.

  2. #12
    Board Regular
    Join Date
    Sep 2004
    Posts
    1,040
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default Re: Need to insert rows with formulas

    Code:
    Sub From_Last_Used_Row_B()
    Dim lr As Long, a As Long, b As String
    lr = Cells(Rows.Count, 1).End(xlUp).Row
    
    a = InputBox("How many extra rows do you want filled?", "Rows to fill with formulae")
    b = InputBox("Which Column is to be excluded?", "Enter a alphabetical Column letter")
    b = Range(UCase(b) & 1).Column
    
    With Range(Cells(lr, 1), Cells(lr, b - 1))
        .AutoFill Destination:=.Resize(a + 1), Type:=xlFillCopy
    With Range(Cells(lr, b + 1), Cells(lr, 17))
        .AutoFill Destination:=.Resize(a + 1), Type:=xlFillCopy
    End With
    End With
    End Sub
    There are people who work a lot and make many mistakes. There are people who work a little and make few mistakes. I know people who don't make any mistakes.

  3. #13
    Board Regular
    Join Date
    Sep 2004
    Posts
    1,040
    Post Thanks / Like
    Mentioned
    0 Post(s)
    Tagged
    0 Thread(s)

    Default Re: Need to insert rows with formulas

    Did any of the suggestions work for you?
    There are people who work a lot and make many mistakes. There are people who work a little and make few mistakes. I know people who don't make any mistakes.

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
  •  


DMCA.com