View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Nena[_2_] Nena[_2_] is offline
external usenet poster
 
Posts: 20
Default VLOOKUP and then some

THANKS!


On Aug 21, 2:58 pm, Dave Peterson wrote:
That first formula looks funny to me, especially the ,FALSE)0))" portion.

And maybe...
TotStudentstotcrn2006a("C:C").AdvancedFilter
should be:
TotStudentstotcrn2006a.range("C:C").AdvancedFilter

But that's a guess.

I'd record a macro when I did it manually and look at the code.





Nena wrote:

I would like to remove the N/A's and replace them with a 0 but none of
these macros seem to be working properly. Two problems that I
encountered is that is (1) the macro does run but by replacing all the
cells with a 0 (2) it does not stay within the data range, so it runs
through all the cells.


ActiveCell.FormulaR1C1 = "=IF(COUNTIF(RC[-5],'Fall 2006 Cohort'!
R2C1:R65536C28,13,)) VLOOKUP(RC[-5],'Fall 2006 Cohort'!
R2C1:R65536C28,13,FALSE)0))"
ActiveCell.Offset(0, 1).Select


Active.FormulaR1C1 = "=IF(ISERROR(VLOOKUP(RC[-5],'Fall 2006 Cohort'!
R2C1:R65536C28,13,FALSE)),0,VLOOKUP(RC[-5],'Fall 2006 Cohort'!
R2C1:R65536C28,13,FALSE))"
ActiveCell.Offset(0, 1).Select


This one doesn't seem to want to run at all...


TotStudentstotcrn2006a("C:C").AdvancedFilter _
Action:=xlFilterCopy, _
CopyToRange:=Sheet1.Range("A6"), _
Unique:=True


Any suggestions?


Thanks in advance!


--

Dave Peterson- Hide quoted text -

- Show quoted text -