• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

object doesn't support this property or method - error

call2shree

New Member
Hi Experts

When I run the below code found the error as "object doesn't support this property or method"
From RAW data sheet , column A contains 12121 move to 12121 sheet.

please help

Code:
Sub cureent()
a = Worksheets("RAW").Cells(Rows.Count, 1).End(xlUp).Row
For i = 2 To a
If Worksheets("RAW").Cells(i, 1).Value = "12121" Then
Worksheets("RAW").Row(i).Copy
Worksheets("12121").Activate
b = Worksheets("12121").Cells(Rows.Count, 1).End(xlUp).Row
Worksheets("12121").Cells(b + 1, 1).Select
activatesheet.Paste
Worksheets("12121").Activate
End If
Next
Application.CutCopyMode = False
ThisWorkbook.Worksheets("12121").Cells(1, i).Select

End Sub
 
Last edited by a moderator:
Hi ,

This line of code :

activatesheet.Paste

should read :

ActiveSheet.Paste

unless this is just a typographical error , and your actual code is correct.

When discussing VBA errors , always highlight the line of code which has generated the error.

Narayan
 
Hi ,

You can do two things to help others help you :

1. Highlight the line of code which is generating the error

2. Upload your workbook with the data and code in it.

Narayan
 
Hi ,

This line may be the problem :

Worksheets("RAW").Row(i).Copy

The code should be :

Worksheets("RAW").Rows(i).Copy

which uses the .Rows property instead of the .Row

Narayan
 
Back
Top