请问如何用vba代码导出带逗号分隔符的txt文本文件

crlcn

比如有表名叫 表1 如下
姓名 数学 语文 英语
张一    75     60     65
李二    80     75     60
王三    60     75     89
想导出如下样子
张一,75,60,65
李二,80,75,60
王三, 60,75 ,89
请问vba代码该如何填写啊 如下新建按钮 测试 ：
Private Sub 测试_Click()
????????????????????????????????????????
End Sub