Greetings! In over 300 executions, the following code never failed nor
displayed a message:

' The follwg instructions will delete the first 28 rows:

Application.Goto Reference:="R1:R28"
Selection.Delete Shift:=xlUp

But when I revised the code as follows (hoping for greater speed):

Range("R1:R28").Delete Shift:=xlUp

two out of three executions caused the following message to display: "This
Operation will cause some merged cells to unmerge; Do you wish to continue?"

The two sets of code seem to provide the same function. What could be wrong
with "Range("R1:R28").Delete Shift:=xlUp"? Thanks in advance for your help.
--
May you have a most blessed day!

Sincerely,

Michael Fitzpatrick