码迷,mamicode.com
首页 >  
搜索关键字:vsto vba    ( 1264个结果
VS Bug 当获取其他项目的代码时, F5 无法进入调试模式. 也不报错....
在64位的机子下, 被获用的项目使用X86时会出现. 就会出现 F5 无法进入调试模式. 也不报错.... 打断点也没有用. 在不加入X86项目的代码时, 又可以运行.. 解决方案: 检查一下你的项目的运行平台是不是跟你的操作系统是一样的.. 要不就都使用Any CPU吧... 我是开发在VSTO项...
分类:其他好文   时间:2014-12-20 15:29:01    阅读次数:145
VBA実績表
VBA 插入一行保留样式VBA 打开一个string指定的文件VBA 按照文件类型名称打开一个文件VBA excel中表示列的字母换成数字
分类:编程语言   时间:2014-12-16 11:29:32    阅读次数:167
word检视意见导出(VBA)
Private Sub CommandButton1_Click() 'Dim Cmt As Comment Dim excelApp As Object Dim xlsWbk, objWdApp As Object Dim commentsArray Dim rows...
分类:编程语言   时间:2014-12-10 16:03:41    阅读次数:289
VBA 插入一行保留样式
Rows(processingRow).Insert ' 在指定的行数processingRow处插入一行 Rows(processingRow - 1).Select ' 选择上一行的整行 Selection.Copy ' 拷贝 Rows(proc...
分类:编程语言   时间:2014-12-08 13:50:46    阅读次数:155
VBA 打开一个string指定的文件
Open csvFileName For Input As #1 DimlineChanger as String lineChanger = Chr(13) fileData = Split(StrConv(InputB(LOF(1), 1), vbUnicode), lineChanger...
分类:编程语言   时间:2014-12-08 13:44:42    阅读次数:157
VBA excel中表示列的字母换成数字
出自这里数字转列标:Split(Cells(1,1).Address(1,0),"$")(0) '将1-256替换红色的1就可以Cells(1, a) 选中对应的第一行第A列的一个单元格;Address的返回值为该单元格的绝对地址 ,如$A$1,即A列1行; 它有4个参数,咱们直说前俩,第一个为行....
分类:编程语言   时间:2014-12-08 12:14:45    阅读次数:165
VBA 按照文件类型名称打开一个文件
Application.GetOpenFilename(fileFilter, fileIndex, fileSelectTitle, button, False)fileFilter: 指定能够被选择的文件类型例:"CSV文件(*.csv), *.csv, 所有的文件(*.*), *.*"这里有一...
分类:编程语言   时间:2014-12-08 12:03:57    阅读次数:250
PowerPoint2007 执行VBA代码'.Shapes(ShapeIdx).Chart' 报438错误 不知道该对象或方法
因为之前木有这个问题的  重装了下Office就出现这个问题了 百度木有百到 然后看到一位仁兄这样说: 我想是不是微软不给力 需要打补丁 于是安装了下面补丁 果然好了:...
分类:编程语言   时间:2014-12-05 17:32:53    阅读次数:142
VBA连接MySQL数据库以及ODBC的配置(ODBC版本和MySQL版本如果不匹配会出现驱动和应用程序的错误)
db_connected = False'获取数据库连接设置dsn_name = Trim(Worksheets("加载策略").Cells(2, 5).Value) ------(ODBC配置中的DATA SOURCE NAME)user_name = Trim(Worksheets("加载策略"...
分类:数据库   时间:2014-12-02 20:38:40    阅读次数:243
VBA代码做匹配处理
?? Public Sub DoFilter2() ' 按照发票号码做匹配,重新生成一个明细的表格,本例子的模板是Sheet9 和 Sheet13 'Sheet9  是明细,Sheet13 是汇总的, 需要从这个两个Sheet里重新提取数据到一个新的Sheet14里     'If Workbooks(1).Worksheets("sheet1") Is Nothing Then  ...
分类:编程语言   时间:2014-11-30 14:08:06    阅读次数:204
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!