ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)
-   -   copying row (https://www.excelbanter.com/excel-discussion-misc-queries/246353-copying-row.html)

nishkrish

copying row
 
when i input a value in certain in column e1 i want that row to be copied to
a different worksheet on a perticular sheet.

i have a woorksheet name activity in column e i input agent no. i have
different worksheet called agent in that worksheet ihave tabs 1,2,3,4, and so
on till 100 i want when i input say no. 5 in activity sheet in column e the
data for that row ranganging from column a to aa should be copied to
worksheet agent.

is it posibble?
--
Nisha P

rajan deshpande

data entering
 
simply use macro. copy the row open your sheet where you want to paste.
place this code in thisworkbook & worksheet change event targeted to e1 cell.
rajan



nishkrish wrote:

copying row
22-Oct-09

when i input a value in certain in column e1 i want that row to be copied to
a different worksheet on a perticular sheet.

i have a woorksheet name activity in column e i input agent no. i have
different worksheet called agent in that worksheet ihave tabs 1,2,3,4, and so
on till 100 i want when i input say no. 5 in activity sheet in column e the
data for that row ranganging from column a to aa should be copied to
worksheet agent.

is it posibble?
--
Nisha P

Previous Posts In This Thread:

EggHeadCafe - Software Developer Portal of Choice
BOOK REVIEW: Silverlight 2 Unleashed / Bugnion [SAMS]
http://www.eggheadcafe.com/tutorials...lverlight.aspx

muddan madhu

copying row
 
I assumed you has 1 to 100 sheets.

in sheet1 col E, if you input value between 2 to 100 in any of the col
E row,
then from cell A:AA needs to copied and paste into respecitve sheets.

right click on sheet name, view code and paste the below code

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Target.Column < 5 Or Target.Value = "" Then Exit Sub
A = ActiveSheet.Name
T = Target.Value
rowl = Target.Row
Rng = Sheets(T).Cells(Rows.Count, "A").End(xlUp).Row
Range("A" & rowl & ":AA" & rowl).Copy Sheets(T).Range("A" & Rng + 1)
Sheets(A).Select
Application.CutCopyMode = False

End Sub






On Oct 23, 7:20*am, nishkrish
wrote:
*when i input a value in certain in column e1 i want that row to be copied to
a different worksheet on a perticular sheet.

i have a woorksheet name activity in column e i input agent no. i have
different worksheet called agent in that worksheet ihave tabs 1,2,3,4, and so
on till 100 i want when i input say no. 5 in activity sheet in column e the
data for that row ranganging from column a to aa should be copied to
worksheet agent.

is it posibble?
--
Nisha P




All times are GMT +1. The time now is 08:57 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com