- 博客(2)
- 资源 (4)
- 收藏
- 关注
RSS订阅原创 汇总各表数据至主表
<br />Sub 按钮2_Click() Dim sht As Worksheet Dim rng As Range Dim a%, i% For Each sht In Sheets If sht.Name <> "主表" Then If IsEmpty(sht) = False Then a = sht.Range("B65536").End(xlUp).Row
2011-01-17 20:25:00
593
原创 计算加权平均-vba
Sub 计算加权() Dim rng As Range Dim sht As Worksheet Dim a%, b%, k%, i%, j% For Each sht In Sheets a = 5 For Each rng In sht.Range("H6:H469") If IsEmpty(rng) = True Then b = rng.Row
2011-01-17 15:21:00
1765
VBA 高级开发指南
几乎任何vBA应用程序都要处理字符串(文本)数据。vBA本身提供了一组有用的字符串处理函数，但这些函数的功能不如其他针对文本的编程语言那么丰富。本章首先简述现行功能，然后在你的字符串处理“智囊”中加进许多有用的程序。当然，本章不可能对各种有用函数的组合面面俱到，但本章介绍的功能可以作为编写vBA加用程序的良好升瑞。
2010-02-01
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人