摘要：看不进去高深的理论，就下了个期刊小论文（基于Excel技术平台人工神经网络BP模型及应用_邹文安.pdf），配合下载的一个excel（内含vba代码实现的BP神经网络 https://wenku.baidu.com/view/167d9400eff9aef8941e0655.html?from=se 阅读全文

摘要：http://wenda.tianya.cn/question/05a3d11b0e4f3c34 For i = 1 To ActiveSheet.ChartObjects.Count MsgBox ActiveSheet.ChartObjects(i).Name Next ActiveSheet. 阅读全文

该文被密码保护。

摘要：http://www.docin.com/p-959323141-f4.html p=2： 比如定模型参数时，参数范围为[1,3],初始值为1.5，要突变这个1.5可以用以下代码： 阅读全文

摘要：for each 字符串函数： 默认参数，在子函数中必须要有默认值。 在工作表输入时，F9的功能是把区域编程数组，shift+ctrl+enter功能是把数组分开填入单元格。 创建数组： 1. 2. 下标从1开始 3. 下标从1开始，代替中括号，但文本为双括号。 4. '下标从0开始 5.内存释放： 阅读全文

摘要：在vba中，bool类型数据可以参与数学运算，true为-1，false为0 另外发现视图-本地窗口十分有用，调试程序时不必把数组什么的输出也能看变量在每一步的值了。特别方便。 http://club.excelhome.net/thread-1040387-1-1.html 数组中去除空值（VBA 阅读全文

摘要：1 <customUI 2 xmlns="http://schemas.microsoft.com/office/2006/01/customui"> 3 <ribbon startFromScratch="false"> 4 <tabs> 5 <tab id="myxxk" 6 insertBef 阅读全文

摘要：参考：https://wenku.baidu.com/view/6c60420ecc175527072208af.html 比如将选区变为图片保存到桌面： 1 Sub 将选区转为图片存到桌面() 2 Dim ans As Byte, Pic As String, Paths As String 3 阅读全文

摘要：参考：http://club.excelhome.net/thread-1237085-1-1.html 全局变量例子public 变量1 AS IntegerSub LLL()变量1 = 1111End Sub模块级变量例子DIM 变量1 AS IntegerSub LLL()变量1 = 1111 阅读全文

摘要：参考： http://club.excelhome.net/thread-1288002-1-1.html http://club.excelhome.net/thread-709306-1-1.html http://club.excelhome.net/thread-1340105-1-1.ht 阅读全文

摘要：动态数组使用： https://zhidao.baidu.com/question/1432222709706721499.html 使用Redim动态数组即可。 1 2 3 4 5 6 7 8 Sub test1() Dim a() As Integer, iRow As Long, i As I 阅读全文

摘要：参考:http://club.excelhome.net/thread-480025-1-1.html 参考：http://club.excelhome.net/thread-480025-1-1.html 阅读全文

摘要：多个系列： 参考：http://club.excelhome.net/thread-1199400-1-1.html 设置网格线： 说明 每个 ChartObject 对象都代表一个嵌入图表。ChartObject 对象充当 Chart 对象的容器。ChartObject 对象的属性和方法控制工作表 阅读全文

摘要：首先将word模板中需要填写excel中数据的空白处用自己独特的字符串标记，比如 数据001 什么的。如下图： 这样，就可以用vba搜寻这些自己独特的标记来根据excel内容填充word了。 第一个填好的如下图： 而excel中数据如下图： 然后代码如下： 这个excelhome里给的一个代码。挺好 阅读全文

摘要：注意代码和数据源都在sheet2中。 若要改变保存word的路径（参考：http://club.excelhome.net/thread-1301171-1-1.html）： 1 Sub 联系的例子二() 2 Dim wd 3 Dim Arange 4 Set wd = CreateObject(" 阅读全文