摘要： 在VBA中，FreeFile函数用于获取一个可用的文件编号。它返回一个可用于打开文件的整数值。每个打开的文件都需要一个唯一的文件编号，FreeFile函数可以帮助我们获取未被使用的文件编号。 在上述代码中，mp3File = FreeFile这行代码将获取一个可用的文件编号，并将其分配给变量mp3F 阅读全文

摘要： Excel VBA，按F1调用帮助时，会出现这样的提示“您的级策略阻止我们为您完成此操作”，如附图。 其原因是 删除了Windows自带的IE11! 在控制面板→启用或关闭Windows功能中，选中IE11即可解决上述问题。 转发时请指出出处：博客后台 - 博客园 (cnblogs.com) 在关闭 阅读全文

摘要： 编写代码时，在使用TextBox1_Change事件时，需要判断该事件是由代码填充的，还是输入的情况。 如果使用“KeyXXX”等事件，在Win10下，使用非微软的输入法时，经常出错。比如，输入“王力”时，需要在文本框中显示的是“王力”，但通过代码参数传递的内容却是“王li”。 使用“Change” 阅读全文

摘要： 编写VBA代码用于处理大量的文本文件（2千多，并且会随着实验数据的增加而增加），具体的要求是计算均数等指标后，再将结果另存为文本文件。 为了偷懒，开始是读取文本文件，写入到Excel空白表格中，然后用Excel内置的公式计算。 上述过程，耗时1.5小时左右。感觉太慢，不使用Excel的内置公式，而是 阅读全文

摘要： 编写代码的过程中，通过下面的代码打开并控制Word文件 Try With myProcess .StartInfo.FileName = str_模板文件 .StartInfo.CreateNoWindow = True .Start() End With Catch ex As Exception 阅读全文

摘要： 使用VSTO编写Excel的加载项时，可动态地增加用户窗体，也可调用使用手工方法添加的Windows窗体。Windows窗体其实是一个“类”，所以，调用手工添加的已经存在的Windows窗体时，使用这样的代码： Dim frm_演示 as 手工窗体 '这个手工窗体是通过“项目-添加窗体(Window 阅读全文

摘要： Select方法返回一个DataRow的数组。MSDN中的例子： Private Sub GetRowsByFilter() Dim table As DataTable = DataSet1.Tables("Orders") ' Presuming the DataTable has a colu 阅读全文

摘要： 将Excel某一区域的表格命名为某一名字的，读取其中的内容时，并不是使用“Value”这个参数，而是 "RefersToRange.Value"这种方式。 例：某一个Excel表格中，其“E2”到“I2”单元格被例句为“Data1”，读取其中的数据时，代码如下： [Workbooks("工作簿")] 阅读全文

摘要： DataGridView控件删除最后一行时遇到了麻烦，在网上搜索了一下，解决方法如下： 1. 在窗体的设计状态下，将其设置为不允许用户添加新行。 2. 这时，删除最后一行就没有问题了。 3. 在代码中设置：.AllowUserToAddRows = False，删除最后一行时同样出错。 DataGr 阅读全文

摘要： 从来没有想过使用VB.Net时，还会遇到这样的问题。 以前使用VBA，貌似可以方便地获取月份的英文全称、简称和相应的中文名称。 在使用VB.Net 2019时，遇到了这样的事情：使用 Format ("2020/1/1", "yyyy-MMM-ddd")时，系统返回值总是“一月”，而不是希望的“Ja 阅读全文