Written by Allen Wyatt (last updated August 23, 2025)
This tip applies to Excel 2007, 2010, 2013, 2016, 2019, 2021, 2024, and Excel in Microsoft 365
When Dennis is developing a worksheet, he knows he can use the fill handle to drag downward to fill cells with a formula (the formula in the cell that he's dragging down). He wonders, though, if there is a fast way to fill downwards a specific number of cells, such as 50 or 100 cells.
Short of using a macro, there are two very easy ways to accomplish this task. Here is the first approach:
An even quicker way that bypasses the Clipboard is to follow these steps:
If you prefer to go a macro-based route, the following is one approach:
Sub FillRows() Dim Nrows As Variant Nrows = Application.InputBox("Fill how many rows?", Type:=1) If Nrows Then If Nrows < 0 And Abs(Nrows) >= ActiveCell.Row Then Nrows = -ActiveCell.Row + 1 End If ActiveSheet.Range(ActiveCell.Address).AutoFill _ Destination:=Range(Cells(ActiveCell.Row, _ ActiveCell.Column), Cells(ActiveCell.Row + Nrows, _ ActiveCell.Column)), Type:=xlFillDefault End If End Sub
To use the macro, select the cell you want to use in the fill, then run it. You are asked for how many cells you want to fill, and then the macro dutifully fills that many cells down (a positive value) or up (a negative value). If you enter a negative value that is greater than the number of rows above the current cell, then the operation adjusts the number of rows to fill.
The benefit to using a macro-based approach is that you don't have to calculate the range of cells you want to fill. You can simply specify how many, and the macro takes care of the rest. If you assign the macro to a shortcut key, then you can invoke it with a single keystroke.
Note:
ExcelTips is your source for cost-effective Microsoft Excel training. This tip (13514) applies to Microsoft Excel 2007, 2010, 2013, 2016, 2019, 2021, 2024, and Excel in Microsoft 365.
Solve Real Business Problems Master business modeling and analysis techniques with Excel and transform data into bottom-line results. This hands-on, scenario-focused guide shows you how to use the latest Excel tools to integrate data from multiple tables. Check out Microsoft Excel Data Analysis and Business Modeling today!
If you have added subtotals to your worksheet data, you might want to copy those subtotals somewhere else. This is easy ...
Discover MoreWhen entering data in a worksheet, you may only want to add information to the cells in a particular range. You can ...
Discover MoreSometimes you have too much information in a cell and you need to "pare down" what is there to get to the info you really ...
Discover MoreFREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
2025-08-26 04:05:10
Alan
You can also use Go To (F5) and just type the end cell, then hold Shift as you click OK. Then Ctrl+D as above.
2025-08-25 12:03:14
Earlier you provided a solution for formatting Canadian postal codes, that requires an additional column. Is there any way to create and store a special format formula for them, so that i don't have to have that extra column?
2025-08-24 12:15:22
J. Woolley
The following statement in the Tip's macro
ActiveSheet.Range(ActiveCell.Address).AutoFill _
Destination:=Range(Cells(ActiveCell.Row, _
ActiveCell.Column), Cells(ActiveCell.Row + Nrows, _
ActiveCell.Column)), Type:=xlFillDefault
can be simplified by replacing it with this statement
ActiveCell.AutoFill _
Destination:=Range(ActiveCell, ActiveCell.Offset(Nrows)), _
Type:=xlFillDefault
for the same result.
Got a version of Excel that uses the ribbon interface (Excel 2007 or later)? This site is for you! If you use an earlier version of Excel, visit our ExcelTips site focusing on the menu interface.
FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2025 Sharon Parq Associates, Inc.
Comments