Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Run Time error 13
Hello!
I am a novice at VBA, in fact I'm still reading how to use it but I am unfortunately responsible for running several VBA (macro) files producing many reports weekly and monthyl. Here is my porblem; I am running a macro which is joining 3 Excel files, using Excel 2003, and the Runtime Error 13 - type mismatch is the error I am getting. See pasted code below; Sub HAWB_Text_Converter(CUR As String) Dim CUR2 As String, CELL As Range CUR2 = Cells(65536, Range(CUR).Column).End(xlUp).Address Range(CUR, CUR2).Select Range(CUR).Activate For Each CELL In Selection CELL.NumberFormat = "@" CELL.Value = CMS(CELL.Value) Next CELL ActiveCell.Select End Sub Can anyone advise how I can determine if this is a data issue, a logic issue or other? I would really love to debug this without "bugging" my boss. He is busy with the corporate VPs and P in town. Thanks!! GTU_108 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Run Time error 13
What line is it crashing. What is the value of CUR when it crashes...
-- HTH... Jim Thomlinson "GTU_108" wrote: Hello! I am a novice at VBA, in fact I'm still reading how to use it but I am unfortunately responsible for running several VBA (macro) files producing many reports weekly and monthyl. Here is my porblem; I am running a macro which is joining 3 Excel files, using Excel 2003, and the Runtime Error 13 - type mismatch is the error I am getting. See pasted code below; Sub HAWB_Text_Converter(CUR As String) Dim CUR2 As String, CELL As Range CUR2 = Cells(65536, Range(CUR).Column).End(xlUp).Address Range(CUR, CUR2).Select Range(CUR).Activate For Each CELL In Selection CELL.NumberFormat = "@" CELL.Value = CMS(CELL.Value) Next CELL ActiveCell.Select End Sub Can anyone advise how I can determine if this is a data issue, a logic issue or other? I would really love to debug this without "bugging" my boss. He is busy with the corporate VPs and P in town. Thanks!! GTU_108 |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Run Time error 13
And what does CMS() do?
GTU_108 wrote: Hello! I am a novice at VBA, in fact I'm still reading how to use it but I am unfortunately responsible for running several VBA (macro) files producing many reports weekly and monthyl. Here is my porblem; I am running a macro which is joining 3 Excel files, using Excel 2003, and the Runtime Error 13 - type mismatch is the error I am getting. See pasted code below; Sub HAWB_Text_Converter(CUR As String) Dim CUR2 As String, CELL As Range CUR2 = Cells(65536, Range(CUR).Column).End(xlUp).Address Range(CUR, CUR2).Select Range(CUR).Activate For Each CELL In Selection CELL.NumberFormat = "@" CELL.Value = CMS(CELL.Value) Next CELL ActiveCell.Select End Sub Can anyone advise how I can determine if this is a data issue, a logic issue or other? I would really love to debug this without "bugging" my boss. He is busy with the corporate VPs and P in town. Thanks!! GTU_108 -- Dave Peterson |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Run Time error 13
IF the error is on this line:
CELL.Value = CMS(CELL.Value) try changing it to CELL.Value = CMS(CELL.Text) Make sure CUR is a string value when it is passed to HAWB_Text_Converter -- Regards, Tom Ogilvy "Dave Peterson" wrote in message ... And what does CMS() do? GTU_108 wrote: Hello! I am a novice at VBA, in fact I'm still reading how to use it but I am unfortunately responsible for running several VBA (macro) files producing many reports weekly and monthyl. Here is my porblem; I am running a macro which is joining 3 Excel files, using Excel 2003, and the Runtime Error 13 - type mismatch is the error I am getting. See pasted code below; Sub HAWB_Text_Converter(CUR As String) Dim CUR2 As String, CELL As Range CUR2 = Cells(65536, Range(CUR).Column).End(xlUp).Address Range(CUR, CUR2).Select Range(CUR).Activate For Each CELL In Selection CELL.NumberFormat = "@" CELL.Value = CMS(CELL.Value) Next CELL ActiveCell.Select End Sub Can anyone advise how I can determine if this is a data issue, a logic issue or other? I would really love to debug this without "bugging" my boss. He is busy with the corporate VPs and P in town. Thanks!! GTU_108 -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Visual Basic Error Run Time Error, Type Mismatch | Excel Discussion (Misc queries) | |||
Run time error '1004': Generaol ODBC error | Excel Programming | |||
Run time error 1004 General ODCB Error | Excel Programming | |||
Befuddled with For Next Loop ------ Run - Time Error '13' Type Mismatch Error | Excel Programming | |||
Code Error - Run Time Error 5 (Disable Cut, Copy & Paste) | Excel Programming |