LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 63
Default Macro Modification help

How can I modify the following Macro so that it will look at the value of the
cell to find the word? Right now its set to look at the cell, but the cells
are linked to other sheets.

Private Sub Worksheet_Activate()
Call Sheet4.getvalues
End Sub
--------------------------------------------------
Sub getvalues()
lr = Application.Max(2, Cells(Rows.Count, 1).End(xlUp).Row)
'MsgBox lr
Rows("2:" & lr).ClearContents
With Worksheets("Master")
slr = .Cells(Rows.Count, "c").End(xlUp).Row
'MsgBox slr
For i = 2 To slr
dlr = Cells(Rows.Count, "a").End(xlUp).Row + 1
' If .Cells(i, "ag") = overturned Then .Rows(i).Copy Rows(dlr)
If .Cells(i, "ag") = overturned And Not IsDate(.Cells(i, "bm")) Then
..Rows(i).Copy Rows(dlr)
Next i
End With
End Sub
-------------------------------------------
Sub Fixit1() 'Use if event macro stops working
Application.EnableEvents = True
End Sub

 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
macro - modification yshridhar Excel Discussion (Misc queries) 10 February 1st 08 03:47 AM
Macro modification Hirsch Excel Discussion (Misc queries) 3 May 27th 05 10:21 PM
Macro modification HJ Excel Programming 6 November 3rd 04 07:37 PM
Macro Modification Help MM[_4_] Excel Programming 1 July 29th 04 10:37 PM
Need Macro Modification Phil Hageman[_3_] Excel Programming 2 June 2nd 04 12:26 PM


All times are GMT +1. The time now is 08:49 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"