摘要： '在循环中,如果需要清空VBA数组,可以用Erase方法来实现.'该示例使用 Erase 语句重新初始化固定大小的数组中的元素，以及释放动态数组存储空间。Dim NumArray(10) As Integer ' Integer 数组。Dim StrVarArray(10) As String '变长的 String 数组。Dim StrFixArray(10) As String * 10 '定长的 String 数组。Dim VarArray(10) As Variant 'Variant 数组。Dim DynamicArray() As I 阅读全文

摘要： Function EmptyArrary(ByRef x() As String) As Boolean Dim tempStr As String tempStr = Join(x,",") EmptyArrary = LenB(tempStr) <= 0End Function 阅读全文

摘要： Sub macro1() Dim arr, i% arr = Array(1, 2, 3, 4, 5, 6) On Error Resume Next i = WorksheetFunction.Match(9, arr, 0) If i > 0 Then MsgBox "存在" Else MsgBox "不存在"End Sub 阅读全文

摘要： 1. 技术要点1.1. Excel试验：A. Excel嵌入网页的方法。1. 在后台用流的方式返回给前台页面展现；2. 在后台讲Excel格式数据定好保存到本地，在前台页面用html标签加载展示；B. Excel显示格式的控制。1. Excel单元格格式设置，默认为常规类型；2. 上下标格式的控制；3. 单元格水平垂直对齐方式；4. 单元格边框设置；5. 单元格合并；6. 字体设置，包括字体的颜色、大小、粗体、斜体、字体、下划线等；7. 冻结行列；8. 公式栏的显示与隐藏；9. 行标题和列表题的显示与隐藏；10. 网格的显示与隐藏；11. 水平滚动条和垂直滚动条的显示与隐藏；12. Sheet 阅读全文