Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Problems with filtering and output
Hi Guys, I've got 2 problems with my vba code. Description of my spreadsheet : The spreadsheet has 2 worksheets. Worksheet A has 4 columns (descr, cl, il, and a1). All the columns except for the descr column contain crosses (x). Worksheet B is a worksheet where I have to post results (it's an output page). Problems : 1. I've got to filter the descriptions (column descr) based on the crosses in the columns cl, il and a1. However, filtering should be based on the following rules : Descr A : cl x, il, a1 x -- output because there is a cross in column cl Descr B : cl, il, a1 -- not sent to output because there are no crosses Descr C : cl, il x, a1 x -- output because there is a cross in columns il and a1 2. I want to put the output from problem 1 in a single field in worksheet B. The output will contain a list of descriptions. Can someone help me to build this VBA code please ? Floep -- floep ------------------------------------------------------------------------ floep's Profile: http://www.excelforum.com/member.php...o&userid=36853 View this thread: http://www.excelforum.com/showthread...hreadid=565612 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Problems with filtering and output
Sub ABC()
Dim cell as Range, rng as Range Dim s as String with worksheets("worksheet A") set rng = .Range(.Cells(2,1),.Cells(rows.count,1).End(xlup)) End with for each cell in rng if cell.offset(0,1).Value = "x" or _ cell.offset(0,2).Value = "x" and _ cell.offset(0,3).Value = "x" then s = s & cell.value & vbNewLine end if Next Worksheets("Worksheet B").Range("B9").Value = s End Sub -- Regards, Tom Ogilvy "floep" wrote: Hi Guys, I've got 2 problems with my vba code. Description of my spreadsheet : The spreadsheet has 2 worksheets. Worksheet A has 4 columns (descr, cl, il, and a1). All the columns except for the descr column contain crosses (x). Worksheet B is a worksheet where I have to post results (it's an output page). Problems : 1. I've got to filter the descriptions (column descr) based on the crosses in the columns cl, il and a1. However, filtering should be based on the following rules : Descr A : cl x, il, a1 x -- output because there is a cross in column cl Descr B : cl, il, a1 -- not sent to output because there are no crosses Descr C : cl, il x, a1 x -- output because there is a cross in columns il and a1 2. I want to put the output from problem 1 in a single field in worksheet B. The output will contain a list of descriptions. Can someone help me to build this VBA code please ? Floep -- floep ------------------------------------------------------------------------ floep's Profile: http://www.excelforum.com/member.php...o&userid=36853 View this thread: http://www.excelforum.com/showthread...hreadid=565612 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Filtering and Text/number problems | Excel Discussion (Misc queries) | |||
filtering problems | Excel Worksheet Functions | |||
Problems with filtering and output | Excel Programming | |||
Problems with filtering and output | Excel Programming | |||
Problems with filtering!! | Excel Programming |