[已解决]请教大家下，当前所在列最后一个有数据单元格的代码，怎么表示。

yjwdjfqb

请教大家下，当前所在列最后一个有数据单元格的代码，怎么表示。
先谢谢大家了！

最佳答案

月排行榜 / 总排行榜

ppp710715

2014-6-21 23:45

1. set rg = Cells(Rows.Count, ActiveCell.Column).End(xlUp)
   
2. msgbox rg.address

复制代码

跳转到最佳答案楼层

冥王

当前活动单元格所在列最后一个有数据单元格

1. Cells(Rows.Count, ActiveCell.Column).End(xlUp)

复制代码

十五的月亮

MsgBox Cells(Rows.Count, ActiveCell.Column).End(xlUp)

ppp710715

1. set rg = Cells(Rows.Count, ActiveCell.Column).End(xlUp)
   
2. msgbox rg.address

复制代码

yjwdjfqb

谢谢大家的帮助！