gingerbreadgrl
New Member
- Joined
- Aug 19, 2019
- Messages
- 48
Hi All,
I am very new to this and have been limping along with my macro through the stuff I have learned in this forum, on the web, and on youtube. I am trying to copy and paste a range of cells from one worksheet to another in a workbook if a certain cell contains a certain phrase. My code keeps returning an error. The code is below. Does anyone know what I am doing wrong? Thanks in advance!
[FONT=Verdana,Arial,Tahoma,Calibri,Geneva,sans-serif]If Sheets("C2-LTG").Range(B2).Value = "All of my choices are the same as my partner's" Then[/FONT]
[FONT=Verdana,Arial,Tahoma,Calibri,Geneva,sans-serif]Sheets("C1-LTG").Range("C2:DR2").Copy _
Destination:=Sheets("C2-LTG").Range("D2:DS2")[/FONT]
[FONT=Verdana,Arial,Tahoma,Calibri,Geneva,sans-serif]
End If
[/FONT]
I am very new to this and have been limping along with my macro through the stuff I have learned in this forum, on the web, and on youtube. I am trying to copy and paste a range of cells from one worksheet to another in a workbook if a certain cell contains a certain phrase. My code keeps returning an error. The code is below. Does anyone know what I am doing wrong? Thanks in advance!
[FONT=Verdana,Arial,Tahoma,Calibri,Geneva,sans-serif]If Sheets("C2-LTG").Range(B2).Value = "All of my choices are the same as my partner's" Then[/FONT]
[FONT=Verdana,Arial,Tahoma,Calibri,Geneva,sans-serif]Sheets("C1-LTG").Range("C2:DR2").Copy _
Destination:=Sheets("C2-LTG").Range("D2:DS2")[/FONT]
[FONT=Verdana,Arial,Tahoma,Calibri,Geneva,sans-serif]
End If
[/FONT]