如何在 Excel 中自动输入后移动到下一个单元格?

ms excelmicrosoft technologiesadvanced excel function更新于 2025/2/2 17:16:17

处理海量数据集或执行重复操作时，每次输入后手动移动到下一个单元格可能会非常困难且耗时。幸好，Excel 提供了许多实用函数，可以自动执行此过程，从而节省大量时间。无论您的 Excel 熟练程度如何，本课程都将为您提供所需的技能和资源，帮助您提高工作效率并简化工作流程。

在开始各种策略之前，请确保您熟悉 Microsoft Excel 的界面。了解工作表、单元格和数据输入的原理。如果您准备好了解如何在 Excel 中自动执行单元格导航，不再需要手动输入，那么让我们从第一种技巧开始，该技巧涉及使用 Enter 键自动移动到下一个单元格!

自动输入后移动到下一个单元格

在这里，我们将首先创建一个 VBA 模块，然后运行它来完成任务。让我们看一个简单的过程，了解如何在 Excel 中自动输入后移动到下一个单元格。

步骤 1

考虑任何 Excel 工作表。首先，右键单击工作表名称，然后选择"查看代码"以打开 VBA 应用程序。

右键单击 >"查看代码"。

步骤 2

然后点击"插入"，选择"模块"，然后将以下代码复制到文本框中。

插入 >"模块">"复制"。

代码

Sub FourCharEntry1()
   Dim xStr As String
   Dim I As Integer
   Dim K As Integer
   xStr = Application.InputBox("Enter string", "Move Next Cell", , , , , , 2)
   K = 0
   Application.ScreenUpdating = False
   For I = 1 To Len(xStr) Step 4
      ActiveCell.Offset(0, K) = "'" & Mid(xStr, I, 4)
      K = K + 1
   Next
   Application.ScreenUpdating = True
End Sub