表A的数据导入时第一列格式是如520×2.50我想导入后转换成2.50*520这样格式。

还有一种情况是如单元格内705×3.00,630×2.75整行内其他数据一样转换成

3.00*705  成品 Q195

2.75*630  成品 Q195

就是拆分他，其他数据相同。

用Excel 的MId函数可以实现，但是我想导入狐表后就自动转换。

没有思路，还在学习中，忘高手指点~

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:数据格式转换.table

Dim a As String
Dim b As String
a="705×2.75"
b= mid(a,5,4) & "*" & mid(a,1,3)
output.Show(b)

我知道这样可以实现，但是到分单元格 增加行 这种情况不知如何下手

还有一种情况是如单元格内705×3.00,630×2.75整行内其他数据一样转换成

3.00*705  成品 Q195

2.75*630  成品 Q195

谢谢您，但是我想就是在表A里处理数据，当数据导入后，把表A的数据格式转换

好，谢谢你

Tables("表B").StopRedraw
For Each dr As DataRow In DataTables("表B").DataRows
    If dr.IsNull("第一列")=False Then
       Dim s As String=dr("第一列")
        Dim s2 As String=mid(s,5,4)
        Dim s3 As String =mid(s,1,3)
        dr("第一列")=s2 & "*" & s3
 
    End If
Next
Tables("表B").ResumeRedraw

高手如何判断一下 之前导入更改后的数据 

不在执行此命令了，如已经改好后的2.75*710 再次导入新数据后会变成*2.75*710,如何判断已经根式已经正确。试了好多方法我还是没成功