Count data from other sheets into one cell

Hi guys!

I have multiple sheets on a workbook, labelled 1st all the way to 31st.

I'm trying to create a master sheet, and in Cell B5 of each daily sheet, there will be 3 sets of information, Blue, Green or Orange.

I'm trying to sum all sheets, if it's blue in B5 on the daily sheets = 1, if its green in B5 on the daily sheets = 2, if its orange in B5 on the daily sheets = 3.

Whats the formula, to scan all sheets from the 1st to the 31st, and convert the words into the values above and a total sum?

Hope this makes sense?

Welcome to the forum

Please attach a sample workbook (not a picture or pasted copy). Make sure there is just enough data to demonstrate your need. Include a BEFORE sheet and an AFTER sheet in the workbook if needed to show the process you're trying to complete or automate. Make sure your desired results are shown, mock them up manually if necessary.

Remember to desensitize the data.

Click on GO ADVANCED and then scroll down to Manage Attachments to open the upload window.

Sub WorksheetLoop()

Dim WS_Count As Integer
Dim I As Integer

' Set WS_Count equal to the number of worksheets in the active
' workbook.
WS_Count = ActiveWorkbook.Worksheets.Count

' Begin the loop.
For I = 1 To WS_Count

' Insert your code here.
' The following line shows how to reference a sheet within
' the loop by displaying the worksheet name in a dialog box.
MsgBox ActiveWorkbook.Worksheets(I).Name

Next I

End Sub

I have attached an example workbook, very short but I'm sure I can expand it once I understand the formula

Not fully tested, but should get you in the ballpark..

Please Login or Register  to view this content.