导出Excel的时候报错，请指教。

Print |xlsheet.Cells(|+Cstr(i)+|,1).Value="|+doc.AAAA(0)+|";|

导出视图文档，这种方法导出Excel的时候，如果有文档中的AAA字段里面有引号就会出错。。。
怎么处理下比较好？


[解决办法]
Print |xlsheet.Cells(|+Cstr(i)+|,1).Value="|+Replace(doc.AAAA(0),"""","\""")+|";|