BenGrobler
New Member
- Joined
- Apr 19, 2021
- Messages
- 31
- Office Version
- 2019
- 2016
- Platform
- Windows
Please help me with this code i am new to this and I am trying to do this on my own to no avail.
here is my code that will not work please asist
If Range("a4").Value = "902" Then Range("C4").Select
Selection.Copy
Sheets("Trend").Select
Range("C4").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End If
here is my code that will not work please asist
If Range("a4").Value = "902" Then Range("C4").Select
Selection.Copy
Sheets("Trend").Select
Range("C4").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End If