Jul 26 2020 04:57 AM
Option Explicit
Private Sub Worksheet_BeforeRightClick(ByVal Target As Excel.Range, Cancel As Boolean)
Me.Unprotect ("1234")
If Not Intersect(Target, Range("G5:EZ6")) Is Nothing Then
Cancel = True
ASK_Auswahl.Show
End If
Me.Protect ("1234")
End Sub
User Form in sheet 1
Sheet2 - table where the data is taken from
Properties window in lists Box1
How can I get all data from Sheet2 to be displayed in the user form?
Thx in Advance :)
Nikolino
Jul 26 2020 05:51 AM
SolutionIn your ListBox, the ColumnCount property is set to 1 and that means only 1 column would be displayed in the ListBox. Therefore increase the ColumnCount property of the ListBox according to the source data range.
Jul 26 2020 06:29 AM
Jul 26 2020 07:51 AM
You're welcome! Glad I could help.
Jul 26 2020 05:51 AM
SolutionIn your ListBox, the ColumnCount property is set to 1 and that means only 1 column would be displayed in the ListBox. Therefore increase the ColumnCount property of the ListBox according to the source data range.