Error 5854 - string parameter is too long?

Question

This code used to work fine in word-VBA, but now it gives a runtime error 5854 (string parameter too long). How can I fix it? Please help!

    Dim rngTemp As