平时我们在WPS上输入1到100是怎么输的呢？是不是先写一个1，然后鼠钿泼兽匿标移到单元格右下角，等鼠标变成十字箭头的时候，按住鼠标左键，下拉，拉100格。这样是可以的，不过用WPS氆厝效耄宏可以编程并设置快捷键，能够特别方便的输入连续数字的下拉
工具/原料
WPS
开启宏
方法/步骤
1、首先WPS需要开启宏，开启宏的方式看引用的链接
2、点击“开发工具”的“VB编辑器”
3、双击左边的“sheet1”，显示出右边的空白文档
4、Sub数值下拉()'定义一个函数DimhangAs雉搽妤粲Long'定义行号DimlieAsLong'定义列号惺绅寨瞀DimzonghangshuAsVariant'定义需要的总行数定义为任意类型hang=ActiveCell.Row'活动单元格的行号lie=ActiveCell.Column'活动单元格的列号zonghangshu=Cells(hang-1,lie)'取活动单元格的上一个单元格IfIsNumeric(zonghangshu)=FalseThen'如果输入的不是数字那么提示“输入数值”MsgBox"输入数值"ExitSubEndIfzonghangshu=Abs(Fix(zonghangshu))'到这里最终获得了需要的总行数fix表示取整，去掉小数点后面的，abs取绝对值到这里Range(Chr(65+lie-1)&(hang-2)).SelectSelection.AutoFillDestination:=Range(Chr(65+lie-1)&(hang-2)&":"&Chr(65+lie-1)&hang-3+zonghangshu),Type:=xlFillDefaultRange(Chr(65+lie-1)&(hang-2+zonghangshu)).SelectEndSub
5、关闭编辑器，保存.点击“宏”，再点击“选项”，写上大写的“J”，写什么字母都行，举例写“J”
6、具体使用方法：比如A1输入1，B1输入100，C1输入快捷键：CTRL+SHIFT+J,就可以看到效果