导出Excel的时候报错，

导出Excel的时候报错，请指教。
 
Print |xlsheet.Cells(|+Cstr(i)+|,1).Value="|+doc.AAAA(0)+|";| 
 
导出视图文档，这种方法导出Excel的时候，如果有文档中的AAA字段里面有引号就会出错。。。 
怎么处理下比较好？


------解决方案--------------------
Print |xlsheet.Cells(|+Cstr(i)+|,1).Value="|+Replace(doc.AAAA(0),"""","\""")+|";|