Sub constDec() Const dialogName = "Enter Data" Const slsTax = 8.5 Const Discount = 0.5 Const ColorIdx = 3 MsgBox slsTaxEnd Sub