Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Type Mismatch Error
I get a type mismatch error on Set rng1 = rng(res, 5) How do I fix this? Thanks Jody Private Sub CommandButtonPriceNext_Click() Dim rng As Range, rng1 As Range, res As Variant Set rng = Range("PriceBookDatabase") res = Application.VLookup(Label1stICLabel.Caption, rng, 1, False) If Not IsError(res) Then Set rng1 = rng(res, 5) rng1.Value = Me.TextBoxGradeA_RetailValue.Text End If MultiPage2.Value = 15 End Su -- ssjod ----------------------------------------------------------------------- ssjody's Profile: http://www.excelforum.com/member.php...fo&userid=3339 View this thread: http://www.excelforum.com/showthread.php?threadid=56780 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Type Mismatch Error
Try
Set rng1 = Cells(res, 5) assuming res is a valid number -- HTH Bob Phillips (replace somewhere in email address with gmail if mailing direct) "ssjody" wrote in message ... I get a type mismatch error on Set rng1 = rng(res, 5) How do I fix this? Thanks Jody Private Sub CommandButtonPriceNext_Click() Dim rng As Range, rng1 As Range, res As Variant Set rng = Range("PriceBookDatabase") res = Application.VLookup(Label1stICLabel.Caption, rng, 1, False) If Not IsError(res) Then Set rng1 = rng(res, 5) rng1.Value = Me.TextBoxGradeA_RetailValue.Text End If MultiPage2.Value = 15 End Sub -- ssjody ------------------------------------------------------------------------ ssjody's Profile: http://www.excelforum.com/member.php...o&userid=33398 View this thread: http://www.excelforum.com/showthread...hreadid=567801 |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Type Mismatch Error
Hi Bob, I changed Set rng1 = rng(res, 5) to the below and I still get the Typ Mismatch Error. res is a valid number. Any other Ideas? Thanks Jody Private Sub CommandButtonPriceNext_Click() Dim rng As Range, rng1 As Range, res As Variant Set rng = Range("PriceBookDatabase") res = Application.VLookup(Label1stICLabel.Caption, rng, 1, False) If Not IsError(res) Then Set rng1 = Cells(res, 5) rng1.Value = Me.TextBoxGradeA_RetailValue.Text End If MultiPage2.Value = 15 End Su -- ssjod ----------------------------------------------------------------------- ssjody's Profile: http://www.excelforum.com/member.php...fo&userid=3339 View this thread: http://www.excelforum.com/showthread.php?threadid=56780 |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Type Mismatch Error
What's is res at this point? Add Msgbox res to see it.
-- HTH Bob Phillips (replace somewhere in email address with gmail if mailing direct) "ssjody" wrote in message ... Hi Bob, I changed Set rng1 = rng(res, 5) to the below and I still get the Type Mismatch Error. res is a valid number. Any other Ideas? Thanks Jody Private Sub CommandButtonPriceNext_Click() Dim rng As Range, rng1 As Range, res As Variant Set rng = Range("PriceBookDatabase") res = Application.VLookup(Label1stICLabel.Caption, rng, 1, False) If Not IsError(res) Then Set rng1 = Cells(res, 5) rng1.Value = Me.TextBoxGradeA_RetailValue.Text End If MultiPage2.Value = 15 End Sub -- ssjody ------------------------------------------------------------------------ ssjody's Profile: http://www.excelforum.com/member.php...o&userid=33398 View this thread: http://www.excelforum.com/showthread...hreadid=567801 |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Type Mismatch Error
Hi Bob, Thanks for the help. res at this point is "IC# 65033A" Jod -- ssjod ----------------------------------------------------------------------- ssjody's Profile: http://www.excelforum.com/member.php...fo&userid=3339 View this thread: http://www.excelforum.com/showthread.php?threadid=56780 |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Type Mismatch Error
Well, there is your problem. You are trying to pass that as a row number,
which it isn't, so it fails. -- HTH Bob Phillips (replace somewhere in email address with gmail if mailing direct) "ssjody" wrote in message ... Hi Bob, Thanks for the help. res at this point is "IC# 65033A" Jody -- ssjody ------------------------------------------------------------------------ ssjody's Profile: http://www.excelforum.com/member.php...o&userid=33398 View this thread: http://www.excelforum.com/showthread...hreadid=567801 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Visual Basic Error Run Time Error, Type Mismatch | Excel Discussion (Misc queries) | |||
Conditional Formatting - Run Time Error '13' Type Mismatch Error | Excel Programming | |||
Help: Compile error: type mismatch: array or user defined type expected | Excel Programming | |||
type mismatch error | Excel Programming | |||
Befuddled with For Next Loop ------ Run - Time Error '13' Type Mismatch Error | Excel Programming |