I need to write this formula in basic

[canvas]

Hi!

Does anyone know how to write this formula in Basic. I need to make it
work in Openoffice because Excel seems to crash with a list of 20000
people.

=IF(ISERROR(VLOOKUP((RC1&R1C),Sheet1!R2C1:R45000C4,4,0)),"""",VLOOKUP
((RC1&R1C),Sheet1!R2C1:R45000C4,4,0))

Thanks!!