时间戳

首页 > 解决方案 > Excel VBA 日期自动更改

excel - Excel VBA 日期自动更改

问题描述

我有这个奇怪的问题。当我使用这个功能

Worksheets("Worksheet").Cells(2, 8).Value = ComboBox2.Value

我的ComboBox2.Value = 02/01/2019我在 Cells(2,8) --> 01/02/2019中得到以下输出

但是在我的单元格属性中，我已经设置了我想要“dd/mm/yyyy”

哪里有问题？

标签： excelvba

解决方案

我会将组合框值转换为日期。尝试（复制）你的问题，这个修复对我有用。基本上，使用 CDate 设置单元格值。

Private Sub ComboBox1_Change()

  Dim v As Variant
  Dim d As Date

  v = Me.ComboBox1.Value
  d = CDate(v)

  Sheet3.Range("A1").Value = d

End Sub

推荐阅读