Run-time error '5834':

.Cells(1).Range.Characters.Last.Style = "Caption"


Any idea?