Moving up one cell
Thank you
"Gary''s Student" wrote:
Selection.Offset(-1,0).Select
--
Gary''s Student - gsnu200747
"Hans Dummer" wrote:
Dear all,
I have the following simple code:-
Range("E20").Select
Selection.Copy
Cells.Find(What:="TECHNOLOGIES", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Selection.End(xlDown).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone,
SkipBlanks _
:=False, Transpose:=False
Once I have found what I am looking for I would like to move up 1 (one) cell
and then paste the data.
Can you help?
--
Thank you in advance for your Help
|