如何知道工作表中最長的行的長度

我正在使用質量控制表，並且想要查找（或知道）包含最大單元格數的最長行。例如：如何知道工作表中最長的行的長度

aa | bb | cc | dd | 
aa | kk | 
aa | dd | ss |

那麼，我想程序可以告訴我最長的行是第一個，其中包含4列。我已經使用這個代碼：

ActiveCell.End(xlDown).Select 
ActiveCell.End(xlToRight).Select 
my_line = Selection.Row 
my_column= Selection.Column + 1

但它只能給我最後一行的長度，但不是最長的一個。所以，如果你有一些想法，請發表評論。

來源

2016-07-05 Hiddenllyy

你能澄清嗎？我聽起來像你想找到人口最多的單元格* aka *最後填充的列。最長的一行聽起來像是在查看單元格內容而不是單元格本身。 – Jeeped

使用帶有通配符的Range.Find method。從A1開始並向後看（即xlPrevious）。查找將快速找到最後使用的單元格。

Dim lst As Range 
With Worksheets("Sheet7") 
    Set lst = .Cells.Find(What:=Chr(42), After:=.Cells(1, 1), LookIn:=xlFormulas, _ 
     LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:=xlPrevious) 
End With 
Debug.Print lst.Row 
Debug.Print lst.Column

來源

2016-07-05 07:20:29 Jeeped

這是有效的！謝謝！ – Hiddenllyy

如何知道工作表中最長的行的長度

回答

相關問題