art = ActiveCell(1, 1).Value
des = ActiveCell(1, 3).Value

If ActiveSheet.Range("A6").Value = "" Then

Worksheets("Label-s").Range("A7").Value = _
"the price is" & art & des
End If

--
Regards,
Tom Ogilvy


"cliee cliee" wrote in message
...
I want to make a condition ( if the cell is empty) to do something......

If ActiveSheet.Range("A6").Value = 0 Then .......

value = 0 do not mean the cell is empty

do you know how ?

thanks


*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!