Hi all..Could you please fix this issue for me. I have attached a sample file.
I need the result on the second page.
Please help!
Hi all..Could you please fix this issue for me. I have attached a sample file.
I need the result on the second page.
Please help!
You need to explain the problem PROPERLY.
Regards
Special-K
Ensure you describe your problem clearly, I have little time available to solve these problems and do not appreciate numerous changes to them.
I am so sorry..was in hurry to post it.. What I need to get the data on the second page when I input the category number . I tried to do it by Sumifs/Index and match but failed to do it. Could you please help me to fix this.
=IFERROR(INDEX('Lev1'!$B$8:$N$13,MATCH($A2,'Lev1'!$B$8:$B$13,0),MATCH($B$1,'Lev1'!$B$8:$N$8,0)),"NA")
Try the above in "B2" Cell of Results sheet and copy towards down
Samba
Say thanks to those who have helped you by clicking Add Reputation star.
So Result!B1 is the category number you are trying to find?
in Result!B2
=INDEX('Lev1'!C$9:N$13,MATCH(A2,'Lev1'!B$9:B$13,0),MATCH(B$1,'Lev1'!C$8:N$8,0))
and copy down the column
Thanks a lot nflsales and Special K!!
With the macro below, and after that a pivot table.
See the attached file.
![]()
Sub CONVERTROWSTOCOL_Oeldere_revisted() Dim rsht1 As Long, rsht2 As Long, i As Long, col As Long, wsTest As Worksheet 'check if sheet "ouput" already exist Const strSheetName As String = "Output" Set wsTest = Nothing On Error Resume Next Set wsTest = ActiveWorkbook.Worksheets(strSheetName) On Error GoTo 0 If wsTest Is Nothing Then Worksheets.Add.Name = strSheetName End If With Sheets("Output") .UsedRange.ClearContents .Range("A1:C1").Value = Array("Cat", "Month", "Value") End With rsht1 = Sheets("Lev1").Range("B" & Rows.Count).End(xlUp).Row rsht2 = Sheets("Output").Range("A" & Rows.Count).End(xlUp).Row col = 3 For i = 9 To rsht1 Do While Sheets("Lev1").Cells(8, col).Value <> "" rsht2 = rsht2 + 1 Sheets("Output").Range("A" & rsht2).Value = Sheets("Lev1").Range("B" & i).Value Sheets("Output").Range("B" & rsht2).Value = Sheets("Lev1").Cells(8, col).Value Sheets("Output").Range("C" & rsht2).Value = Sheets("Lev1").Cells(i, col).Value col = col + 1 Loop col = 3 Next With Sheets("Output") Columns("A:Z").EntireColumn.AutoFit End With End Sub
Notice my main language is not English.
I appreciate it, if you reply on my solution.
If you are satisfied with the solution, please mark the question solved.
You can add reputation by clicking on the star * add reputation.
Try
Formula:![]()
=HLOOKUP(B$1,'Lev1'!$C$8:$N$13,MATCH($A2,'Lev1'!$B$8:$B$13,0))
☚ Click ★ just below left if it helps, Boo?ath?![]()
Thank you all!
Thank you all..!!
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks