Find a last row and insert a values

[Hudson]

Hi all ,

I have one quick question is there a way we can find a last empty cell in the column and insert a value from there for example .

Lets say i have 50 names and i wanted to be inserted at the last empty cell in a column assume in Coumn " A" A15 is empty and from A15 i wanted fifty names to be inserted next time A20 from there i wanted names to be inserted .

is there a way we can do that ?.

thank !

[mana]

Where is the list of 50 names?

[Hudson]

Hi Mana, thanks for your reply .

and the list of names would be in the same work book in next sheet and Please find below list of names it has duplicates though but its my ideal list of.

Rekha Reddy

Supriya Patel

Lubna Minhaj

Tandon, Ritesh

Tandon, Ritesh

Tandon, Ritesh

Tandon, Ritesh

Tandon, Ritesh

Ayesha Bose

Christine Margret

Ayesha Bose

Tandon, Ritesh

Ayesha Bose

Ayesha Bose

Ayesha Bose

Y Lalitha

Tandon, Ritesh

Tandon, Ritesh

Tandon, Ritesh

Tandon, Ritesh

Ayesha Bose

Tandon, Ritesh

Tandon, Ritesh

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

Y Lalitha

[mana]

Sorry, your english is difficult for me.
I can't guess your expected result.
Please upload your workbook.

[Hudson]

Hi Friend , i am sorry my be i was not clear with what i was asking anyways here is the attached file , what i wanted is i wanted 50 names from sheet "My fifty names". to be copied and pasted in "summary" sheet in column "A" from last empty cell .

did i make it clear now ?.

thanks

[Hudson]

Hey mana, any luck with my request does my request make sense , i know its a simple one though , but it will help in doing a frequent job automated !

let me know if you need anything else ?.

[jolivanes]

Is this what you mean?

Sub Maybe()
    Sheets("My fifty names").Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row).Copy Sheets("summary").Cells(Rows.Count, 1).End(xlUp).Offset(1)
End Sub

[jolivanes]

No answer. Does that mean "Yes", "No" or "Maybe"