An upper bound for the Waring rank of a form