excel如何按某列筛选自动打印

当你某一列里的数据很多,需要按这一列的筛选数据分列打印时,这个自动打印的功能非常省事。

Sub autoprint()
Dim d
Dim arr
Dim i%, nrow%, s%
nrow = Range(“A65536”).End(3).Row   ‘第1列最后可见非空单元行号(A列分类)
arr = Range(“A3:A” & nrow)    ‘创建数组,标题行在第2行
s = UBound(arr)    ‘一维数组最后项数

Set d = CreateObject(“Scripting.Dictionary”)    ‘创建字典对象

For i = 1 To s    ‘循环数组各项
    d(arr(i, 1)) = “”    ‘纳入字典
Next
Range(“1:1”).AutoFilter    ‘选择第2行自动筛选(标题行在第2行)

For i = 1 To d.Count    ‘循环字典项
    Selection.AutoFilter Field:=1, Criteria1:=Application.Index(d.keys, 0, i)    ‘以字典各项自动筛选
    ActiveWindow.SelectedSheets.PrintOut   ‘打印当前表
Next

Selection.AutoFilter    ‘取消自动筛选,全部显示
End Sub

按列A分类打印 实现自动打印的功能 非常方便。

自动分类筛选打印
自动分类筛选打印

什么是服务器的FBWC与BBWC

FBWC  “Flash Backed Write Cache”
一种异常掉电时的缓存写入技术。
在系统掉电时,利用一组“超级电容”中存储的电量,在较短的时间内(大约1分钟),将缓存中的数据备份到RAID卡上的大容量FLASH闪存中,下次开机再把数据回写到硬盘中

 

BBWC  “Battery Backed Write Cache”  (电池备份写高速缓存)  用来提高服务器I/O性能。

服务器合并,大量的多媒体程序,实时响应程序,以及大量的存储空间请求,这些东西使得磁盘I/O性能成为服务器系统中的一道瓶颈。减轻负担的一个办法是增加一个BBWC(电池备份写高速缓存)模块。