[已解决]帮忙看下这个函数为什么不能运用于VBA代码中（MID函数)

jiangslly

Sub ac()
Dim b
b = Application.WorksheetFunction.Mid(Sheet1.Range("A9"), 6, 2)
MsgBox b
End Sub

这里Application.WorksheetFunction.Mid(Sheet1.Range("A9"), 6, 2)为什么不行?当我把application删除当作VBA自身的函数也不行，不知道这里的原因在哪？请指教
其中单元格的内容A9=2012-03-12

最佳答案

月排行榜 / 总排行榜

安贤

2012-4-3 15:13

Sub ac()
Dim b
b = Mid(Sheet1.Range("A9"), 6, 2)
MsgBox b
End Sub

跳转到最佳答案楼层

安贤

Sub ac()
Dim b
b = Mid(Sheet1.Range("A9"), 6, 2)
MsgBox b
End Sub