This example clears the formulas from cells A1:G37 on Sheet1 but leaves the formatting intact.
Worksheets("Sheet1").Range("A1:G37").ClearContents
This example clears the chart data from Chart1 but leaves the formatting intact.
Charts("Chart1").ChartArea.ClearContents