abdelfattah
Well-known Member
- Joined
- May 3, 2019
- Messages
- 1,429
- Office Version
- 2019
- 2010
- Platform
- Windows
Hello
I try to populate all of dates whether equal today or bigger than today in listbox based on textbox 1
so far just show date today
forMat date should be MM/DD/YYYY
this is the part of my code .
any idea to fix it?
I try to populate all of dates whether equal today or bigger than today in listbox based on textbox 1
so far just show date today
forMat date should be MM/DD/YYYY
this is the part of my code .
VBA Code:
a = Len(Me.TextBox1.Text)
If Left(Sheet1.Cells(ss, "d").Value, a) = Left(Me.TextBox1.Text, a) Then
If a < Date Or a = Date Then
Me.ListBox1.AddItem Sheet1.Cells(ss, 1)
Me.ListBox1.List(ListBox1.ListCount - 1, 1) = Sheet1.Cells(ss, "e")
Me.ListBox1.List(ListBox1.ListCount - 1, 2) = Sheet1.Cells(ss, "d")
Me.ListBox1.List(ListBox1.ListCount - 1, 3) = Sheet1.Cells(ss, "c")