如何跳到表的最后一行?
1. 選中單元格, 當鼠標指示變成手的形狀, 雙擊單元格下邊框, 會跳到最后一條數(shù)據(jù)(如果其中有空數(shù)據(jù), 會被阻斷), 同理, 當雙擊單元格上邊框 會跳到第一行數(shù)據(jù).
2. control/command + ↑\↓(上下箭頭)
Workbook為工作簿對象,對應一個Excel文件.
workbook 是一個excel文件（xxx.xls）,worksheet是里面包含的表巫俺，
多個 Sheet 合并為 一個 Sheet
對上文中的代碼做了小小的修改(下面的代碼加了注釋介时，不能運行)
Sub mergeSheets() //sub 代表一個過程
Application.ScreenUpdating = False// 不用顯示宏的執(zhí)行過程， 只顯示最后的結果钞支，最記得 把這個屬性 設為 True
For j = 1 To Sheets.Count //遍歷 Sheets
// 當 Sheet 的名字 不等于當前Sheet 名字時
If Sheets(j).Name <> ActiveSheet.Name Then
X = Range("A65536").End(xlUp).Row + 1
Sheets(j).UsedRange.Copy Cells(X, 1)
End If
Next
Range("B1").Select
Application.ScreenUpdating = True
MsgBox "success finished", vbInformation, "alert"
End Sub
下面是可以直接用的代碼
Sub mergeSheets()
Application.ScreenUpdating = False
For j = 1 To Sheets.Count
If Sheets(j).Name <> ActiveSheet.Name Then
X = Range("A65536").End(xlUp).Row + 1
Sheets(j).UsedRange.Copy Cells(X, 1)
End If
Next
Range("B1").Select
Application.ScreenUpdating = True
MsgBox "success finished", vbInformation, "alert"
End Sub
批量刪除空行
數(shù)據(jù)(Data)->篩選(Filter)
選中某一列的列頭， 篩選出空格竿刁，確定盒卸，右鍵刪除
如何把excel中的一個工作表單獨保存為excel文件
去除單元格中不可見字符
- 使用
CLEAN()函數(shù)
