Question

怎么让excel某一列数据变成固定长度

比如，我想让这一列变成5个字符的长度
如果是22222，则不变，
如果是22，则后面自动填充3个空格
如果是222，后面就自动填充2个空格
麻烦具体点，谢谢了！
这一列数据有汉字有数字

Answer 1

1. 首先让 点击B2单元格【以B2为中介点，找冻结部分的中介点，行列的交叉点】

   

2. 选择“视图”——“冻结窗口”，即可实现冻结，超级简单便捷。

   

3. 冻结完毕之后，即会出现图中所显示的十字区域，这就说明你的冻结成功了，成功固定第一行第一列。

   

4. 测试一下，可以拖动鼠标，或者按住右侧和下面的滚动条，测试是不冻结成功

   

5. 如果觉得用不着，或者想要撤销冻结窗口，直接点击“取消冻结”即可

   

   
   

Answer 2

这种类型用定义格式的方法怕是没有办法做到
但可以用函数公式来做
假设这些数据写在A列,则
B1单元格写入公式
=A1&IF(LEN(A1)>4,"",REPT(" ",5-LEN(A1)))
下拉填充公式
再让单元格内容靠右对齐排列就行了

追问

谢谢你啊,我刚试了,纯数字的话可以,有汉字的数据就不行了,这公式能改下吗

追答

这个公式与单元格内容是不是数字无关

你再试一下

 

Answer 3

自定义格式#00000

追问

胡扯

追答

Sub t()
For i = 1 To 12
a = Cells(i, 1)
Cells(i, 1).Select
Selection.NumberFormatLocal = "@"
If Len(a) = 5 Then
Cells(i, 1) = a
ElseIf Len(a) = 4 Then
Cells(i, 1) = a & " "
ElseIf Len(a) = 3 Then
Cells(i, 1) = a & " "
ElseIf Len(a) = 2 Then
Cells(i, 1) = a & " "
ElseIf Len(a) = 1 Then
Cells(i, 1) = a & " "
End If
Next
End Sub
刚才看错了，是后面添加，用vba在原位置修改。不过你这样说，恐怕也。。。素质！