立即将单元格的值从EX：755更改为7:55

Question

我正在尝试在一个单元格中输入数字，并且在同一单元格中将值更改为类似时间的格式。

例如，如果我输入600，我想立即将其更改为6:00

到目前为止，我正在使用MID函数，但它仅在另一个单元格中才有用。

Answer 1

假设您只想添加“：”，则可以使用：

cells(row,col).value = left(cells(row,col).value,len(cells(row,col).value)-2) & ":" & right(cells(row,col).value,2)

有点长，但应该适合帐单并在2位数分钟之前更正1或2位数。

---

关于以后的帖子，请发布您使用的代码，以便人们可以复制/修复您的代码，推断更多的信息或纠正可能固有地阻止满足意图的系统错误。

Answer 2

使用Worksheet_Change()事件处理程序

将其放置在所需的工作表代码窗格中：

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = False
    On Error GoTo exitEvent

    Target.Value2 = Format(Target.value, "00:00")

exitEvent:
    Application.EnableEvents = True
End Sub