Tag: 隐藏

根据特定的列隐藏特定的行列: 我有下面的表格： First Name Second Name Phone TF AB 1 True AB 2 False CD 3 True CD 4 False 如果相关行中TF的值是False，我想只隐藏First Name和Second Name列。结果表如下： First Name Second Name Phone TF AB 1 True 2 False CD 3 True 4 False 如果有一个广泛的隐藏所有TF列，这将是很好的。

如何隐藏Excel线形图的Y轴上的最小值而不覆盖白色形状？: 如何隐藏Excel线形图的Y轴上的最小值而不覆盖白色形状？我已经设法find如何隐藏值的例子，如果它是零：即指定自定义格式代码为＃，## 0; – ＃，## 0 ;; 但是，如何在屏幕截图中隐藏不同的值，例如90？如何隐藏圆圈中的值

If语句在Excel VBA中隐藏/显示行: 我有一个代码序列，如果C37是空白的，我想要隐藏两个系列的行。我已经为此成功的代码。然而，如果D37不是空白，我希望同一系列的行不被隐藏。 'Show/Hide Filter Index Columns If Worksheets("Req Sheet").Range("C37").Value = "" Then Worksheets("Formulation").Rows("54:57").EntireRow.Hidden = True Worksheets("Formulation").Rows("125:128").EntireRow.Hidden = True Else Rows("54:57").EntireRow.Hidden = False Rows("125:128").EntireRow.Hidden = False End If If Worksheets("Req Sheet").Range("C38").Value = "" Then Worksheets("Formulation").Rows("54:57").EntireRow.Hidden = True Worksheets("Formulation").Rows("125:128").EntireRow.Hidden = True Else Rows("54:57").EntireRow.Hidden = False Rows("125:128").EntireRow.Hidden = False End If 我知道我的代码语法错了，但是我得到的问题是C38代码的第二部分将取代来自C37的代码。我曾尝试使用一个和运营商，但我无法取得成功！谢谢你的帮助！

为什么excel没有隐藏我的形状？: 我在下面使用这个代码… Declare Sub Sleep Lib "kernel32" (ByVal Milliseconds As Long) Sub blink() Sleep 500 ActiveSheet.Shapes("the_shape").Visible = False Sleep 500 ActiveSheet.Shapes("the_shape").Visible = True End Sub 我错过了什么？

VBA：如何忽略范围内的隐藏行？: 我正在尝试做一个突出显示，并可见（不隐藏）的所有行的计数。我的计数公式的作品，但它仍然计算隐藏行也隐藏。我怎样才能只计算突出显示和可见的行？ 'This function will count how many cells in a given range for a given color and are visible Function COUNTCELLCOLORSIF(CellRange As Range) As Long Dim rngCell Application.Volatile For Each rngCell In CellRange If rngCell.Interior.ColorIndex = "36" and rngCell.visible Then COUNTCELLCOLORSIF = COUNTCELLCOLORSIF + 1 End If Next rngCell End Function

当行或列隐藏时，在Excel VBA中触发事件: 有没有办法，在Excel VBA中触发一个事件（调用一个子），当我手动隐藏行/列？当它隐藏在特定的工作表中时，我希望同一行隐藏在下面的所有工作表中。那可能吗？提前致谢

如果单元格为空，则隐藏下n行VBA: 在工作表“场景”中，我试图根据该行的B列中的单元格值是否包含文本“不包含”来隐藏整行的组。例如，在范围B19：B77，我有5个行中的帐户部分。每个部分的第一行都有帐户名称或“不包含”。如果它说“不包括”，我想隐藏该行和后续的4行（例如，行19到23）。我知道如何根据单元格的值隐藏整行（代码如下），但我想弄清楚如何隐藏额外的行。 Private Sub Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = False For Each xRg In Range("B19:B77") If xRg.Value = "" Then xRg.EntireRow.Hidden = True Else xRg.EntireRow.Hidden = False End If Next xRg Application.ScreenUpdating = True End Sub 提前谢谢你的帮助！

隐藏基于单元格值excel vba的commandbutton: 我试图隐藏一个基于特定单元格值的命令button。我已经查找了几个代码，并将它们粘贴到excel中（在右键单击表格并select“查看代码”时，在vba表单中）。我究竟做错了什么？这是我尝试过的代码之一： Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Range("A1") = 0 Then ActiveSheet.CommandButton1.Visible = False If Range("A1") = 1 Then ActiveSheet.CommandButton1.Visible = True End Sub

HID USB缩放程序将权重传送到MS Excel: 我需要find一个程序，可以帮助我转移体重http://global.dymo.com/enUS/Products/10_lb__USB_Mailing_Scale.html到微软的Excel。有人可以帮我解决问题，或者指引我走向正确的方向吗？量表确实意味着阅读已经稳定下来，我认为这是在Excel中将权重写入单元格的提示。规模可以读取克或盎司的重量，但我更喜欢它在克。谢谢您的帮助！ =）

当所有行的表被隐藏时如何获得RowCount？: 我通过使用下面的代码行排除顶部两行，因为它们是头部隐藏行。 For i=3 To ThisWorkBook.Sheets("ALL").Range("A1",ThisWorkBook.Sheets("ALL").Range("A65536").End(xlUp)).Rows.Count ThisWorkBook.Sheets("ALL").Rows(i).EntireRow.Hidden=True Next 现在要获得隐藏的行数，我正在使用下面的代码行 From i=3 To ThisWorkBook.Sheets("ALL").Range("A1",ThisWorkBook.Sheets("ALL").Range("A65536").End(xlUp)).Rows.Count ThisWorkbook.Sheets("ALL").EntireRow.Hidden=False Next 但我得到rowcount为2.事实上，该表有10行。那么如何让隐藏的行可见？