conditional userform data

[luvbite38]

Hi,

I am tottaly new with the userform and hoping if someone can kindly help me figure the following out pleaseeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee... (meow face)

I am using a userform with text boxes and comboboxes for users to enter the data.

Than I am using following to feed the users entry into the worksheet called "Data"

 .Offset(0, 1).Value = Country.Text

I am wondering if it is possible to tell the macro that do not enter the text.box value if it is a duplicate?

lets say if UK is already present in the Data worksheet in Column C:C, don't populate that entry and move on to the next on without showing any error or something?

Hope it makes sense?

Kind Regards

 

[Leith Ross]

Hello luvbite38,

The easiest way to check the range for duplicates is to use the CountIf function in VBA. Here is an example:

    If WorksheetFunction.CountIf(Range("C:C", Country.Text) > 1 Then
       MsgBox "The value " & Country.Text & " has already been entered."
       Exit Sub
    End If

 

[luvbite38]

Thanks Ross,

I really appreciate it,

I still want to skip any message box or error messages.

All I want a If condition which would skip entering the information if the value is duplicate.

Kindly any suggestion would be much appreciated,

 

[Leith Ross]

Hello luvbite38,

Enclose you code within the If Then statement, like this...

    If WorksheetFunction.CountIf(Range("C:C", Country.Text) = 1 Then
       .Offset(0, 1).Value = Country.Text
    End If

 

[luvbite38]

Thanks dude,

you're a champ

 

[Leith Ross]

Hello luvbite38,

You're welcome.