Excel 查找最后一列格式问题

你能帮我编辑一下代码吗。我认为这是格式问题。但我不知道怎么解决它。 我的代码是找出我们有多少列

Range("m4").Value = Range(""A" & Columns.Count, 1").End(xlToLeft).Column

---

不确定您想要什么，但我想您希望获得第一行最后一个填充单元格的列数。那你可以试试这个

Range("m4").Value = Cells(1, Columns.Count).End(xlToLeft).Column

为了使用您的方法，您需要以下函数

Function colLetter(col As Long) As String
    colLetter = Split(Columns(col).Address(, 0), ":")(0)
End Function

然后

Range("m4").Value = Range(colLetter(Columns.Count) & "1").End(xlToLeft).Column

---

了解如何寻址单元格。 单元格由其坐标、行号和列号定义，如

单元格（[row]、[column]）

。单元格是

单元格

集合的成员，该集合是一个范围内的所有单元格。普通

单元格

指的是

活动表

中所有单元格的集合。因此

单元格（4，1）

定义了

范围（“A4”）

。单元格是范围对象

单元格（2，Columns.Count）

指定第2行中的最后一个单元格。

单元格（2，Columns.Count）.End（xlToLeft）

指示从最后一个单元格向左移动，直到检测到已使用的单元格。返回是一个范围对象，显然是一个单元格

该范围对象具有

列

和

行

属性以及

值

属性。因此，你可以要求

Cells(2, Columns.Count).End(xlToLeft).Value
' or
Cells(2, Columns.Count).End(xlToLeft).Row
' or
Cells(2, Columns.Count).End(xlToLeft).Column
' or
Cells(2, Columns.Count).End(xlToLeft).Address

也可以将单元格用作范围的终点

Set Rng = Range(Cells(2, 1), Cells(2, Columns.Count).End(xlToLeft))

---

我想我混淆了范围和单元格。谢谢你的澄清。