如何跳到表的最后一行?
1. 选中单元格, 当鼠标指示变成手的形状, 双击单元格下边框, 会跳到最后一条数据(如果其中有空数据, 会被阻断), 同理, 当双击单元格上边框 会跳到第一行数据.
2. control/command + ↑\↓(上下箭头)
Workbook为工作簿对象,对应一个Excel文件.
workbook 是一个excel文件（xxx.xls）,worksheet是里面包含的表，
多个 Sheet 合并为 一个 Sheet
对上文中的代码做了小小的修改(下面的代码加了注释，不能运行)
Sub mergeSheets() //sub 代表一个过程
Application.ScreenUpdating = False// 不用显示宏的执行过程， 只显示最后的结果，最记得 把这个属性 设为 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
批量删除空行
数据(Data)->筛选(Filter)
选中某一列的列头， 筛选出空格，确定，右键删除
如何把excel中的一个工作表单独保存为excel文件
去除单元格中不可见字符
- 使用
CLEAN()函数
