Excel VBA跨多个单元格中的表添加求和公式

我有下面的宏，用于获取数据的主列表，并根据列a中的唯一名称将其拆分为多个选项卡。这可以按预期工作，但我试图找到一种方法来查找新表中的最后一行，并在该行为每列添加一个求和公式，从“L”列到“Z”列。如果可能的话，我还想根据模板选项卡中的特定行对其进行格式化。任何帮助都将不胜感激，因为我还没有找到这样做的方法

谢谢大家,， 埃里克

---

以下是我将使用的：

Sub checkCols()

ur = ActiveSheet.UsedRange.Columns.Count
urName = Cells(1, ur).Address
MsgBox (ur)
MsgBox (urName)

End Sub

---

感谢您的回复，但我不确定这应该做什么，也不确定如何将其应用于我要求的任务。UsedRange不可靠。[查找最后一行、列或最后一个单元格]（）

Sub checkCols()

ur = ActiveSheet.UsedRange.Columns.Count
urName = Cells(1, ur).Address
MsgBox (ur)
MsgBox (urName)

End Sub