eclipse_xu

在VBA中做导出到Excel操作时，如果碰到长数字，那么导出后会默认显示为科学计数法，解决方法如下：ExcelWorkSheet.Cells(1, 6) = "'" + 111111111111111在输出的数字前面加上一个  '   即可。

VBA中给变量赋值使用set和不使用set的区别'给普通变量赋值使用LET ，只是LET 可以省略。'给对象变量赋值使用SET，SET 不能省略。例如ADODB.RecordSet等对象。Sub AA() Dim arr As String arr = "hello" '本句也可写成LET arr = "hello"End SubSub bb() D

在Access中将数据导出到Excel非常简单，我们只要将查询出的RecordSet用循环或者固定格子的方式写到Excel中即可。下面是一个小例子：Private Function F_Export() As Boolean Dim cnCurrent1 As ADODB.Connection Dim rcdTemp1 As ADODB.Recordset Dim

1、如果Excel中的数据是标志格式的，即标题栏+数据这种类型，那么导入数据库将非常方便，示例代码如下：'函数：导入Private Function F_K_Import() As Boolean Dim cnCurrent As ADODB.Connection Dim rcdTemp As ADODB.Recordset Dim rcdChecker As A

VBA中对数据库操作使用ADODB对象，具体使用方法如下：Dim cnCurrent As ADODB.ConnectionDim rcdTemp As ADODB.RecordsetSet cnCurrent = CurrentProject.ConnectionSet rcdTemp = New ADODB.RecordsetquerySql1 = ""rcdTemp.Ope

正则表达式常用来作输入校验，本次使用的校验是 密码必须包含数字0-9、大小写英文字母、长度超过8位。Dim reg As New RegExp With reg .Global = True .IgnoreCase = True .IgnoreCase= false'表达式区分大小写 .Pattern= "^(?=.{8,}?)(?=.*\d

VBA 的 Format 函数与工作表函数 TEXT 用法基本相同，但功能更加强大，许多格式只能用于VBA 的 Format 函数，而不能用于工作表函数 TEXT ，以下是本人归纳的几点用法，不到之处，敬请谅解。Format(值,格式（可选参数))一、数字格式：1、General Number：普通数字，可以用来去掉千位分隔号和无效 0 。如：Format("1,234

使用VBA可以轻松的设置Excel中的一个或多个单元格甚至是一个区域的或者是被选中单元格的左对齐、友对齐、居中对齐、字体、字号、字型等属性。①左对齐、右对齐、居中对齐'选择区域或单元格右对齐　　　　Selection.HorizontalAlignment = Excel.xlRight　　'选择区域或单元格左对齐　　Selection.HorizontalAlignm

1  DLookup正常用法    用于数值型条件值:  DLookup("字段名称" , "表或查询名称" , "条件字段名 = n")       用于字符串型条件值:(注意字符串的单引号不能丢失)  DLookup("字段名称" , "表或查询名称" , "条件字段名 = '字符串值'")     用于日期型条件值:(注意日期的#号不能

1、作用在消息框中显示信息，并等待用户单击按钮，可返回单击的按钮值(比如“确定”或者“取消”)。通常用作显示变量值的一种方式。2、语法MsgBox(Prompt[,Buttons][,Title][,Helpfile,Context])参数说明：(1)Prompt，必需的参数，为字符串，作为显示在消息框中的消息文本。其最大长度约为1024个字符，由所用字符的宽度决定。如果pro