Multiple Criteria - Vlookup for numerical values

I have the following 'numerical values'

25 1000 0.01 1
30 1000 0.01 1
35 1000 0.01 1.3
25 1800 0.03 2.5
30 1800 0.04 3
35 1800 0.04 3.7
25 3000 0.12 5.5
30 3000 0.14 5.8
35 3000 0.17 6.2

With the first two values as criterias, I need to find the 3rd and 4th value
Example: If I have the criteria as 30 and 1800 , I should get the result as 0.04and 3

Thanks for your reply
It worked !! I was exactly looking for this solution .

Now, how do I put this in form of a VBA code ?
Can I use <Application.WorksheetFunction.Lookup> and specify ranges?

DO,isn't ther a parenthesis missing ?

=LOOKUP(2,1/(($A$1:$A$9=30)*($B$1:$B$9=1800)),C$1:C$9)

The two values are got as an input from the user and I want the macro to lookup for values and return the results

Example : User enters values 30 and 1800 in say e2 and f2 cells
I want the VBA code to check for the values and put it in say g2 and h2

I am securing the main table values from the user (the array basically)

In the formula, there is any "array" and the user would easily comes to know the values in the table (to be secured). Hence it wouldn't be appropriate to mention it in the formula which can be visible.

The VBA code would be required as I am going to link 2 workbooks. Workbook with the standard table, and workbook where user inputs values..

I tried the following in VBA code

Dim ScHeatgen as Integer
Dim SourceWB2 As Workbook

ScHeatgen = Application.WorksheetFunction.Lookup(2, 1 / ((SourceWB2.Worksheets(1).Range("a1:a55") = 30) * (SourceWB2.Worksheets(1).Range("b1:b55") = 1800)), SourceWB2.Worksheets(1).Range("c1:c55"))

I tried to replace 30 and 1800 with variables, it still didn't work ???