Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
IF a condition is met
I have a workbook comprised of several worksheets. I need to print any row
with a word "high" in any worksheet to a new worksheet of all records containing word "high" only. Please help! |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
IF a condition is met
How about something like this:
Option Explicit Sub Select_Aged() Dim i As Long Dim cell As Range i = 0 Set ActiveSheet = C_Sheet Sheets.Add Activesheet.Name = "Summary" C_Sheet.Select For Each cell In ActiveSheet.UsedRange If cell Like "*high*" Or Then cell.EntireRow.Copy Destination:=Sheets("Summary").Range("A1").Offset( i, 0) i = i + 1 End If Next cell End Sub Hope this helps! -- -SA "Loc" wrote: I have a workbook comprised of several worksheets. I need to print any row with a word "high" in any worksheet to a new worksheet of all records containing word "high" only. Please help! |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
IF a condition is met
Hello SA,
Thank you for your help. It seems like a programming not just a simple formula as I expected. I have 2 questions for you: 1) Where do I write this program for the workbook I have? 2) How do I program the workbook to search entire book not just sheet and copy the entire records containing word "high" to the "Summary" worksheet? If you don't mind, please show me step-by-step how to make this process work Loc "StumpedAgain" wrote: How about something like this: Option Explicit Sub Select_Aged() Dim i As Long Dim cell As Range i = 0 Set ActiveSheet = C_Sheet Sheets.Add Activesheet.Name = "Summary" C_Sheet.Select For Each cell In ActiveSheet.UsedRange If cell Like "*high*" Or Then cell.EntireRow.Copy Destination:=Sheets("Summary").Range("A1").Offset( i, 0) i = i + 1 End If Next cell End Sub Hope this helps! -- -SA "Loc" wrote: I have a workbook comprised of several worksheets. I need to print any row with a word "high" in any worksheet to a new worksheet of all records containing word "high" only. Please help! |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
IF a condition is met
Is the word "high" found in a specific column of every sheet or can it be in
any column in every sheet? Can the word be found more than once in any one row? Are there any sheets that you DON'T want searched, like for instance, the Summary sheet? What columns comprise the "entire record"? Where in the Summary sheet do you want the data placed? HTH Otto "Loc" wrote in message ... Hello SA, Thank you for your help. It seems like a programming not just a simple formula as I expected. I have 2 questions for you: 1) Where do I write this program for the workbook I have? 2) How do I program the workbook to search entire book not just sheet and copy the entire records containing word "high" to the "Summary" worksheet? If you don't mind, please show me step-by-step how to make this process work Loc "StumpedAgain" wrote: How about something like this: Option Explicit Sub Select_Aged() Dim i As Long Dim cell As Range i = 0 Set ActiveSheet = C_Sheet Sheets.Add Activesheet.Name = "Summary" C_Sheet.Select For Each cell In ActiveSheet.UsedRange If cell Like "*high*" Or Then cell.EntireRow.Copy Destination:=Sheets("Summary").Range("A1").Offset( i, 0) i = i + 1 End If Next cell End Sub Hope this helps! -- -SA "Loc" wrote: I have a workbook comprised of several worksheets. I need to print any row with a word "high" in any worksheet to a new worksheet of all records containing word "high" only. Please help! |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
IF a condition is met
Otto,
The word "high" is in column K only in every sheet and appears only once in any row. I would like it searches for the word "high" in entire workbook except the Summary sheet. Each record has 13 columns from A - M. If any record has the word "high" in column K, then the entire record will be copy to the Summary sheet in the same workbook. The Summary sheet has 13 columns like other worksheet. I would appreciate if you can show me how (step-by-step) to program this complicated process. Thank you. "Otto Moehrbach" wrote: Is the word "high" found in a specific column of every sheet or can it be in any column in every sheet? Can the word be found more than once in any one row? Are there any sheets that you DON'T want searched, like for instance, the Summary sheet? What columns comprise the "entire record"? Where in the Summary sheet do you want the data placed? HTH Otto "Loc" wrote in message ... Hello SA, Thank you for your help. It seems like a programming not just a simple formula as I expected. I have 2 questions for you: 1) Where do I write this program for the workbook I have? 2) How do I program the workbook to search entire book not just sheet and copy the entire records containing word "high" to the "Summary" worksheet? If you don't mind, please show me step-by-step how to make this process work Loc "StumpedAgain" wrote: How about something like this: Option Explicit Sub Select_Aged() Dim i As Long Dim cell As Range i = 0 Set ActiveSheet = C_Sheet Sheets.Add Activesheet.Name = "Summary" C_Sheet.Select For Each cell In ActiveSheet.UsedRange If cell Like "*high*" Or Then cell.EntireRow.Copy Destination:=Sheets("Summary").Range("A1").Offset( i, 0) i = i + 1 End If Next cell End Sub Hope this helps! -- -SA "Loc" wrote: I have a workbook comprised of several worksheets. I need to print any row with a word "high" in any worksheet to a new worksheet of all records containing word "high" only. Please help! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
lookup with multiple condition, but one condition to satisfy is en | Excel Worksheet Functions | |||
Combine an OR condition with an AND condition | Excel Discussion (Misc queries) | |||
If condition | Excel Discussion (Misc queries) | |||
Condition 1 overules condition 2? | Excel Worksheet Functions | |||
I need 4 condition for condition formatting | Excel Programming |