Question

EXCEL中如何快速输入桩号，和桩号相加减的问题。

EXCEL中如何快速输入桩号，和桩号相加减的问题，例如设置单元格格式为自定义 K#+###～K#+### 然后直接输入23453432 得到K2+345～K3+432 可是输入1233413244就变成了K123+341～K3+244 如何才能得到K12+334～K13+224呢？还有如果A1单元格内容为K12+334～K13+224 如何在B1算出桩号的距离 890?

​

Answer 1

你好：你这个或以把数字设成10位，不足的位上补0。构成"K两位码+三位码“格式。

          如：K12+334～K13+244，可以写成1233413244；K02+345～K03+432  可以写成0234503432 

          单元格格式设成自定义：!K00+000"～"!k00+000

右边的890怎么得到的，得有相关的逻辑公式，你可提供一下。

更多WPS办公软件教程，请访问：http://bbs.wps.cn或者http://e.weibo.com/wpswfw

追问

千米桩号后面不能有0 K2不能写成K02 这个怎么实现？

追答

你好：找到好办法了。就是条件格式：

完全适合你的要求，还不用辅助列！

更多WPS办公软件教程，请访问：http://bbs.wps.cn或者http://e.weibo.com/wpswfw

Answer 2

也不懂得楼主会不会用vba，
用vba的话，楼主只要在A列中输入桩号即可，格式和B列中的距离都将自动给出。

我先将这个方法说一下，不过在此之前，楼主得先将A列的格式设为常规或文本。

（1）在打开excel的情况下，同时按下Alt和F11，这样将打开visual basic编辑器
（2）双击visual basic编辑器左上角的sheet1（这里是假设你的表格在sheet1中，如果在其他的sheet中，双击相应的sheet即可）
（3）粘贴以下代码，然后关闭visual basic编辑器即可。
代码如下：
Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 1 Then
If Mid(Target, 1, 1) <> "K" Then
s = Target.Value
s1 = Mid(s, 1, Len(s) / 2)
s11 = Mid(s1, 1, Len(s1) - 3)
s12 = Mid(s1, Len(s1) - 2, 3)
s2 = Mid(s, Len(s) / 2 + 1, Len(s) / 2)
s21 = Mid(s2, 1, Len(s2) - 3)
s22 = Mid(s2, Len(s2) - 2, 3)
ss = "K" & s11 & "+" & s12 & "～" & "K" & s21 & "+" & s22
Target = ss
Target.Offset(0, 1) = s2 - s1
End If
End If

End Sub

希望对你有帮助！

Answer 3

可以考虑辅助列，比如：A列输入数据，B列显示，B1公式：
="K"&LEFT(A1,INT((LEN(A1)-6)/2))&"+"&MID(A1,INT((LEN(A1)-6)/2)+1,3)&"～K"&MID(A1,INT((LEN(A1)-6)/2)+4,ROUNDUP((LEN(A1)-6)/2,0))&"+"&RIGHT(A1,3)
C1桩距：
=--RIGHT(A1,ROUND(LEN(A1)/2,0))---LEFT(A1,INT(LEN(A1)/2))

Answer 4

选中A1，右键--设置单元格格式--自定义--K00+000"～"K00+000确定

B1输入公式=LEFT(A1,5)*1-RIGHT(A1,5)*1下拉公式
如果认为空格显示错误不好看的话，IF进行判断也行。
公式改为=IF(A1="","",LEFT(A1,5)*1-RIGHT(A1,5)*1)下拉公式