自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(3)
  • 收藏
  • 关注

原创 获取已使用单元格的结尾位置(包括格式化的空单元格)

Dim lLastRow As Long Dim lLastColumn As Long With Range("A1").SpecialCells(xlCellTypeLastCell)         lLastRow =.Row         lLastColumn =.Column End With SpecialCells 方法 返回一个 Range 对象,该对象代表与...

2016-02-02 16:42:31 234

原创 获取Excel Sheet中数据单元格的结尾位置

在Excel VBA开发过程中经常会遇到遍历Sheet中的数据,常常我们会使用 For i=1 To maxRow      For j=1 To maxColumn        Next j Next i 其中的maxRow和maxColumn是Sheet中数据所在行数的最大值和列数最大值(也就是结尾位置),使用UsedRange.Rows.Count和UsedRange.Co...

2016-02-02 15:19:18 625

原创 VBA 数据库链接之ADODB

  Public gpgDB As ADODB.Connection Function DbConnect(ip As String, db As String, user As String, password As String) As Boolean On Error GoTo ThisEnd     Set gpgDB = Nothing     Set gpgDB = Ne...

2016-02-01 14:45:57 599

空空如也

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人

提示
确定要删除当前文章?
取消 删除