一区二区三区日韩精品-日韩经典一区二区三区-五月激情综合丁香婷婷-欧美精品中文字幕专区

分享

Excel之VBA常用功能應(yīng)用篇:獲取有數(shù)據(jù)單元格最后一行

 每天學(xué)學(xué)Excel 2022-02-15

當(dāng)我們Excel數(shù)據(jù)表的數(shù)據(jù)行數(shù)不固定的情況,我們?nèi)绾沃涝贓xcel中的數(shù)據(jù)到底有多少行?我想這個(gè)問(wèn)題肯定有很多人特別想知道,因?yàn)樵谖覀僔BA案例中,經(jīng)常會(huì)用得到最后行號(hào),下面就和大家分享幾種方法:

1.使用For循環(huán)方法

'定義num儲(chǔ)存行號(hào)的變量,i循環(huán)變量

Dim num, i

'將Excel最大行號(hào)賦值給變量

num = Rows.Count

'開始循環(huán)并判斷,找出最后有值的單元格

For i = 1 To num

If Range("a" & num) <> "" Then

Exit For

End If

num = num - 1

Next

'輸出num,也就是得到的行號(hào)

MsgBox num

執(zhí)行后可以正確得到最后數(shù)據(jù)行行號(hào)

不足點(diǎn):

數(shù)據(jù)行很少的情況下,循環(huán)起來(lái)好慢。

2.使用.UsedRange方法

'定義一個(gè)儲(chǔ)存行號(hào)的變量

Dim num

'使用UsedRange獲取的行號(hào)賦值給num

num = ActiveSheet.UsedRange.Rows.Count

'輸出num,也就是得到的行號(hào)

MsgBox num

代碼執(zhí)行后可以獲取到最后一行行號(hào)

不足點(diǎn):

單元格存在有格式的單元格,就會(huì)算上帶有格式的單元格,得到的行號(hào)就會(huì)有問(wèn)題

3.使用Range().End(xlDown)方法

'定義一個(gè)儲(chǔ)存行號(hào)的變量

Dim num

'使用Range("").End(xlDown)獲取的行號(hào)賦值給num

num = ActiveSheet.Range("a1").End(xlDown).Row

'輸出num,也就是得到的行號(hào)

MsgBox num

代碼執(zhí)行后可以獲取最后一行行號(hào)

不足點(diǎn):

如何列數(shù)據(jù)中有空白行,就得出錯(cuò)誤的行號(hào)

如果最后的數(shù)據(jù)行被隱藏,也會(huì)得到錯(cuò)誤行號(hào)

4.使用Range().End(xlUp)方法

'定義一個(gè)儲(chǔ)存行號(hào)的變量

Dim num

'使用Range("").End(xlUp)獲取的行號(hào)賦值給num

num = ActiveSheet.Range("a" & Rows.Count).End(xlUp).Row

'輸出num,也就是得到的行號(hào)

MsgBox num

代碼執(zhí)行后可以獲得最后一行數(shù)據(jù)行號(hào)

不足點(diǎn):

如果整個(gè)表格的最后行有數(shù)據(jù),就會(huì)得到錯(cuò)誤行號(hào)

如果最后的數(shù)據(jù)行被隱藏,也會(huì)得到錯(cuò)誤行號(hào)

5.使用Cells.SpecialCells方法

'定義一個(gè)儲(chǔ)存行號(hào)的變量

Dim num

'使用Cells.SpecialCells獲取的行號(hào)賦值給num

num = Cells.SpecialCells(xlCellTypeLastCell).Row

'輸出num,也就是得到的行號(hào)

MsgBox num

執(zhí)行后可以正確獲取最后數(shù)據(jù)行號(hào)

不足點(diǎn):

如果存在有格式的空單元格,就會(huì)獲取錯(cuò)誤行號(hào)

6.使用Cells.Find方法

'定義一個(gè)儲(chǔ)存行號(hào)的變量

Dim num

'使用Cells.Find獲取的行號(hào)賦值給num

num = Cells.Find(what:="*", after:=Range("a1"), searchorder:=xlRows, searchdirection:=xlPrevious).Row

'輸出num,也就是得到的行號(hào)

MsgBox num

執(zhí)行后可以正確得到數(shù)據(jù)行最后一行行號(hào)

不足點(diǎn):

如果數(shù)據(jù)最后一行被篩選了,會(huì)得到錯(cuò)誤的行號(hào)

好了,關(guān)于如何獲取Excel數(shù)據(jù)表單元格最后一行的方法就介紹這些!

    本站是提供個(gè)人知識(shí)管理的網(wǎng)絡(luò)存儲(chǔ)空間,所有內(nèi)容均由用戶發(fā)布,不代表本站觀點(diǎn)。請(qǐng)注意甄別內(nèi)容中的聯(lián)系方式、誘導(dǎo)購(gòu)買等信息,謹(jǐn)防詐騙。如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請(qǐng)點(diǎn)擊一鍵舉報(bào)。
    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評(píng)論

    發(fā)表

    請(qǐng)遵守用戶 評(píng)論公約

    類似文章 更多

    青青久久亚洲婷婷中文网| 精品人妻一区二区三区四区久久| 欧美精品一区二区三区白虎| 日韩欧美二区中文字幕| 精品一区二区三区中文字幕 | 麻豆精品视频一二三区| 亚洲中文字幕在线观看四区| 国产永久免费高清在线精品| 亚洲精品欧美精品一区三区| 国产级别精品一区二区视频| 高清在线精品一区二区| 日韩国产亚洲欧美激情| 亚洲天堂有码中文字幕视频| 精品欧美国产一二三区| 午夜精品黄片在线播放| 风韵人妻丰满熟妇老熟女av| 欧美日韩国产精品黄片| 国产一区麻豆水好多高潮| 亚洲av成人一区二区三区在线| 国产女同精品一区二区| av在线免费观看一区二区三区| 中文字幕精品人妻一区| 99久久人妻精品免费一区| 色好吊视频这里只有精| 两性色午夜天堂免费视频| 成年女人午夜在线视频| 日韩一级欧美一级久久| 亚洲欧美视频欧美视频| 在线日韩中文字幕一区| 亚洲精品福利视频你懂的| 91偷拍视频久久精品| 国产成人在线一区二区三区| 日韩中文字幕免费在线视频| 亚洲一区二区三区三州| 亚洲男人的天堂就去爱| 国产日韩欧美在线播放| 91欧美日韩国产在线观看| 国产一区二区不卡在线视频| 日本一二三区不卡免费| 国产一区二区三区草莓av| 亚洲午夜精品视频在线|