| 功能描述 | 快捷键 | VBA 对应方法/属性 (核心逻辑) | 说明 |
|---|---|---|---|
导航 (类似 End 方向键) | 这些是 End 键行为的直接对应 | ||
| 向下到连续区域末尾 | Ctrl + ↓ | ActiveCell.End(xlDown) | 从当前单元格向下，遇到第一个空单元格停止。 |
| 向上到连续区域开头 | Ctrl + ↑ | ActiveCell.End(xlUp) | 从当前单元格向上，遇到第一个空单元格停止。 |
| 向右到连续区域末尾 | Ctrl + → | ActiveCell.End(xlToRight) | 从当前单元格向右，遇到第一个空单元格停止。 |
| 向左到连续区域开头 | Ctrl + ← | ActiveCell.End(xlToLeft) | 从当前单元格向左，遇到第一个空单元格停止。 |
| 导航 (其他) | |||
| 到工作表开头 (A1) | Ctrl + Home | Range("A1").Select Application.Goto Reference:=Range("A1") | |
| 到工作表最后一个使用单元格 | Ctrl + End | ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Select | 定位“上次编辑过的”区域右下角，可能包含空行/列。 |
| 到行首 (A列) | Home | Range("A" & ActiveCell.Row).Select ActiveCell.EntireRow.Cells(1).Select | |
| 选择 | |||
| 选择到连续区域末尾 (向下) | Ctrl + Shift + ↓ | Range(ActiveCell, ActiveCell.End(xlDown)).Select | 基于 End(xlDown) 的选择 |
| 选择到连续区域末尾 (向上) | Ctrl + Shift + ↑ | Range(ActiveCell, ActiveCell.End(xlUp)).Select | 基于 End(xlUp) 的选择 |
| 选择到连续区域末尾 (向右) | Ctrl + Shift + → | Range(ActiveCell, ActiveCell.End(xlToRight)).Select | 基于 End(xlToRight) 的选择 |
| 选择到连续区域末尾 (向左) | Ctrl + Shift + ← | Range(ActiveCell, ActiveCell.End(xlToLeft)).Select | 基于 End(xlToLeft) 的选择 |
| 选择整个工作表 | Ctrl + A (按两次) | Cells.Select | 按一次 Ctrl+A 选择当前区域，对应 CurrentRegion.Select 或 ActiveCell.CurrentRegion.Select |
| 选择当前区域 | Ctrl + A (按一次) | ActiveCell.CurrentRegion.Select | 选择被空行/列包围的数据块。 |
| 选择整行 | Shift + Space | ActiveCell.EntireRow.Select | |
| 选择整列 | Ctrl + Space | ActiveCell.EntireColumn.Select | |
| 编辑 | |||
| 复制 | Ctrl + C | Selection.Copy | |
| 剪切 | Ctrl + X | Selection.Cut | |
| 粘贴 | Ctrl + V | ActiveSheet.Paste Destination:=TargetRange TargetRange.PasteSpecial | VBA 粘贴通常需要先指定目标位置 (Destination) 或使用 PasteSpecial。 |
| 粘贴值 | Alt + E, S, V | Selection.PasteSpecial Paste:=xlPasteValues | 在 VBA 中，更常用的是直接赋值：TargetRange.Value = SourceRange.Value |
| 撤销 | Ctrl + Z | Application.Undo | VBA 中谨慎使用，可能不稳定。 |
| 恢复 | Ctrl + Y | Application.Redo | VBA 中谨慎使用。 |
| 向下填充 | Ctrl + D | Selection.FillDown | 填充上方单元格的内容/公式。 |
| 向右填充 | Ctrl + R | Selection.FillRight | 填充左侧单元格的内容/公式。 |
| 输入数组公式 | Ctrl + Shift + Enter | 无需特别方法，正常输入公式并用 {} 包围，或使用 Range.FormulaArray 属性设置。 | VBA 中通常直接设置 Range.FormulaArray 属性。 |
| 单元格/行/列操作 | |||
| 插入单元格/行/列 | Ctrl + Shift + + | Selection.Insert Shift:=xlDown (或 xlToRight) Rows(ActiveCell.Row).Insert Columns(ActiveCell.Column).Insert | 取决于当前选择。 |
| 删除单元格/行/列 | Ctrl + - | Selection.Delete Shift:=xlUp (或 xlToLeft) ActiveCell.EntireRow.Delete ActiveCell.EntireColumn.Delete | 取决于当前选择。 |
| 隐藏行 | Ctrl + 9 | Selection.EntireRow.Hidden = True | |
| 取消隐藏行 | Ctrl + Shift + 9 | Selection.EntireRow.Hidden = False | |
| 隐藏列 | Ctrl + 0 | Selection.EntireColumn.Hidden = True | |
| 取消隐藏列 | Ctrl + Shift + 0 | Selection.EntireColumn.Hidden = False | |
| 格式设置 | |||
| 打开单元格格式对话框 | Ctrl + 1 | 无直接单方法。需分别设置 Range.NumberFormat, Range.Font, Range.Borders, Range.Interior 等属性。 | |
| 应用/移除加粗 | Ctrl + B | Selection.Font.Bold = Not Selection.Font.Bold | 切换加粗状态。 |
| 应用/移除斜体 | Ctrl + I | Selection.Font.Italic = Not Selection.Font.Italic | 切换斜体状态。 |
| 应用/移除下划线 | Ctrl + U | Selection.Font.Underline = xlUnderlineStyleSingle / xlUnderlineStyleNone | |
| 公式 | |||
| 插入函数 | Shift + F3 | Application.Dialogs(xlDialogInsertFunction).Show | |
| 切换显示公式/值 | Ctrl + | ActiveWindow.DisplayFormulas = Not ActiveWindow.DisplayFormulas | 重音符键，通常在 Tab 键上方。 |
| 绝对/相对引用切换 (编辑模式) | F4 | 无直接单方法。VBA 中公式字符串需手动构造 $。 | 在 VBA 中编写公式字符串时，需要直接包含 $ 符号来表示绝对引用。 |
| 其他常用 | |||
| 查找 | Ctrl + F | Application.Find(What:=...) Range.Find(What:=...) | |
| 替换 | Ctrl + H | Application.Replace(What:=..., Replacement:=...) Range.Replace(What:=..., Replacement:=...) | |
| 新建工作簿 | Ctrl + N | Workbooks.Add | |
| 打开工作簿 | Ctrl + O | Application.Dialogs(xlDialogOpen).Show Workbooks.Open(Filename:=...) | |
| 保存工作簿 | Ctrl + S | ActiveWorkbook.Save ActiveWorkbook.SaveAs(Filename:=...) | |
| 打印 | Ctrl + P | ActiveSheet.PrintOut ActiveWindow.SelectedSheets.PrintOut | |
| 关闭窗口/工作簿 | Ctrl + W | ActiveWorkbook.Close SaveChanges:=True/False ActiveWindow.Close | 关闭活动窗口或工作簿。 |
| 快速填充 (Excel 2013+) | Ctrl + E | Range("TargetRange").TextToColumns ... 或复杂逻辑 Range("TargetRange").FlashFill (较新版本) | VBA 模拟快速填充较复杂，通常使用 TextToColumns 或较新的 FlashFill 方法，但不如手动操作智能和直接。 |
重要说明：
-
End方法 (End(xlDown)等): 这是最直接对应Ctrl+方向键导航逻辑的 VBA 方法。它模拟按下End键后再按方向键的行为。关键点：- 它从
ActiveCell(或指定的Range) 开始。 - 它沿着指定方向 (
xlDown,xlUp,xlToRight,xlToLeft) 移动。 - 它停止在遇到第一个空单元格或工作表边界。
- 它返回停止位置的那个单元格（一个
Range对象）。 - 例如
ActiveCell.End(xlDown).Select精确模拟了Ctrl+↓并选择目标单元格。
- 它从
-
选择 (
Ctrl+Shift+方向键): VBA 中通过组合起点 (ActiveCell) 和终点 (ActiveCell.End(...)) 来构造一个范围 (Range(StartCell, EndCell))，然后对这个范围执行.Select或.Copy等操作。 -
CurrentRegion: 对应按一次Ctrl+A。它选择被空行和空列完全包围的连续数据区域。比End方法选择的范围更大、更结构化。 -
粘贴: VBA 中的粘贴 (
Paste或PasteSpecial) 通常需要明确指定目标位置 (Destination参数)，或者在执行Copy后直接对目标范围使用PasteSpecial。直接赋值 (Target.Value = Source.Value) 是复制值最高效的方式。 -
格式设置: VBA 没有单个命令对应
Ctrl+1。你需要通过设置Range对象的各种属性 (NumberFormat,Font,Interior.Color,Borders等) 来达到相同的效果。 -
绝对/相对引用 (
F4): VBA 在构造公式字符串时，需要直接写出$A$1(绝对),A$1(混合),A1(相对) 的形式，没有切换功能。 -
避免
.Select: 在编写高效 VBA 代码时，应尽量避免频繁使用.Select和ActiveCell/ActiveSheet。直接操作Range对象是更好的实践。例如：Range("A10").Value = Range("A1").End(xlDown).Value- 而不是：
Range("A1").Select Selection.End(xlDown).Select Selection.Copy Range("A10").Select ActiveSheet.Paste
)
