Software | 时鹏亮的Blog

本文内容来自:http://www.bingtech.net/WordPress/2011/04/233/
但是莫名其妙的是网站打不开了，所以根据缓存，在博客备份一下，并提供稳重涉及到的win7的dll文件。下面为部分转载原文：

默认情况下Windows的DN[......]

随便选一空列，公式写入=rand（），批量到每一行，然后按随机出数字的那一行排序即可[……]

替换里输入~*即可替换*号符合[……]

以下代码直接放到列表内容模板(list.var) (*)内保存，即可查看到效果。

if($no%2==1){
    $classname="1";
}else{    $classname="2";}$listtemp='&lt[......]

以下宏涉及遍历，数组，删除指定行等内容。

Sub DELCO()
Dim arrString
Dim TemparrString = Array("要删除的关键字", "要删除的关键字2", "要删除的关键字3&quot[......]

XP：我的电脑-》右击属性-》远程-》远程协助-》选择远程用户-》把无关的用户给删掉。
win7：计算机-》右击属性-》远程-》选择用户-》把无关的用户给删掉[……]

VBA-宏定义字符串数组常量不能按以往的经验来定义，需要按既定规则，声明一个变量，不指定任何格式，直接用array来声明其常量。

Dim arrString
arrString = Array("宰", "鸭", "欢[......]

单元格转换为全角：B2=WIDECHAR(A2)
单元格转换为半角：C2=ASC(B2)简繁体转换：选中列或者行，点击审阅-点击对应的简繁体转换按钮即可单元格取长度：B2=LENB(B1) 是否是数字：ISNUMBER(B1)，如果需要强制转换下，可以这[……]

查找-输入关键词-点击“查找全部”，就可以查到所有的数据，在对话框点中第一条，再按住Shift键点最后一条就选中了所有查找出的单元格了，最后在Excel已选中的表格上右击，删除整行，即可。
有人说看不懂，所以加个动图和流程介绍：1.Ctrl+F打开查找窗口[……]

点击单元格，在公式里写入=ROW()，然后复制到每一行即可。复制办法可以查看相关文章[……]

时鹏亮的Blog