Filtering Between Two Dates (Sort Dates & Remove Duplicates In Combobox )

Temmuz 26, 2015 Yorum bırakın

      I made arrangements for the previous template. I’ve listed the dates on ComboBox , ascending order(it can sometimes be erratic.) I filled combobox with unique values from column.

When opened the userform , the dates  in the userform “A” column are sorted (ascending order). With following codes :

With pk.Range(“A2:D” & Cells(Rows.Count, “A”).End(xlUp).Row)
.Sort Key1:=Range(“A2″), _
Order1:=xlAscending, _
Header:=xlNo, _
OrderCustom:=1, _
MatchCase:=False, _
Orientation:=xlTopToBottom, _
DataOption1:=xlSortTextAsNumbers
End With

Then the combobox is filled with unique items.

combobox sort dates and remove duplicate items

 

You can Download Here

Creating Pop-up Menu on Userform

Temmuz 15, 2015 Yorum bırakın

Excel : Pop-Up Menu on the Userform.

There are two menu (File ,Edit) on the UserForm.
You can also add new menus.For example :

Private Sub Label6_Click()
ActiveWorkbook.Save
End Sub

userform popup menu

 

userform_menu2

 

Download Template Here

Takip Et

Her yeni yazı için posta kutunuza gönderim alın.