Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Type Mismatch error & subscript out of range error
Greetings all,
I'm having trouble with the following routine. If I run it as shown below, I get a runtime error 9, "Subscript out of range." If I change the "dim" statement to "Dim i(5) as Integer", I get a "type mismatch" error. Can anyone help me with this? Thanks! Jeff Sub DTRA() Dim i As Integer For i = 1 To 5 Workbooks("Test").Worksheets("Sheet2").Cells(i, 1) = _ Workbooks("Test").Worksheets("Sheet1").OLEObjects _ ("Optionbutton" & i).Object.Value Next i End Sub |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Type Mismatch error & subscript out of range error
I guess it is the workbook
Sub DTRA() Dim i As Integer For i = 1 To 5 Workbooks("Test.xls").Worksheets("Sheet2").Cells(i , 1) = _ Workbooks("Test.xls").Worksheets("Sheet1").OLEObje cts _ ("Optionbutton" & i).Object.Value Next i End Sub -- HTH RP (remove nothere from the email address if mailing direct) "Jeff Wright" wrote in message news:bVohe.40944$_K.39114@fed1read03... Greetings all, I'm having trouble with the following routine. If I run it as shown below, I get a runtime error 9, "Subscript out of range." If I change the "dim" statement to "Dim i(5) as Integer", I get a "type mismatch" error. Can anyone help me with this? Thanks! Jeff Sub DTRA() Dim i As Integer For i = 1 To 5 Workbooks("Test").Worksheets("Sheet2").Cells(i, 1) = _ Workbooks("Test").Worksheets("Sheet1").OLEObjects _ ("Optionbutton" & i).Object.Value Next i End Sub |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Type Mismatch error & subscript out of range error
Hmmm, I wasn't looking for the blatantly obvious. Thanks for your quick
response, Bob. Guess I should have another cup of coffee before proceeding with further work. Jeff "Bob Phillips" wrote in message ... I guess it is the workbook Sub DTRA() Dim i As Integer For i = 1 To 5 Workbooks("Test.xls").Worksheets("Sheet2").Cells(i , 1) = _ Workbooks("Test.xls").Worksheets("Sheet1").OLEObje cts _ ("Optionbutton" & i).Object.Value Next i End Sub -- HTH RP (remove nothere from the email address if mailing direct) "Jeff Wright" wrote in message news:bVohe.40944$_K.39114@fed1read03... Greetings all, I'm having trouble with the following routine. If I run it as shown below, I get a runtime error 9, "Subscript out of range." If I change the "dim" statement to "Dim i(5) as Integer", I get a "type mismatch" error. Can anyone help me with this? Thanks! Jeff Sub DTRA() Dim i As Integer For i = 1 To 5 Workbooks("Test").Worksheets("Sheet2").Cells(i, 1) = _ Workbooks("Test").Worksheets("Sheet1").OLEObjects _ ("Optionbutton" & i).Object.Value Next i End Sub |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Type Mismatch error & subscript out of range error
Hi Jeff,
make sure it is black and it is strong ... :-) Bob "Jeff Wright" wrote in message news:tWphe.40947$_K.2193@fed1read03... Hmmm, I wasn't looking for the blatantly obvious. Thanks for your quick response, Bob. Guess I should have another cup of coffee before proceeding with further work. Jeff "Bob Phillips" wrote in message ... I guess it is the workbook Sub DTRA() Dim i As Integer For i = 1 To 5 Workbooks("Test.xls").Worksheets("Sheet2").Cells(i , 1) = _ Workbooks("Test.xls").Worksheets("Sheet1").OLEObje cts _ ("Optionbutton" & i).Object.Value Next i End Sub -- HTH RP (remove nothere from the email address if mailing direct) "Jeff Wright" wrote in message news:bVohe.40944$_K.39114@fed1read03... Greetings all, I'm having trouble with the following routine. If I run it as shown below, I get a runtime error 9, "Subscript out of range." If I change the "dim" statement to "Dim i(5) as Integer", I get a "type mismatch" error. Can anyone help me with this? Thanks! Jeff Sub DTRA() Dim i As Integer For i = 1 To 5 Workbooks("Test").Worksheets("Sheet2").Cells(i, 1) = _ Workbooks("Test").Worksheets("Sheet1").OLEObjects _ ("Optionbutton" & i).Object.Value Next i End Sub |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Visual Basic Error Run Time Error, Type Mismatch | Excel Discussion (Misc queries) | |||
xpath error? Runtime Error 13 type mismatch | Excel Discussion (Misc queries) | |||
xpath error? Runtime Error 13 type mismatch | Excel Discussion (Misc queries) | |||
type mismatch error | Excel Programming | |||
Befuddled with For Next Loop ------ Run - Time Error '13' Type Mismatch Error | Excel Programming |