Hi Everyone
I'm trying to do this:
"Lookup last entry in Colomn C on "Input sheet" find Tab with same name then
copy last row from Input sheet to that Tab below last entry.
I don't know if its clear but it's way over my head.
Hope someone can help.
Thank you
Cimjet

On Apr 26, 6:00*pm, "Cimjet" wrote:
Hi Everyone
I'm trying to do this:
*"Lookup last entry in Colomn C on "Input sheet" find Tab with same name then
copy last row from Input sheet to that Tab below last entry.
I don't know if its clear but it's way over my head.
Hope someone can help.
Thank you
Cimjet

Homework??
Record a macro while doing and clean it up.

Hi Don
"Homework" O God !!! I'm older then you , LOL "I'm retired"
I can't use the recorder, I know my question is poorly phrased, let me try to
explain.
A worksheet is filled by a Userform, Column C is the name of a Tab, there's 12
Tabs.
As each line is filled on the Input sheet, I would like to send "copy"that row
to its appropriate sheet.
So it's got to find last entry then paste below it.
Sorry if this is not better, let me know.
Cimjet


"Donald Guillett" wrote in message
...
On Apr 26, 6:00 pm, "Cimjet" wrote:
Hi Everyone
I'm trying to do this:
"Lookup last entry in Colomn C on "Input sheet" find Tab with same name then
copy last row from Input sheet to that Tab below last entry.
I don't know if its clear but it's way over my head.
Hope someone can help.
Thank you
Cimjet

Homework??
Record a macro while doing and clean it up.

Correction, you're 74, I'm 64

"Cimjet" wrote in message
...
Hi Don
"Homework" O God !!! I'm older then you , LOL "I'm retired"
I can't use the recorder, I know my question is poorly phrased, let me try to
explain.
A worksheet is filled by a Userform, Column C is the name of a Tab, there's 12
Tabs.
As each line is filled on the Input sheet, I would like to send "copy"that row
to its appropriate sheet.
So it's got to find last entry then paste below it.
Sorry if this is not better, let me know.
Cimjet


"Donald Guillett" wrote in message
...
On Apr 26, 6:00 pm, "Cimjet" wrote:
Hi Everyone
I'm trying to do this:
"Lookup last entry in Colomn C on "Input sheet" find Tab with same name then
copy last row from Input sheet to that Tab below last entry.
I don't know if its clear but it's way over my head.
Hope someone can help.
Thank you
Cimjet

Homework??
Record a macro while doing and clean it up.

On Apr 26, 6:55*pm, "Cimjet" wrote:
Correction, you're 74, I'm 64

"Cimjet" wrote in message

...



Hi Don
"Homework" O God !!! I'm older then you , LOL "I'm retired"
I can't use the recorder, I know my question is poorly phrased, let me try to
explain.
A worksheet is filled by a Userform, Column C is the name of a Tab, there's 12
Tabs.
As each line is filled on the Input sheet, I would like to send "copy"that row
to its appropriate sheet.
So it's got to find last entry then paste below it.
Sorry if this is not better, let me know.
Cimjet

"Donald Guillett" wrote in message
....
On Apr 26, 6:00 pm, "Cimjet" wrote:
Hi Everyone
I'm trying to do this:
"Lookup last entry in Colomn C on "Input sheet" find Tab with same name then
copy last row from Input sheet to that Tab below last entry.
I don't know if its clear but it's way over my head.
Hope someone can help.
Thank you
Cimjet

Homework??
Record a macro while doing and clean it up.- Hide quoted text -

- Show quoted text -

Just turned 75 on income tax day. Should do it from anywhere in the
active workbook.

Sub findandcopy()
Set SS = Sheets("input sheet")
MV = SS.Cells(Rows.Count, "c").End(xlUp).Row
MS = SS.Cells(MV, "C")

With Sheets(MS)
LR = .Cells.Find("*", Cells(Rows.Count, Columns.Count) _
, , , xlByRows, xlPrevious).Row + 1
MsgBox LR
SS.Rows(MV).Copy .Cells(LR, "a")
End With
End Sub

Hi Don
Thank you very much, it work's perfectly.
BTW. do you remember last year, you replied to me with this message...
"Since it is the weekend and you are old you can be forgiven for the OT which
should have been labeled as OT. I'll bet you feel much better getting that
off your chest. BTW, I am only 73 years old and do free lance Excel to keep
from "getting under foot". Much of what you say is very true."

That's me, I add to change my name Eternal-September would not accept my old
name "John"
Nice to see you still helping out and "Homework" that was a compliment (-: I
felt young again
Regards
Cimjet

"Donald Guillett" wrote in message
...
On Apr 26, 6:55 pm, "Cimjet" wrote:
Correction, you're 74, I'm 64

"Cimjet" wrote in message

...



Hi Don
"Homework" O God !!! I'm older then you , LOL "I'm retired"
I can't use the recorder, I know my question is poorly phrased, let me try
to
explain.
A worksheet is filled by a Userform, Column C is the name of a Tab, there's
12
Tabs.
As each line is filled on the Input sheet, I would like to send "copy"that
row
to its appropriate sheet.
So it's got to find last entry then paste below it.
Sorry if this is not better, let me know.
Cimjet

"Donald Guillett" wrote in message
...
On Apr 26, 6:00 pm, "Cimjet" wrote:
Hi Everyone
I'm trying to do this:
"Lookup last entry in Colomn C on "Input sheet" find Tab with same name
then
copy last row from Input sheet to that Tab below last entry.
I don't know if its clear but it's way over my head.
Hope someone can help.
Thank you
Cimjet

Homework??
Record a macro while doing and clean it up.- Hide quoted text -

- Show quoted text -

Just turned 75 on income tax day. Should do it from anywhere in the
active workbook.

Sub findandcopy()
Set SS = Sheets("input sheet")
MV = SS.Cells(Rows.Count, "c").End(xlUp).Row
MS = SS.Cells(MV, "C")

With Sheets(MS)
LR = .Cells.Find("*", Cells(Rows.Count, Columns.Count) _
, , , xlByRows, xlPrevious).Row + 1
MsgBox LR
SS.Rows(MV).Copy .Cells(LR, "a")
End With
End Sub