Range.FillLeft (Excel)

Fills left from the rightmost cell or cells in the specified range. The contents and formatting of the cell or cells in the rightmost column of a range are copied into the rest of the columns in the range.

Worksheets("Sheet1").Range("A1:M1").FillLeft