copy to new cells if populated
 

I'd like to copy a cell to another cell within the worksheet if it's
populated with a value. How do I set that up to run by it's self instead of
having me do it individually?

copy to new cells if populated
 

Say we want to automatically copy from A1 to B9 once A1 is populated. Insert
the following event macro in the worksheet code area:

Private Sub Worksheet_Change(ByVal Target As Range)
Set a = Range("A1")
Set b = Range("B9")
Set t = Target
If Intersect(t, a) Is Nothing Then Exit Sub
If t.Value = "" Then Exit Sub
Application.EnableEvents = False
a.Copy b
Application.EnableEvents = True
End Sub


Because it is worksheet code, it is very easy to install and use:

1. right-click the tab name near the bottom of the window
2. select View Code - this brings up a VBE window
3. paste the stuff in and close the VBE window

If you save the workbook, the macro will be saved with it.

To remove the macro:

1. bring up the VBE windows as above
2. clear the code out
3. close the VBE window

To learn more about macros in general, see:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

To learn more about Event Macros (worksheet code), see:

http://www.mvps.org/dmcritchie/excel/event.htm


--
Gary''s Student - gsnu200850


"srbow" wrote:

I'd like to copy a cell to another cell within the worksheet if it's
populated with a value. How do I set that up to run by it's self instead of
having me do it individually?