Assign multiple values to one string declared

Question

I'm looking for way around getting multiple values set to one variable declared as String. Following codes might give you a glimpse of what I'm looking for

Dim Name as string
Name = value1 or value2 or value3
If range("A1"). Value = Name then
    Activecell.entirecolumn.delete
End If

You can, for example, add a , between your var then use a loop to check if the word between the , is the work you're looking for — Hearner
– Hearner, Commented Aug 27, 2015 at 8:25

Hearner · Accepted Answer · 2015-08-28 07:00:50Z

1

    Dim Name As String
    Dim value1 As String, value2 As String, value3 As String

    Name = value1 & "," & value2 & "," & value3

    If InStr(Name, Range("A1")) <> 0 Then
        ActiveCell.EntireColumn.Delete
    End If

The program loop through A1 to see if one of the value match. If it does, Instr will return the position in Name where they match. So, simply tells your program that is Instr isn't equal to 0 to delete what you want

edited Aug 28, 2015 at 7:00

answered Aug 27, 2015 at 8:27

Hearner

2,7053 gold badges19 silver badges34 bronze badges

Sign up to request clarification or add additional context in comments.

10 Comments

Hearner Over a year ago

Mark it to say this helped and solved your problem, it will help ppl if they envounter the same problem

Mohd akhtar Over a year ago

Question : Do I really have to mention limit like Name(3), can't I just say Name() and it will let me add as long as I want?

Hearner Over a year ago

Of course you can, but if you can know how many obj there will be then put it. Or you can use Dim Name(1 to 150) to say there can be 1 to 150 object. Or just Name()

Hearner Over a year ago

If you are sure Name will always have string, you can declare it as Dim Name() as string

Mohd akhtar Over a year ago

Thanks, I think I'd just go with Name() so that I don't have to count them and just add a value whenever required..

|

Collectives™ on Stack Overflow

Assign multiple values to one string declared

1 Answer 1

10 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

10 Comments

Your Answer

Sign up or log in

Post as a guest

Related