Calling and Excel Constant by A Variable

Hello diakonos1984,

Maybe this option would be more appealing...

    Dim cbAlign As String
    
        With wsTarget.UsedRange
            'Set horizontal alignment
            .HorizontalAlignment = xlLeft 'This works
            cbAlign = "xl" & ComboBoxHorizontalAlign.Value
            .HorizontalAlignment = Switch(cbAlign = "xlLeft", xlLeft, cbAlign = "xlRight", xlRight, cbAlign = "xlCenter", xlCenter)
        End With