Create reports from multiple sheets

[KonVba]

Hello I'm new in the forum.
I have a problem with a workbook how to create some reports.
I had post my question to another vba- forum but no answer to fit me!!!!
SO I please for your help.

I have a workbook with more than 12 sheets. Sheet names are month of a year. The months starts from September until next August. The sheets names are like 09_14, 10_14 .... 08_15
In every month sheet i have the same template. Col A is numbering from A3 to ....., col B is the names, col C is value 1, col D is value 2, col E is value 3, col f is value 4, col G is remarkA, col H is remark B.

What I want is 3 types of reports:
1. Search between months (start - end) for a specific name (col. B), and the result (col B until col H) should go to a sheet named report.
2. In every sheet some names have a specific remark col G-H. The remarks are "AA" or "BB". Search for all AA or BB between months (start - end) and the result (col B until col H) should go to a sheet named report.
3. I have a sheet Year. That sheets add every month some sums (col C-F) of every month sheet. I want to Search between months (start - end) and the result (month sum Col C-F) should go to a sheet named report.

I appreciate for every help.
Maybe i can provide an attach file??
Thanks a lot for your time

 

[oldbrewer]

I think you need to put ALL your data into one spreadsheet and then analyse it on your monthly sheets - is this possible?

 

[KonVba]

Ok.... it is not possible.
So another way??

 

[KonVba]

Hey
I will appreciate for any help please!!!!

 

[oldbrewer]

see if you can amalgamate all data on a new sheet prior to analysis

 

[Steph77]

I haven't got the experience to write the code without spending ages debugging it (all my VBA coding involves writing something then adjusting it repeatedly until it works and takes ages - I'm a newbie myself), but I know the following is possible:

For (1)
Turn autofilter on and filter each sheet in turn for the specified name. Copy the results to another sheet. Report made.

For (2)
Same as for (1)

For (3)
I'm not sure I understand. if you just want selected months totals in a report instead of all months totals you could just hardcode to copy/paste only the columns/rows for the bits of data you want based on a user input for the range?

 

[oldbrewer]

7	these three tables are on sheets2, 3 and 4
	the row counters above them automatically count the number of rows	the macro finds the data and copies it to this sheet
5					7					8
name	value1	value2	value3		name	value1	value2	value3		name	value1	value2	value3
N1	4	5	6		N6	4	8	9		N11	14	15	11
N2	5	6	7		N7	5	11	12		N12	17	18	12
N3	6	7	8		N8	12	14	15		N13	20	21	13
N4	7	8	9		N9	7	17	18		N14	23	24	14
N5	8	9	10		N10	8	20	21		N15	26	27	15
					N17	9	23	24		N19	29	30	16
					N18	10	26	27		N20	32	33	17
										N21	35	36	18
								macro code
								Dim b(4)
								rownum = 19
name	value1	value2	value3					Sheets("Sheet2").Select
N1	4	5	6					n = Cells(1, 1)
N2	5	6	7					Sheets("sheet1").Select
N3	6	7	8					For j = 3 To n + 2
N4	7	8	9					rownum = rownum + 1
N5	8	9	10					For k = 1 To 4
N6	4	8	9					Sheets("Sheet2").Select
N7	5	11	12					b(k) = Cells(j, k)
N8	12	14	15					Sheets("sheet1").Select
N9	7	17	18					Cells(rownum, k) = b(k)
N10	8	20	21					Next k
N17	9	23	24					Next j
N18	10	26	27					Sheets("Sheet3").Select
N11	14	15	11					n = Cells(1, 1)
N12	17	18	12					Sheets("sheet1").Select
N13	20	21	13					For j = 3 To n + 2
N14	23	24	14					rownum = rownum + 1
N15	26	27	15					For k = 1 To 4
N19	29	30	16					Sheets("Sheet3").Select
N20	32	33	17					b(k) = Cells(j, k)
N21	35	36	18					Sheets("sheet1").Select
								Cells(rownum, k) = b(k)
								Next k
								Next j
								Sheets("Sheet4").Select
								n = Cells(1, 1)
								Sheets("sheet1").Select
								For j = 3 To n + 2
								rownum = rownum + 1
								For k = 1 To 4
								Sheets("Sheet4").Select
								b(k) = Cells(j, k)
								Sheets("sheet1").Select
								Cells(rownum, k) = b(k)
								Next k
								Next j
								End Sub

<colgroup><col span="16"></colgroup><tbody>
</tbody>