I want to make a loop to replace this.

With frmtemp
.Text(0) = strCell(0)
.Text(1) = strCell(1)
.Text(2) = strCell(2)
.Text(3) = strCell(3)
.Text(4) = strCell(4)
End With

Any help would be greatly appreciated.