在Excel中，如果你想要去除已设定的打印区域，可以通过手动操作或编写VBA代码实现。手动操作时，只需依次点击“文件”、“打印”、“打印区域”、“取消打印区域”即可。而通过VBA代码，则可以直接使用以下语句：ActiveSheet.PageSetup.PrintArea = ""。这里需要注意的是，如果你想指定某个特定的工作表进行操...
PrintRow = 100 Sheet1.PageSetup.PrintArea = "A1:G" & PrintRow End Sub 通过改变变量PrintRow的值来设置不同的打印区域。方法二：用Names.Add方法。当在Excel中设置一个区域为打印区域后，Excel自动定义了一个名称“Print_Area"，因而可以通过定义名称的方法来设置打印区域，代码如下：Sub SetPrintA...
用Names.Add方法。当在Excel中设置一个区域为打印区域后,Excel自动定义了一个名称“Print_Area",因而可以通过定义名称的方法来设置打印区域,代码如下: Sub SetPrintArea()Sheet1.Names.Add "Print_Area", Sheet1.Range("B2:G12")End Sub 设置动态打印区域: Sub SetPrintArea()Sheet1.Names.Add "Print_Area",...
Sub SetPrintArea() PrintRow = 100 Sheet1.PageSetup.PrintArea = "A1:G" & PrintRow End Sub 通过改变变量PrintRow的值来设置不同的打印区域。 方法二: 用Names.Add方法。当在Excel中设置一个区域为打印区域后,Excel自动定义了一个名称“Print_Area",因而可以通过定义名称的方法来设置打印区域,代码如下: Sub...
标签:VBA在Excel中,将打印区域设置在移动单元格区域内可能是比较困难的事。你可能希望捕捉特定单元格区域为打印区域,或者让打印区域仅考虑某些列。假设在Excel工作簿中有几个辅助列,不希望打印这些列,但希望这些列可见。可以手动设置打印区域以排除非打印区域,但现在已经添加了...
下面的VBA过程将生成从列A到列D的打印区域,而不管你是否更新数据,只要在列A至列D,都将包含在打印区域中。 代码语言:javascript 代码运行次数:0 SubPrintArea()Dim sh As Worksheet Set sh=Sheet1 With sh.PageSetup.PrintArea=_.Range("A1",.Range("D"&Rows.Count).End(xlUp)).Address ...
按下“Alt+F11”打开VBA编辑器。 在VBA编辑器中选择“插入”菜单下的“模块”选项。 在模块中输入以下代码: Sub SetPrintArea() Dim PrintArea As Range Set PrintArea = Selection ThisWorkbook.ActiveSheet.PageSetup.PrintArea = PrintArea.AddressEnd Sub ...
VBA专题10-2:使用VBA操控Excel界面之设置工作表 本文主要讲解操控工作表中一些界面元素的VBA代码。 名称框 名称框中的名字是为单元格区域定义的名字,可以由用户定义名称,或者由Excel自动创建,例如Print_Area和表1。 隐藏名称 示例代码: 代码语言:javascript
.PrintTitleRows = "$1:$3" .PrintArea = "$A$4:$C$100" .Orientation = xlLandscape End With End Sub 範例雙 PageSetup 執行時,防止螢幕重繪閃動 下列副程式會示範在其中您可能會防止螢幕閃爍時正在執行PageSetup函式的一種方法。 Sub PreventScreenFlicker() ...
Alt+F11打开VBA代码编辑器,在thisworkbook中写入如下代码后关闭VBA窗口。 Sub fill_color() Application.ScreenUpdating = False '暂停刷新屏幕 For i = 4 To 34 '为数据源的起始和结束行号 ActiveSheet.Shapes(Range("DataMap!A" & i).Value).Fill.ForeColor.RGB = Range(Range("DataMap!C" & i).Value)...