Excel填充问题(很复杂也很简单)

发布网友 发布时间：2022-07-19 12:44

我来回答

共6个回答

热心网友 时间：2023-10-16 02:22

你的例子就是一个四进制的转换问题，另外如果不满8位的话作前端补0处理。
用excel标准函数会很难，但自定义一个函数就方便得很了。
Alt + F11打开VBA窗口，插入模块，粘帖下面的代码。

Function Convert4(inum As Long)
Dim m As Integer
Dim rsl As String
On Error GoTo err

Do
m = inum Mod 4
rsl = m & rsl
inum = (inum - m) / 4
Loop Until inum = 0
If Len(rsl) >= 8 Then
Convert4 = rsl
Else
Convert4 = String(8 - Len(rsl), "0") & rsl
End If
err:
End Function

使用时，假设从A1往下开始输入64，65，66...
在B1输入公式并往下填充就可以得到你要的序列值。
=Convert4(A1)

回复：
结果不对？那你的结果大概是什么？我是调试过的。
另外一点：代码拷贝地方没有搞错吧？应该是ALT+F11调出VBA窗口后，点菜单的插入，模块。在模块里粘帖代码。
有问题的话再问吧。

热心网友 时间：2023-10-16 02:22

比方,你要在A列输入如上数据,首先,你要把A列的单元格式设为文本,然后在A1输入00001000 A2输入00001001,然后把A1 A2选中,把鼠标放在右下,黑十字出来,左键点着一直往下拉就OK了

热心网友 时间：2023-10-16 02:22

选设置单元格格式为自定义格式，在右侧的格式框中输入00000000就可以了。输入好以后就可以托动复制了。

热心网友 时间：2023-10-16 02:23

现在第一行输入00001000，然后你能看见你的输入框下面有个小黑点，吧鼠标移上去，看小小十字，鼠标左键按住后下拉，然后在选择框中选择序列填充就OK了
记得吧单元格属性改成文本

热心网友 时间：2023-10-16 02:24

这是一个四进位制等差的数列。

热心网友 时间：2023-10-16 02:24

第一行输入00001000，然后选中这个框，当鼠标显示为“+”号时，按住右键往下拉，拉到很远。然后松手，会出现一个功能键，你选中那个“填充序列”