Value in macro w/ multiple lines?

[Sath]

How do I input a cell value in a macro that has more than one line? For example:

ACTION
ACTION SPEED:4
ACTION ACCURACY:12

all these are within one cell and I want to search for cells that contain something like this. However how do I input this cell value into the macro in the cll.Value=" " area?

Thanks Guys.

 

[pboltonchina]

Use this type of statement

LookAt:=xlPart

 

[texasalynn]

try this maybe

Sub CelVal()
CFind = "ACTION" & Chr(10) & "ACTION SPEED:4" & Chr(10) & "ACTION ACCURACY:12"
If ActiveCell.Value = CFind Then
    MsgBox "Values matched"
End If
End Sub

 

[HalfAce]

Or, if you were looping through column A, looking for any cell that contains the string 'ACTION' (no matter what else it may have in there with it), then perhaps something like this:

Sub Find_ACTION_Demo()
Dim LstRw As Long, i As Range
LstRw = Cells(Rows.Count, "A").End(xlUp).Row
For Each i In Range("A1:A" & LstRw)
  If InStr(i, "ACTION") Then MsgBox i.Value 'or whatever _
     you want it to do when your value is found
Next i
End Sub

It's hard to know which road to take without also knowing what the rest of your code is doing, but I would think one of these suggestions ought to get you squared away.

Hope it helps.

 

[Sath]

Appreciate the help guys! Cheers.