Visual Basic - Manejo Excel

Tengo el siguiente problema en un Sheets tengo los datos sin formatear y en otro Sheets esta la plantilla que utilizo el proceso iuncia bien hasta la insercion de la tercera fila ya que me da el siguiente error "cannot change part of a merged cell" y veo que todo esta igual este el el codigo las dos primera iteraciones son correctas:

While Range("A" + n).Value <> ""
Range("A" + n).Select
Selection.Copy
Sheets("Booking Input Sheet").Select
Range("A" + y + ":B" + y).Select
ActiveSheet.Paste
Sheets("Data").Select
Range("B" + n).Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Booking Input Sheet").Select
Range("C" + y + ":F" + y).Select
ActiveSheet.Paste
Sheets("Data").Select
n = n + 1
y = y + 1
Wend

Gracias por la ayuda que me puedan brindar

En algun momento de tu ciclo, las variables que usas, hacen referencia a rangos de copiado y pegado diferentes, ahi esta el problema...