Hi All,
I am trying to automate some tedious tasks.
Basically, if the values on Col A match (VBtextcompare) and values in Col D net off to something around abs(.1), I would like to highlite the entire row. I unable to write something like that. Here is what I have so far, but I have to do the selection, which is pointless.
Global lastsum As Long
Sub Copy()
For Each cell In Selection
lastsum = Application.WorksheetFunction.Sum(Selection.Value)
If lastsum< 0.1 Then cell.EntireRow.Delete
Next
End Sub
Here is the problem. It's not limited 4 lines all sheets
Thanks,
Bablu
I am trying to automate some tedious tasks.
Basically, if the values on Col A match (VBtextcompare) and values in Col D net off to something around abs(.1), I would like to highlite the entire row. I unable to write something like that. Here is what I have so far, but I have to do the selection, which is pointless.
Global lastsum As Long
Sub Copy()
For Each cell In Selection
lastsum = Application.WorksheetFunction.Sum(Selection.Value)
If lastsum< 0.1 Then cell.EntireRow.Delete
Next
End Sub
Here is the problem. It's not limited 4 lines all sheets
06302010 CSFB CASH REC- Galbraith Global Strategies Master Fund (300147).xls | |||||||||
---|---|---|---|---|---|---|---|---|---|
A | B | C | D | E | F | G | |||
16 | Difference explanation | ||||||||
17 | Security Name/Description | Ticker | Cusip / Sedol | Amount | Geneva ID nr | Settlem. Date | Remarks | ||
18 | |||||||||
19 | Entries on broker statement, not in geneva | ||||||||
20 | |||||||||
21 | ABB LTD | 7108899 | 28,060.89 | Jun-08-2010 | |||||
22 | NOVARTIS AG REG SHS | 7103065 | 42,791.18 | Jun-08-2010 | |||||
23 | |||||||||
24 | |||||||||
25 | |||||||||
26 | Entries in Geneva, not in broker statement | ||||||||
27 | |||||||||
28 | |||||||||
29 | |||||||||
30 | NOVARTIS AG - | (42,791.20) | 32452641 | 6/8/2010 | |||||
31 | ABB LTD - | (28,060.90) | 32452688 | 6/8/2010 | |||||
32 | |||||||||
33 | |||||||||
34 | Total reconciled | (0.03) | |||||||
35 | |||||||||
36 | Unexplained difference | 35.40 | N.M | ||||||
CHF GGO |
Thanks,
Bablu