Code:
Dim oRng as Range
Set oRng = DescriptionBox.TextRTF
oRow.Cells(1).Range.FormattedText = oRng
Code:
oRow.Cells(1).Range.FormattedText = DescriptionBox.TextRTF
These two code segments perform exactly the same operation. Setting oRng is redundant to the logic.