VBA将这个时间2021/12/21转成2021-12-21后写入到单元格保持2021-12-21这种格式

可以使用VBA中的日期函数来实现将时间转换为特定格式的字符串：

Sub ConvertDate()
    Dim originalDate As String
    Dim convertedDate As String
    
    originalDate = "2021/12/21"
    convertedDate = Format(CDate(originalDate), "yyyy-mm-dd")
    
    Range("A1").Value = convertedDate
End Sub

在这个示例代码中，我们首先将原始日期作为字符串存储在变量 `originalDate` 中。然后，我们使用 `CDate` 函数将其转换为日期类型。接着，使用 `Format` 函数将日期格式化为字符串，其中 `"yyyy-mm-dd"` 表示日期以“年-月-日”的格式呈现。最后，我们将转换后的日期字符串写入单元格 `A1` 中。

希望这个代码对你有帮助！