Forum home » Delegate support and help forum » Microsoft Excel VBA Training and help » Fill Blank rows with data in cell above
|
|
|
The UK's most regular Training information: |
|
Welcome. Please choose your application (eg. Excel) and then post your question. Our Microsoft Qualified trainers will then respond within 24 hours (working days). Frequently Asked Questions
Any suggestions, questions or comments? Please post in the Improve the forum thread. |
Fill Blank rows with data in cell above
Resolved · Low Priority · Version 2003
Reply Thu 23 Oct 2008, 16:31Delegate Edd said...
Edd has attended:
Excel VBA Intro Intermediate course
Fill Blank rows with data in cell above
I am trying to fill blank rows with data from the row above. I would like to avoid a loop mechanism as this will take some time to run.
Whenever I attempt to use Go To > Blanks and use RC -1 formulae excel informs me that the selection is too large.
Is there any way around this?
For upcoming training course dates see: Pricing & availability
RE: Fill Blank rows with data in cell above
Hi Edd,
Thanks for your question. If you are trying to copy the entire row from above, i.e the shortcut CTRL + D, then try the following:
==================================
Sub CopyRowAbove()
Dim Row As Byte
Row = ActiveCell.Row
Rows(Row & ":" & Row).copy
ActiveCell.Offset(1, 0).Select
ActiveSheet.Paste
End Sub
==================================
See if this helps.
Kind regards,
Katie Woo
Microsoft Certified Trainer
|