View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.programming
Information Hog[_3_] Information Hog[_3_] is offline
external usenet poster
 
Posts: 1
Default If Cell equals text Copy Cells, B2,B3,B4


This should get you started

Dim MyCheck As String
MyCheck = "USA"
MyRange = Cells(7, 2)

If MyCheck = MyRange Then
' code for copy here
End If


--
Information Hog
------------------------------------------------------------------------
Information Hog's Profile: http://www.excelforum.com/member.php...o&userid=21508
View this thread: http://www.excelforum.com/showthread...hreadid=397433