View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Thomas [PBD] Thomas [PBD] is offline
external usenet poster
 
Posts: 154
Default How to accomplish?

Steve Grosz,

You could use the following VBA, I was considering a couple of things.
First of all, there are no blanks in Column A, which the the NAME column.
Second, that Columns 1 - 4 are A,B,C,D. Please amend the code as necessary
for your needs, or repost for more help.

Public Sub Sub_1()
Dim x As Long
x = Excel.WorksheetFunction.CountA(Columns("A:A"))
For y = 2 To x
Range("A1").Cells(y, 5).Formula = "=IF(C" & y & "B" & y & ",TRUE,FALSE)"
Next
End Sub

You can filter on Column 5 for TRUE to see the Last Week to This Week Changes.

--
--Thomas [PBD]
Working hard to make working easy.
Answered your question? Click ''''Yes'''' below.


"steve grosz" wrote:

Ok here's my situation. I'm not much of a VB programmer, but wanted to try
something.

We generate a worksheet once a week that has 4 columns.

Col1 - name
Col2 - last weeks position (a number value)
Col3 - this weeks position (a number value)
Col4 - size

I would like to compare col 2 & 3, and if col1 is larger, display a image,
if col2 is large, display a different image in a cell on the same sheet.

How can I accomplish this? Loop through all the users, compare the values
of col2 & 3 for each of them and display a image in a seperate cell, say
col 5??

Any help on this would be greatly appreciated!!!!

Thanks!
Steve