Excel 如何转换时间(时区)

Excel 如何转换时间(时区),excel,vba,date,time,Excel,Vba,Date,Time,我想在excel中转换时差为15小时的时区。在excel工作表中,我可以使用以下等式: =E1-(15/24) E1是时区1数据,格式为:mm/dd/yy hh:mm。 我不知道如何在宏中编写这个公式的代码。您能帮我写代码吗?只需将Excel引用E1替换为VBA引用范围E1即可 range1=range1-15/24LocalTime=range1-15/25的工作原理相同,但存在一个条件 E1必须保存一个日期/时间值,该值是一个带小数的数字,如43886.5,表示今天中午12点。如果你从昨

我想在excel中转换时差为15小时的时区。在excel工作表中,我可以使用以下等式:

 =E1-(15/24)
E1是时区1数据,格式为:mm/dd/yy hh:mm。
我不知道如何在宏中编写这个公式的代码。您能帮我写代码吗?

只需将Excel引用E1替换为VBA引用范围E1即可

range1=range1-15/24

LocalTime=range1-15/25的工作原理相同,但存在一个条件

E1必须保存一个日期/时间值,该值是一个带小数的数字,如43886.5,表示今天中午12点。如果你从昨晚9点到达的时间中减去15小时。

我找到了答案:

Sub TimeZone()
Range("M3:M11").Formula = "=E3 - (15/24)"
End Sub

感谢您的帮助。

DateAddh,-15,dt您可以在宏中使用与Kevin相同或更高版本的逻辑。您只需要切换E1和VBA范围,如RangeE1@Kevin如何将DateAddh,-15,dt应用于另一列的范围?当我将子时区Dim dt应用为Date dt=range3:E11 RangeM3:M11=DateAddh,-15时,dt End Sub向我显示错误。因为OP说他的公式已经工作了,这意味着他的格式是correct@urdearboy因为OP认为告诉我们E1的格式很重要,这意味着他不知道该单元格的值-这些信息帮不了你多少忙。错误类型会有所帮助……因此,Range1中的值实际上可能不是日期,而是看起来像日期的文本。这个站点上有很多解决方案可以帮助您解决这个问题,因为我几乎没有足够的信息来开始调试。尝试用新代码发布另一个问题,并解释代码失败的具体问题,并显示与失败相关的示例数据