VBA UI UX-17: Drag-drop to reorder or move items between UserForm Listbox

This series covers how to design a Professional User Interface using Office Apps.

Subscribe, Like, and Comment. 🙏Thanks for watching.

You can now support by buying any of the Projects or Source Code.

📌What to watch next:

#VbaA2z

[VBAAZ]

Project uploaded to Google drive. Please check the video description for the download link.

[holieh]

Very informative and simplified. I just gave it a try and it works fab. Thank you thank you

[sidaun]

Thanks for simplifying it. Excellent and helpful.

[Mira-kpdi]

I found it on point and very useful. Thank you

[Petrick-risq]

this is really interesting channel, love it. thank you

[hrascc]

Excellent presentation. I use the MS Access VBA environment for my work extensively. I have just recently investigated using drag & drop, but I'm not clear if the Access VBA supports it. I have been unable to use the BeforeDragOver and BeforeDropOrPaste events. Am I doing something wrong or is this simply not supported in
Access? I plan to watch more of your presentations! Thanks in advance....

[MaheshKumar-qbrg]

Can you please tell me how to create user form scroll down /up through Mouse

[wtf-did-i-just-watch-]

Where does your 0.85 come from? To get my drop index to work correctly I needed to use 0.04. Have I done something wrong?

[scotolivera]

Excellent as always sir, Can this be done using two listview, plus can one of the two listview act like an image of active cell on a worksheet, if you drag one item to another listview that item will be added to the active cell. Thanks a lot in advance

[automationguide]

Thanks for the video... how you got the syntax highlighting as dark theme

[JulesGroup]

Excel return an error when a ListBox is empty and you try to drag.
I put this line in MouseMove Sub and works:
"
On Error GoTo Finalize
. . .
Finalize:
End Sub
"

[tfbiv]

Nice work! I don't know why I didn't find your channel before! I'm subscribed now and I'll be checking out your other videos! One question - how did you determine the 85% factor? Is this independent of screen resolution?

[JulesGroup]

I ain't able to access the source code from GoogleDrive Link: "You need access" Can you help me?

[VijayKumar-zdou]

Dear sir, please make menu with sub menu drop down like web page without user form please make.

[Thunderin]

Good job with showing this technique. From where can we download the sample file?
I'm just curious about the accent, are you originally from India?

[nikahipsa]

Hi, thank you so much for the video, it helped me a lot. I am using Listbox for reordering data in worksheets. After I drag and drop data in Listbox, I would like to select that same data so I can visualize where am I dropping it.
I tried with putting this after your code Listbox1_BeforeDropOrPaste:
If to_lb_indx < from_lb_index Then
Me.ListBox1.ListIndex =to_lb_indx
Else

Me.ListBox1.ListIndex =to_lb_indx-1
End If
and when I put a breakpoint after that part of the code, it works great. But after closing the sub Listbox1_MouseMove, the selection goes back to to_lb_indx
Can you help me? :)