Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Thank You Simon :)
Now there will be another trick In one worksheet user pick-up a date (moves curson on it) and from another worksheet macro must find that date Well ... :) -- peteriks ------------------------------------------------------------------------ peteriks's Profile: http://www.excelforum.com/member.php...o&userid=37011 View this thread: http://www.excelforum.com/showthread...hreadid=570669 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Thank You Simon :)
Hi paste this into the worksheet module (whichever you like) change the sheet names to the desired sheets and change the range to encompass the range on your sheet its going to select the date on. It worked fine for me as long as the date is within the range! Regards, Simon Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim mycell Dim rng As Range Dim rng1 As Range Dim Cell Set rng1 = Sheets("Sheet2").Range("A1:C20") Set rng = ActiveCell With rng1 For Each mycell In rng1 If mycell.Value = rng.Value Then Sheets("Sheet2").Select mycell.Select ElseIf rng.Value = "" Then Exit Sub End If Next End With End Sub -- Simon Lloyd ------------------------------------------------------------------------ Simon Lloyd's Profile: http://www.excelforum.com/member.php...fo&userid=6708 View this thread: http://www.excelforum.com/showthread...hreadid=570669 |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Thank You Simon :)
Simple and workin -- peterik ----------------------------------------------------------------------- peteriks's Profile: http://www.excelforum.com/member.php...fo&userid=3701 View this thread: http://www.excelforum.com/showthread.php?threadid=57066 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|