討論群組

EXCEL VBA 日期显示出错

jerryapo

jerryapo
個人積分：946分
文章編號：84161227

946分

樓主

2022-02-12 21:36

Dear All，

不知道为什么data sheet 的date是正常的，标黄的是output 到UserForm上，就变成了日期的数值了。

这些都是YOUTUBER 看来的，光听丫兜呀讲了一大串，加上我又不是专家。时在不懂，为什么会这样。

我也不会uoload file. 所以如果有人有兴趣研究，可以私我，我再寄邮件给你。 3Q

EXCEL VBA 日期显示出错

EXCEL VBA 日期显示出错

EXCEL VBA 日期显示出错

2022-02-12 21:36 發佈

文章關鍵字 Excel VBA

唬唬生瘋
個人積分：7432分
文章編號：84161623

7432分

2樓

2022-02-12 22:53

應該是欄位格式問題
在VBA中指定日期格式給它就可以
或是你的來源是EXCEL的資料
把日期改成文字格式也會正常顯示

大概就是這樣
Private Sub ListBox1_Click()
Dim MyTime, MyDate, MyStr
MyTime = Format(Me.ListBox1.List(Me.ListBox1.ListIndex, 1), "yyyy/mm/dd")
Me.TextBox1.Value = MyTime
End Sub

jerryapo 樓主

3Q。我试试。

2022-02-13 8:37

jerryapo 樓主

大大，我还有一个function 是 search function，我不会做，能帮忙做吗？？？这是我工作上要用的，我是农业工作的，不太会写程式。excel VBA 自己学的。太烂了

2022-02-13 9:12

jerryapo

jerryapo
個人積分：946分
文章編號：84163010

946分

樓主

2022-02-13 9:03

唬唬生瘋 wrote:
應該是欄位格式問題在VBA...(恕刪)

把Format加在(Me.ListBox1.List(Me.ListBox1.ListIndex, 1)之前，在加上, "yyyy/mm/dd")即可
可以了， 3Q a lot.

X

X