VBA Code to auto copy data from one sheet to another

[Angnz]

Hi

I am trying to get a simple code that automaticly copies data to another sheet if I put a W in Column 12 at the moment I am using the code below but I think it is slowing the opening and closing of my spreadsheet has anyone got a better one. If they have I also need a version of it that moves it to another sheet and removes copy on current sheet I have put the 2 examples below.

Copy Only - If W in colunm 12 copy complete row to sheet 3

Please Login or Register  to view this content.

Copy and Delete from orginal- If F in colunm 13 copy to sheet4

Please Login or Register  to view this content.

Any ideas or code would be much appricated

Angela

[alansidman]

Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE]Please [url=https://www.excelforum.com/login.php]Login or Register [/url] to view this content.[/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here



(This thread should receive no further responses until this moderation request is fulfilled, as per Forum Rule 7)

[HaHoBe]

Hi, Angela,

maybe combnine the two precedures into one like this:

Please Login or Register  to view this content.

but I think it is slowing the opening and closing of my spreadsheet

Are there other events involved or a lot of formulas? AFAIK the mentioned event itself doesn´t have any influence on what you mentioned.

Ciao,
Holger

[Angnz]

Hi Holger

There is not a lot of formula in the sheets put I am going to open a new workbook and try add each part to see why it is taking a long time to open and close.
Re your code it looks good but what I didn't tell you was the first piece of code goes in Sheet 1 and the second piece of code goes in the other sheets

Sheet 1 and that data needs to stay there when I put the W in column 12 and it transfer to Sheet2

Sheet 2 which I need the data to be there until I put an F in column 13 it moves the data to Sheet3 and deletes from Sheet2

Sheet3 which I need the data to be there until I put a C in column 14 it moves the data to Sheet 4 and deletes it from Sheet3

I hope you can understand this.

Angela

[HaHoBe]

Hi, Angela ,

instead fo using Worksheet_Change for this I would think about using Worksheet_Activate-Event for any sheet to trigger the code when that sheet is activated (maybe use a public boolean to see if any change has been made in Sheet1 in order to avoid unnecessary copying/cutting) depending upon if you only need the data for keeping or will work with data from each individual sheet from another part/code.

Ciao,
Holger

[Angnz]

Hi Holger

I am not that good with codes could you help me with this or tell me which lines I need to changes. Only the data in Sheet 1 the master sheet needs to copy and not delete. Sheet 2 and 3 need to copy the then delete.

Thanks Angela