dim smsg
with activesheet
if .range("A1").value<"" then
smsg=.range("A1").value
elseif .range("A2").value<"" then
smsg=.range("A2").value
end if
.range("A3").value=smsg
end with

--
Regards
Frank Kabel
Frankfurt, Germany

John wrote:
HI

I think that is it, but i forgot to mention that if one of the cells
has a dollar amount in it, it needs to put that dollar amount into a
different cell, say A3, instead of the message box

"Frank Kabel" wrote:

Hi
do you mean

dim smsg
with activesheet
if .range("A1").value<"" then
smsg=.range("A1").value
elseif .range("A2").value<"" then
smsg=.range("A2").value
end if
end with
msgbox smsg

--
Regards
Frank Kabel
Frankfurt, Germany
"John" schrieb im Newsbeitrag
...
I am trying to write a macro where if cell A1 has a dollar amount
put that cell, however if cell A2 has a dollar amount put that
cell. There only can
be one dollar amount, meaning you can have dollar amounts in cells
A1 and A2.
This also has to be a macro. Any help would be great