如何将Workbook/Worksheet保存为PDF, 这个主要用到了ExportAsFixedFormat方法 ，可以将Workbook、Sheet、Chart 或 Range转换为PDF 或XPS格式 1 Sub ConvertSheetToPDF() 2 Dim fileName As St...
分类：
其他好文 时间：
2015-04-11 06:33:12
阅读次数：
199
Sub DB_Row() Dim i, j As Integer Dim row1, row2 As Integer row1 = 3 ' 对比第 3 行 row2 = 4 ' 和第 4 行 For i = 1 To 256 For...
分类：
编程语言 时间：
2015-04-10 13:18:30
阅读次数：
269
problem：
Given a set of distinct integers, S, return all possible subsets.
Note:
Elements in a subset must be in non-descending order.The solution set must not contain duplicate sub...
分类：
其他好文 时间：
2015-04-10 11:35:42
阅读次数：
181
下了个微软软研究院的开发组实习生申请表，想填却填不进去。
原来他对工作表做了锁定，还有密码，我猜测他不是故意坑人的，想申微软的人连这点手段都没有人家也不会要的。下面的宏代码就是来破工作表锁定的。
Public Sub 工作表保护密码破解()
Const DBLSPACE As String = vbNewLine & vbNewLine
Const AUTHORS A...
分类：
其他好文 时间：
2015-04-09 17:34:51
阅读次数：
187
1、outlook中 alt+F11 2、写入下列代码 Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)If TypeName(Item) "MailItem" Then Exit SubIf Item...
分类：
其他好文 时间：
2015-04-09 15:06:00
阅读次数：
102
注意sub_parent_id字段，通过该字段，可以将tb_point_group_tree表中的数据自关联为一个树形的数据结构表格。CREATE TABLE `tb_point_group_tree` (`cgroup_id` int(11) NOT NULL DEFAULT '0',`group...
分类：
数据库 时间：
2015-04-08 22:59:10
阅读次数：
451
# 1. 取字符串的子串， 比如说从TIME_NOW分别取出日期和时间DATE_TODAY="${TIME_NOW:0:8}" # ${var:beg_pos:sub_str_length}， beg_pos是子串的起始位置（从0开始）， sub_str_length为子串长度TIME_TODAY=...
分类：
其他好文 时间：
2015-04-08 22:46:45
阅读次数：
122
DescriptionGiven a sequence, {A1, A2, …, An} which is guaranteed A1 > A2, …, An, you are to cut it into three sub-sequences and reverse them separately to form a new one which is the smallest possible...
分类：
编程语言 时间：
2015-04-08 16:28:10
阅读次数：
195
将下面的方法放于VBA中执行即可注：需要有工作表Name为Sheet1,使用的对象参考：http://zhucongg.blog.163.com/blog/static/1148148320153742843347/Sub s() Application.ScreenUpdating = False...
分类：
其他好文 时间：
2015-04-07 23:13:21
阅读次数：
163
1、debug版int main(){011752E0 push ebp 011752E1 mov ebp,esp 011752E3 sub esp,0C0h 011752E9 push ebx 011752EA push...
分类：
编程语言 时间：
2015-04-07 11:35:57
阅读次数：
305
