I need to write a macro for excel to do the following.

If cell d(n) is "" the copy r(n) into d(n).

anyone know what sub needs to be written?

Cheers

EggHeadCafe - Software Developer Portal of Choice
COM+ Services Overhead in .NET
http://www.eggheadcafe.com/tutorials...erhead-in.aspx

Perhaps the description of what actually needs to be done could be a
bit better but from what you've posted - something like this could be
a start:

Sub PutOneCellValueIntoAnother()
Dim rngTarget as Range
'Here it's assumed that your d(n) is Range("A1") and your r(n) is
Range("A2").

Set rngTarget = Range("A1")

if rngTarget.value="" then rngTarget.value=Range("A2").value

End Sub

But as above - you'd need to describe better what you actually need to
get more meaningfull advices here.

On Nov 27, 2:48*pm, Robert Bloom wrote:
I need to write a macro for excel to do the following.

If cell d(n) is "" the copy r(n) into d(n).

anyone know what sub needs to be written?

Cheers

EggHeadCafe - Software Developer Portal of Choice
COM+ Services Overhead in .NEThttp://www.eggheadcafe.com/tutorials/aspnet/aab197cf-64da-4233-9819-0...