如果最后一项是被剪切的，则Excel 2013在VBA中的剪切和插入不会调整命名区域的大小

在Excel 2013中，如果最后一项被剪切，VBA中的剪切和插入操作不会自动调整命名区域的大小。这意味着，如果你在VBA中使用剪切和插入操作来移动单元格或行/列，命名区域的大小将保持不变。

命名区域是一种在Excel中定义的具有特定名称的单元格范围。它可以用于在公式、宏和其他功能中引用该范围，以简化公式和代码的编写和维护。

在Excel 2013中，如果你使用VBA中的剪切和插入操作来移动单元格或行/列，命名区域的大小将保持不变。这意味着，如果你的命名区域包含被剪切的最后一项，它将保留对原始单元格的引用，而不会自动调整为新的位置。

为了解决这个问题，你可以在VBA中使用一些额外的代码来手动调整命名区域的大小。你可以使用Range对象的Resize方法来调整命名区域的大小，以确保它与移动后的单元格范围保持一致。

以下是一个示例代码，演示如何在VBA中使用剪切和插入操作后调整命名区域的大小：

Sub MoveCells()
    ' 剪切单元格
    Range("A1:A5").Cut Destination:=Range("B1:B5")
    
    ' 调整命名区域的大小
    Dim rng As Range
    Set rng = Range("MyRange") ' 假设"MyRange"是你的命名区域名称
    rng.Resize(rng.Rows.Count + 1).Offset(-1).Name = "MyRange"
End Sub

在上面的示例中，我们首先使用Cut方法将单元格"A1:A5"剪切到目标位置"B1:B5"。然后，我们使用Resize方法和Offset方法来调整命名区域的大小，使其与移动后的单元格范围保持一致。最后，我们使用Name属性为调整后的范围重新命名为"MyRange"。

这样，即使最后一项被剪切，命名区域的大小也会自动调整为新的位置。