Problem on define dinamic Combobox list

Good Day,
Iam having difficulty on setting up a dynamic Combobox in my userform.

The VBA stop executing the 'DINAMIC COMBOBOX

Procedure is:

If REG2.Text = "KCA Deutag" Then

REG1.Enabled = True
FModification.Visible = True
FrameQuery.Visible = False
FOutputbox.Visible = True
CMDSave.Enabled = True

'DINAMIC COMBOBOX
Worksheets("DBDB").Range("J3", Range("J" & Rows.Count).End(xlUp)).Name = "Dynamic"
REG7.RowSource = "Dynamic"

Worksheets("DBDB").Range("AK3", Range("AK" & Rows.Count).End(xlUp)).Name = "Dynamic1"
REG8.RowSource = "Dynamic1"

'MAX LENGHT NUMBER
REG1.MaxLength = 5
End If

If REG2.Text = "3rd Party Company" Then
REG1.Enabled = False
Label2.Visible = True
REG17.Visible = True

'DINAMIC COMBOBOX
Worksheets("DBDB").Range("P3", Range("P" & Rows.Count).End(xlUp)).Name = "Dynamic"
REG7.RowSource = "Dynamic"

Worksheets("DBDB").Range("BM3", Range("BM" & Rows.Count).End(xlUp)).Name = "Dynamic1"
REG8.RowSource = "Dynamic1"

'MAX LENGHT NUMBER
REG1.MaxLength = 7
End If

End Sub

Your guys help on this matter is more then welcome

Administrative Note:

Welcome to the forum.

We would very much like to help you with your query, however you need to include code tags around your code.

Please take a moment to add the tags. Posting code between tags makes your code much easier to read and copy for testing, and it also maintains VBA formatting.

Please see Forum Rule #2 about code tags and adjust accordingly. Click on Edit to open your post, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

(Note: this change is not optional. No help to be offered until this moderation request has been fulfilled.)

Welcome to the forum

Please attach a sample workbook (not a picture or pasted copy). Make sure there is just enough data to demonstrate your need. Include a BEFORE sheet and an AFTER sheet in the workbook if needed to show the process you're trying to complete or automate. Make sure your desired results are shown, mock them up manually if necessary.

Remember to desensitize the data.

Click on GO ADVANCED and then scroll down to Manage Attachments to open the upload window.

Problem on define dinamic Combobox list
Good Day,
Iam having difficulty on setting up a dynamic Combobox in my userform.

Hi have attached also the file in subject.

The VBA stop executing the 'DYNAMIC COMBOBOX

Procedure is:

Please Login or Register  to view this content.

Your guys help on this matter is more then welcome