Macro Help

[JoeMoneyOU]

My project has to deal with looking up different project numbers. On my Finance sheet, there are project numbers assigned to different project. I have 12 other worksheets according to month but once I enter in a new project number on my Finance sheet, I want a macro to run and add that new project number to the month sheets by entering in a new row. Any help on doing that??

 

[ravishankar]

HI
Try the following codes

sub add()
Dim x as integer, a as integer,y as integer
dim b as string
x= worksheets("sheet1").cells*(rows.count,1).end(xlUP).row
b= cells(x,1)
for a = 2 to sheets.count
y= worksheets(a).cells*(rows.count,1).end(xlUP).row
worksheets(a).cells(y+1) = b
next a
end sub

Run the macro. it will copy the last project name in col A to all sheets.
Ravi