Listbox Wish To Appear On Left Of Column Not Right

I have the following code, a checkbox and listbox on a sheet
at the moment the list box appears to the right of the column , I
want it to appear to the left of the data entry column.

I have tried theproperties on the list box itself but it just resets,
I reckon this code controls the size,shape,location of the list box.

Option Explicit

Private Sub CheckBox1_Click()
If CheckBox1 Then
ListBox1.Visible = True
Else
ListBox1.Visible = False
End If
End Sub

Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim Target As Range
Dim MySel As Range

Set Target = Range("VBA_Target")
Set MySel = Intersect(ActiveCell.EntireRow, Target)
MySel.Value = ListBox1.Value

End Sub