我一直在搜索与使用宏来复制行并粘贴到excel中的新工作表相关的帖子,但我似乎无法找到符合我要求的正确代码。这是一个开始的示例数据:
我有一个包含7列的DATA表:
COLUMN A - Article #
COLUMN B - Description
COLUMN C - Lift
COLUMN E - Comp OH
COLUMN F - Requested
COLUMN G - Shipped
COLUMN H - SOS OH
我想创建一个宏,它将根据COLUMN F - 请求复制此工作表的内容,并将它们放在一个名为REQUESTED的新工作表上。
最终结果应该是这样的:
答案 0 :(得分:0)
这是sheet1粗略数据 这是Reuested Formule 这是Reay布局 启动宏
后,这是你的Ansver您可以使用此宏来隐藏和取消隐藏
Sub hide()
Sheets("Requested").Select
Dim r As Range, c As Range
Set r = Range("F2:F10")
Application.ScreenUpdating = False
For Each c In r
If Len(c.Text) = 0 Then
c.EntireRow.Hidden = True
Else
c.EntireRow.Hidden = False
End If
Next c
Application.ScreenUpdating = True
End Sub
Sub Unhide_All_Rows()
Sheets("Requested").Select
On Error Resume Next
'in case the sheet is protected
ActiveSheet.Cells.EntireRow.Hidden = False
End Sub