[求助]VBA的计算书输出问题

qflut

我想在VBA计算完成以后，将计算书输出到记事本或者word文档中。也就是计算完后自动弹出一个记事本或者word，将结果写进去！VBA涉足时间短，请给我一个简单代码最好。谢谢先，祝大家心情愉快

wyj7485

这涉及到打开操作文件的问题:

Open  文件名称(含路径) For Input As #1
Do While Not EOF(1)
Input #1, MyString'输出

Print #1, MyString'输入
'...........

Loop
Close #1

 

 

groovy

楼上：如果要输出到D:\123.doc中两句话，

第一行(局中)：123

第二行（红色文字）：456

应该怎么写啊，给个例子吧，初学，还不是太明白你的代码是什么意思

谢谢

wyj7485

Sub test()
Open "D:\123.doc" For Output As #1

Print #1, "第一行(局中)：123" '输入
Print #1, "第二行（红色文字）：456" '输入

Close #1

End Sub

groovy

谢谢楼主的例子，能不能再深入的问一下，

我上贴中说的是写入，“第一行(居中)：123，第二行（红色文字）：456”冒号前面的是对数字的要求，或者居中或者是红色的文字，

再一个，楼主的程序是建立了一个文件123.doc，能不能在点击CommandButton控件以后立即123.doc立即弹出，然后自行选择保存的位置。

还有怎么样将VBA计算过程中的变量的值，写入DOC文件那，

听说VBA写WORD文件计算书最好要先建立一个WORD模板文件，不知道有没有相关的电子书或者关于VBA与WORD连接的电子书，给介绍一个看看，版主能够上传就更好了，有劳了，谢谢◎！