enter data on 1 sheet and make it enter on next avail row on 2nd s

[Dave Peterson]

The complexity of the code (just to add to the bottom) is pretty much the same
as what you've seen. It'll get a little more complex if you want to
update/delete/add rows based on what you do on another sheet.

The complexity isn't really in the code that does the work. The complexity (I
think) is in the code that makes sure what's done is correct. (Did that make
sense??)

I find it really difficult to guess how I can screw up and make sure I can
recover. I find it almost impossible to guess how others will screw up!

I had a feeling this would be complex. "if you dont ask... you dont get".
It was worth a shot, but I can live with it.
Thank you very much for all your time, effort and consideration.

Nadia

 

[Andre Croteau]

Hi Again Dave,

I believe this must be close to the record number of threads....

I have a final(?) question regarding the original code:

The original code works well, but I would like to copy/PasteSpecialValues
from any of the 3 sheets to the "Summary" sheet

Your code has a straight "Copy / Paste" procedures, so that formulas are
also copied, which is not always the best thing to do.

Is there one last line code you can change/modify?

Thanks in advance, and also for the answer to my other question

André

 

[Dave Peterson]

If all you're interested in is the value, you could just assign the values to
the other cells.

I just kept the bottom portion that needed changing:

On Error GoTo errHandler:
Application.EnableEvents = False
destCell.Resize(1, 9).Value _
= Target.EntireRow.Resize(1, 9).Value
Target.Value = "Copied"
Beep

errHandler:
Application.EnableEvents = True

End Sub


or if you want to paste values:


On Error GoTo errHandler:
Application.EnableEvents = False
Target.EntireRow.Resize(1, 9).Copy
destCell.PasteSpecial Paste:=xlPasteValues
Target.Value = "Copied"
Application.CutCopyMode = False
Beep

errHandler:
Application.EnableEvents = True

End Sub

 

[Dave Peterson]

And I don't think it's close to the longest thread.

Even with this response! <vbg>

Hi Again Dave,

I believe this must be close to the record number of threads....

I have a final(?) question regarding the original code:

The original code works well, but I would like to copy/PasteSpecialValues
from any of the 3 sheets to the "Summary" sheet

Your code has a straight "Copy / Paste" procedures, so that formulas are
also copied, which is not always the best thing to do.

Is there one last line code you can change/modify?

Thanks in advance, and also for the answer to my other question

André

<<snipped>>

 

[Andre Croteau]

Hello Dave,

This is perfect!

Sad to see the end of the Thread!!

Happy Holidays!!

André

 

[Dave Peterson]

Glad it works for you.

(one more didn't hurt too much!)

Hello Dave,

This is perfect!

Sad to see the end of the Thread!!

Happy Holidays!!

André

 

[aria0901]

Can you send me the final code you used to do this. I cannot seem to get mine
to work. I am trying to type something in one sheet and automatically have it
available in a summary sheet in excel.

thanks!

(e-mail address removed)

 

[aria0901]

Can you send me the actual final code you used to do this? I cant seem to get
it to work.

thanks!