多张表格同时冻结窗口?同时进行自动筛选?
发布网友
发布时间：2022-04-25 10:41
共5个回答
热心网友
时间：2024-08-17 03:17
1.alt+F11
2.插入/模块,然后右边的编辑窗口中复制以下代码：
Sub yueliang()
Dim i As Integer
For i = 1 To Sheets.Count
Sheets(i).Activate
Range("B2").Select
ActiveWindow.FreezePanes = True
If ActiveSheet.AutoFilterMode = False Then
Selection.AutoFilter
End If
Next
End Sub
3.F5
即可
这是以锁定第一行和一列为列的，如果有变，可更改代码中的B2为相应的单元格。
热心网友
时间：2024-08-17 03:14
def ault 例如，您可以冻结窗格以便在滚动时保持行标签和列标签可见，如以下示例中所示。
def ault
def ault 第 1 行被冻结〡〳ÄѤћ工作表窗口
def ault 当拆分窗格时，您会创建可在其中滚动〡〳ÄѤћ单独工作表区域，同时保持非滚动区域中〡〳ÄѤћ行或列依然可见。
def ault 冻结窗格以锁定特定行或列
def ault 1、在工作表中，执行下列操作之一：
def ault ·要锁定行，请选择其下方要出现拆分〡〳ÄѤћ行。
def ault ·要锁定列，请选择其右侧要出现拆分〡〳ÄѤћ列。
def ault ·要同时锁定行和列，请单击其下方和右侧要出现拆分〡〳ÄѤћ单元格。
def ault 提示 要取消选择〡〳ÄѤћ单元格区域，请单击工作表中〡〳ÄѤћ任意单元格。
def ault 2、在“视图”选项卡上〡〳ÄѤћ“窗口”组中，单击“冻结窗格”，然后单击所需〡〳ÄѤћ选项。
def ault
def ault 注释 当冻结窗格时，“冻结窗格”选项更改为“取消冻结窗格”，以便您可以取消对行或列〡〳ÄѤћ锁定。
def ault 拆分窗格以锁定单独工作表区域中〡〳ÄѤћ行或列
def ault 1、要拆分窗格，请指向垂直滚动条顶端或水平滚动条右端〡〳ÄѤћ拆分框。
def ault
def ault 2、当指针变为拆分指针 或 时，将拆分框向下或向左拖至所需〡〳ÄѤћ位置。
def ault
3、要取消拆分，请双击分割窗格〡〳ÄѤћ拆分条〡〳ÄѤћ任何部分。
def ault
热心网友
时间：2024-08-17 03:16
但是,抱歉,我做不来
热心网友
时间：2024-08-17 03:17
程序的编制需要考虑众多的方面，比如客户需求和普遍性，实现的容易性，功能运行的效率性等等。
此外，功能的完善与软件技术、硬件的进步也有很大关系。现在达不到的功能，也许以后能够实现呢！这也是软件的版本不断升级的原因。
热心网友
时间：2024-08-17 03:15
在选定多张sheet的情况下是可以同时进行各种操作
但唯独冻结和自动筛选做不到
这是因为表格可能会有格式不同的情况出现
所以，别想着简单的办法了
至于程序，写宏是可以，但前提是每张sheet的基本结构近似
而且浪费时间啊
