Kamis, 23 Juli 2015

Fill Blank Cells


Sub Fill_Blank_Cells()
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.FormulaR1C1 = "=R[-1]C"
End Sub

Tidak ada komentar:

Posting Komentar