Fills right from the leftmost cell or cells in the specified range. The contents and formatting of the cell or cells in the leftmost column of a range are copied into the rest of the columns in the range.
expression.FillRight
expression Required. An expression that returns a Range object.
Example
This example fills the range A1:M1 on Sheet1, based on the contents of cell A1.
Worksheets("Sheet1").Range("A1:M1").FillRight