excel如何快速输入1到50

excel表格中如何快速输入1-100的数字？~

在A1单元格输入数字1，然后把鼠标往拉，点击选择填充序列就可以了。
步骤1、点击电脑桌面上的Excel表格。

步骤2、在A1单元格输入数字1。

步骤3、把鼠标放在A1单元格的下方，当鼠标变成小+的时候往下拉。

步骤4、点击自动填充按钮。

步骤5、点击填充序列。


步骤6、设置完成后的图片见下图。

注意事项：
1、此方法适用于所有的版本的Excel。
2、Excel的这个快速输入的功能叫填充序列。

Excel如何纵向快速填充？

excel如何快速输入1到50的方法如下：

1. 打开Excel表格，在一个单元格里面输入1，然后鼠标放到单元格的右下角成”+“字型时往下（或往左）拉；

2. 之后在右下角旁边的”自动填充“选项里面选择”填充系列“，这样就完成了快速的系列号输入。

在A1中输入1，选择A列，选择菜单“编辑——>填充——>序列”，在终止值中输入50，按确定即可

按ALT + F11,双击SHEET1,粘贴下列代码。保存。需要说明的是，值得注意的是，你的“最后一位是1 到50”，本身就矛盾啊，我的理解是1到9取的是18位中的17位，而10到50取的是前16位。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i As Integer
Dim a1 As String
For i = 1 To 50
a1 = Sheets(1).Cells(1, 1).Value
If i > 1 And i < 10 And Sheets(1).Cells(1, 1) <> "" Then
Sheets(1).Cells(i, 2).Value = a1 & i
End If
If i > 9 And Sheets(1).Cells(1, 1) <> "" Then
Sheets(1).Cells(i, 2).Value = Left(a1, 16) & i
End If
Next i
End Sub

如果你的“最后一位是1到50”，应该是“最后两位是01到50的话,则是下面的代码。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim i As Integer
Dim a1 As String
For i = 1 To 50
a1 = Sheets(1).Cells(1, 1).Value
If i > 1 And i < 10 And Sheets(1).Cells(1, 1) <> "" Then
Sheets(1).Cells(i, 2).Value = left(a1,16)& "0" & i
End If
If i > 9 And Sheets(1).Cells(1, 1) <> "" Then
Sheets(1).Cells(i, 2).Value = Left(a1, 16) & i
End If
Next i
End Sub

按住ctrl，把鼠标放在右下角，变成+号的时候下托就行啦

---

excel如何快速输入1到50视频