宏转换高度

时间:2015-11-12 16:21:48

标签: excel excel-vba vba

我已经有了这个工作,但它并不完美。我需要将列中的所有高度转换为3位数字,没有特殊字符。例如,这些高度:6'2" 5'10" 6'0"将成为这些高度:602 510 600

在宏中执行此操作的最有效方法是什么?

1 个答案:

答案 0 :(得分:0)

不需要VBA。假设您的数据各为一行,则可以使用公式。

假设您的身高是单元格A1,请使用以下公式:

=IF(LEN(A1)=5,SUBSTITUTE(SUBSTITUTE(A1,"'",""),"""",""),SUBSTITUTE(SUBSTITUTE(A1,"'",0),"""",""))

它的机制确定英寸部分(Len(A1) = 5), ie -- 5'10"中是否有两位数字。如果是这样,它只会移除'"空格。如果英寸部分只有1位数,则会增加额外的零。