Range.FillRight (Excel)

Preenche à direita a partir da célula ou células da extrema esquerda no intervalo especificado. O conteúdo e a formatação da célula ou células da coluna da extrema esquerda de um intervalo são copiados para o restante das colunas do intervalo.

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