Hi,
I would like to write the value of a range I've selected to a particular cell. Can't seem to get that to work. Tried Valrange1 = Range("A" & s5row & ":A" & drow).Value, and then Cells(arow, 48) = Valrange1, but that only got me the first value in the range. Thought perhaps I needed DIM Valrange1 AS Range, but that caused an error.
Here's how I set up the range:
With Sheets("INPUT").Range("A" & s5row & ":A" & drow)
Set DXrng = .Find(What:=DDXit, _
After:=.Cells(.Cells.Count), _
LookIn:=xlValues, _
LookAt:=xlPart, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False)
End With
Help much appreciated.
I would like to write the value of a range I've selected to a particular cell. Can't seem to get that to work. Tried Valrange1 = Range("A" & s5row & ":A" & drow).Value, and then Cells(arow, 48) = Valrange1, but that only got me the first value in the range. Thought perhaps I needed DIM Valrange1 AS Range, but that caused an error.
Here's how I set up the range:
With Sheets("INPUT").Range("A" & s5row & ":A" & drow)
Set DXrng = .Find(What:=DDXit, _
After:=.Cells(.Cells.Count), _
LookIn:=xlValues, _
LookAt:=xlPart, _
SearchOrder:=xlByRows, _
SearchDirection:=xlNext, _
MatchCase:=False)
End With
Help much appreciated.