Sub Button4_Click()

Sheets("Calculations").Select
Dim curdate As String
Dim predate As String
curdate = Range("F18").Value
predate = Range("F17").Value
Workbooks.Open Filename:= _
"S:\ New\New Business All.xls"
Range("C3").Select
ActiveCell.FormulaR1C1 = "predate"
Range("D3:G3").Select
ActiveCell.FormulaR1C1 = "curdate"

This is the beginning part of a macro, if I have €œ around predate and
curdate they show as those words, when I dont they get put as 0.

Currently the values of these are April in F18 (curdate) and March in F17
(predate)