Dim cell As Range, str As String * 200: str = "( "
Dim val As String * 200

For Each cell In rawData.UsedRange.Cells
    val = cell.Value
    str = str & Chr(34) & val & Chr(34) & ", "
    Debug.print str, val
Next