Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/16.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
使用VBA-looking构造代码,根据excel中输入或选择的信息,该代码将自动填充word中的句子_Vba_Excel_Ms Word_Excel 2007 - Fatal编程技术网

使用VBA-looking构造代码,根据excel中输入或选择的信息,该代码将自动填充word中的句子

使用VBA-looking构造代码,根据excel中输入或选择的信息,该代码将自动填充word中的句子,vba,excel,ms-word,excel-2007,Vba,Excel,Ms Word,Excel 2007,使用VBA-looking构建代码,根据excel中输入或选择的信息,该代码将自动填充word中的句子 例如 在Excel中: 总而言之: 根据答案栏excel电子表格中输入的信息,我希望word文档自动生成一个句子 这可能吗 谢谢, Metfan755类似伪代码的东西: dim writing as string writing=Sheets("x").Cells(y, z) Set objWord = CreateObject("Word.Application") objW

使用VBA-looking构建代码,根据excel中输入或选择的信息,该代码将自动填充word中的句子

例如

在Excel中:

总而言之:

根据答案栏excel电子表格中输入的信息,我希望word文档自动生成一个句子

这可能吗

谢谢,
Metfan755

类似伪代码的东西:

dim writing as string
writing=Sheets("x").Cells(y, z)   
Set objWord = CreateObject("Word.Application")     
objWord.Visible = True     
Selection.InsertAfter (writing)
也许吧


把你需要写的句子的其他部分也加进去

是的,这是很有可能的。你试过什么吗?如果是,您尝试了什么代码,发生了什么?如果没有,请尝试一些方法,然后编辑你的问题,包括你的代码和遇到的任何问题。嘿,蒂姆,我尝试了许多我在网上找到的代码,但它们只是传输数据,而不是在它们之间添加文字。我刚刚开始编程,所以我对这个主题没有太多的知识。如果我想从b2:b4单元格中提取信息,我会把它放在哪里?@另一个单元格是,z是指y行z列中的单元格,其中y和z是非零值的整数/长变量。一个问题是,在这里,人们通常不会从头开始为您编写代码;所以,如果你尝试了一些事情,即使他们没有完全做到你想要的,告诉我们你尝试了什么,并解释它是如何不起作用的。这里有足够多的ppl可以帮助你,如果你先展示你的尝试。
John bought 8 apples totalling $ 50 dollars. 
dim writing as string
writing=Sheets("x").Cells(y, z)   
Set objWord = CreateObject("Word.Application")     
objWord.Visible = True     
Selection.InsertAfter (writing)