View Single Post
  #3   Report Post  
Posted to microsoft.public.excel.programming
Patrick Molloy[_2_] Patrick Molloy[_2_] is offline
external usenet poster
 
Posts: 1,298
Default Type Mismatch with 2 Variables

I think your declarations are ok
what values do you have in dp and pn when you step thorugh the code?

I get this formula
=IF(COUNT(RPN),LOOKUP(MIN(RPN),RPN,Worksheet!A:A), LOOKUP(IF(COUNTA(RPN),RPN,Worksheet!A:A),"",""))

which matches yours when
worksheet!Dept := Worksheet!A:A
Dashboard!Contract := RPN





"Ryan" wrote:

Hi...I'm trying to fill in a cell with the formula:
=IF(COUNT(RPM),LOOKUP(MIN(RPM),RPM,Worksheet!A:A), LOOKUP(IF(COUNTA
(RPM),RPM,Worksheet!A:A),"",""))

My Dept range = A:A
My RPM range = a column on another sheet

I was able to get this working before with a single variable declared,
then when I realized I needed a second variable I started getting a
type mismatch error. Are you allowed to declare 2 variables like I
did? I'm not sure why I can't get this working. Any help would be
greatly appreciated. Thanks!

-----------------------------------------------------------------------

Sub test()

Dim dp As String
Dim pn As String

dp = Sheets("Worksheet").Range("Dept").Value
pn = Sheets("Dashboard").Range("Contract").Value

Sheets("Dashboard").Range("Notes").Offset(0, 1).Select

ActiveCell.FormulaR1C1 = "=IF(COUNT(" & pn & "),LOOKUP(MIN(" & pn &
")," & pn & "," & dp & "),LOOKUP(IF(COUNTA(" & pn & ")," & pn & "," &
dp & "),"""",""""))"

End Sub

---------------------------------------------------------------------------
.