-
November 12th, 2013, 03:58 AM
#1
Run time error 13
but showing run-time error 13
'The process for Removing duplicates rows in excel files using vb 6.0
Code:
Mrg_Row = wsN.UsedRange.Rows.Count
Mrg_Col = wsN.UsedRange.Columns.Count
Dim k As Long
For i = 2 To Mrg_Row
Form2.Caption = "Removing duplicates pleas wiat..." & i
If wsN.Range(wsN.Cells(1, 1), wsN.Cells(1, Mrg_Col)).Value = wsN.Range(wsN.Cells(i, 1), wsN.Cells(i, Mrg_Col)).Value Then
wsN.Range(wsN.Cells(i, 1), wsN.Cells(i, Mrg_Col)).Delete
End If
Next
What is error in this plz help me
Last edited by GremlinSA; November 14th, 2013 at 03:19 AM.
Reason: added code tags
-
November 12th, 2013, 08:50 AM
#2
Re: Run time error 13
Which line is throwing the error?
Error 13 "Type Mismatch" means that you are mixing two types of variables/data that do not mix
Like for example if you try to put an alpha value into a numeric variable or a non date value into a date variable
Can't tell much from what you posted as the only var that is dimmed is k and that one is not used in that piece of code
Always use [code][/code] tags when posting code.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|