Ctrl + Down arrow, jump to end Macro

[dw_22801]

So what I am trying to do is jump to the bottom of a table, then go down two cells and enter SUBTOTAL for all values above. I noticed when I just Ctrl down arrow, then press down twice, the code that comes up looks like it does jump to the bottom, but when I press the down arrow twice, it then specifically chooses that cell as the starting point. Since each day the row number that this table goes down to changes, it needs to not choose the specific cell that I down arrow to, but just jump down to the bottom of the data, then select whatever cell is two below that. Does this make sense?

Thanks!

[cytop]

Use End-Down Arrow, s long as there's no blank cells before the end of the data.

[TMS]

If it's a Structured Table, why don't you just swith on the Total row?

[TMS]

You could do something like this:

Please Login or Register  to view this content.

[JOHN H. DAVIS]

Does something like this help?

Please Login or Register  to view this content.

[dw_22801]

You could do something like this:

Please Login or Register  to view this content.

This works, however, it adds the subtotal formula to the 4 cells to the right of the needed one also, so D461 is where it needs to be, so I changed the A's to D Does that have something to do with the Resize(, 5) ?

Dim lLR As Long
lLR = Range("A" & Rows.Count).End(xlUp).Row

Range("D" & lLR + 2).Resize(, 5).Formula = _
"=SUBTOTAL(9,D2:D" & lLR & ")"

[TMS]

Given that there is no sample workbook, or data, or any indication of where the subtotal(s) needed to go, I had to make some guesses. I guessed at subtotals under all columns, starting in column A.

If you only need one column, just remove the resize.

Please Login or Register  to view this content.

Or, if it is a Structured Table, you could use Table References, for example:

Please Login or Register  to view this content.

where [d] is the column header in column D

[dw_22801]

Thats what I figured. Thanks so much! Also, how do I add code in the nice format in the posts?

[TMS]

You're welcome.


Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Click on Edit to open your thread, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here



If you are satisfied with the solution(s) provided, please mark your thread as Solved.


New quick method:
Select Thread Tools-> Mark thread as Solved. To undo, select Thread Tools-> Mark thread as Unsolved.

Or you can use this way:

How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save


You may also want to consider thanking those people who helped you by clicking on the little star at the bottom left of their reply to your question.