You want to reference both cells
[VBA].Cells(i, "J").Value = Application.WorksheetFunction.Proper(.Cells(i, "J").Value)[/VBA]