excel批量" /" (除法)处理

发布网友发布时间：2024-10-03 12:31

共3个回答

热心网友时间：2024-12-04 01:57

很多单格都是文本格式的X/Y吧，如果不设成文本，经常是自动转换成日期，你是要X除以Y得到的结果？追问嗯，因为批量复制的所以都是文本格式，我有一个方法就是在单元格里面点那个“/” 比如A1=1/2 点选单元格后，鼠标在公式栏里面点黑”/“,然后A1=0.5了。但是我这个表里三百多列三十多行啊~

追答按ALT+F11快捷键，在EXCEL文件名上点右键，点插入模块，输入（可以复制）以下代码：
Function mVal(yStrVal As String)
Dim mI As Double
Dim mS As Double
Dim I As Long
Dim sStr As String
mVal = Val(yStrVal)
I = InStr(yStrVal, "/")
If I = 0 Then
mVal = yStrVal
Else
mI = Val(Mid(yStrVal, 1, I - 1))
mS = Val(Mid(yStrVal, I + 1))
If mS > 0 Then
mVal = mI / mS
End If
If mI = 0 Then mVal = ""
End If
End Function

完成后在最后在列右侧，利用此函数，比如第一行为标题，第二行开始为这些数据，到W列数据结束，则在Y2单元格输入=mVal(A2),完成后向右拖拉复制到第23列，再向下拖拉复制到最后一行，则所有数据都处理完了，你最后只需要将得到的结果选择性复制回原来那个区域就可以了，选择性粘贴时要选“数值”。

热心网友时间：2024-12-04 01:58

假设X/y在A列插入一个空白列B列

在B1中输入或复制粘贴此公式
=”=“&A1
下拉填充
选中B列单元格区域
复制
右键单击B1
选择性粘贴
数值
选中B列数据分列完成
删除B列
其他列的处理办法与此相同

热心网友时间：2024-12-04 01:58

输入 =X/Y

设置文本格式在输入 X/Y