{"id":16818,"date":"2022-10-22T06:32:00","date_gmt":"2022-10-22T01:02:00","guid":{"rendered":"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/"},"modified":"2022-10-22T06:32:00","modified_gmt":"2022-10-22T01:02:00","slug":"solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed","status":"publish","type":"post","link":"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/","title":{"rendered":"[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed]"},"content":{"rendered":"<p> [ad_1]<br \/>\n<\/p>\n<div id=\"answer-20986392\" class=\"answer js-answer accepted-answer js-accepted-answer\" data-answerid=\"20986392\" data-parentid=\"20965009\" data-score=\"0\" data-position-on-page=\"1\" data-highest-scored=\"1\" data-question-has-accepted-highest-score=\"1\" itemprop=\"acceptedAnswer\" itemscope itemtype=\"https:\/\/schema.org\/Answer\">\n<div class=\"post-layout\">\n<div class=\"votecell post-layout--left\"><\/div>\n<div class=\"answercell post-layout--right\">\n<div class=\"s-prose js-post-body\" itemprop=\"text\">\n<p>Edit: The code below should now arrange the totals by date.<\/p>\n<pre><code>Private Sub Total()\n\nDim apple As Integer\nDim banana As Integer\nDim grape As Integer\nDim pear As Integer\nDim lemon As Integer\nDim orange As Integer\nDim sheet As Worksheet\nDim i As Integer\nDim lastRow As Integer\nDim j As Integer\nDim comp1 As String\nDim comp2 As String\n\napple = 0\nbanana = 0\ngrape = 0\npear = 0\nlemon = 0\norange = 0\n\n\nFor Each sheet In Worksheets\nsheet.Activate\nlastRow = WorksheetFunction.CountA(Range(\"A:A\"))\nj = 2\n'Create the header for the Totals cells\nActiveSheet.Cells(lastRow + 1, 1).Value = \"Date\"\nActiveSheet.Cells(lastRow + 1, 2).Value = \"Apples\"\nActiveSheet.Cells(lastRow + 1, 3).Value = \"Bananas\"\nActiveSheet.Cells(lastRow + 1, 4).Value = \"Grapes\"\nActiveSheet.Cells(lastRow + 1, 5).Value = \"Pears\"\nActiveSheet.Cells(lastRow + 1, 6).Value = \"Lemons\"\nActiveSheet.Cells(lastRow + 1, 7).Value = \"Oranges\"\n\nFor i = 2 To lastRow\n    'Compare the date in row i to row i + 1 to see if we should add the totals or start a new daily total\n    comp1 = ActiveSheet.Cells(i, 5).Value\n    comp2 = ActiveSheet.Cells(i + 1, 5).Value\n\n        'Determine which variable to increment\n       If ActiveSheet.Cells(i, 6).Value = \"apple\" Then\n            apple = apple + 1\n        ElseIf ActiveSheet.Cells(i, 6).Value = \"banana\" Then\n            banana = banana + 1\n        ElseIf ActiveSheet.Cells(i, 6).Value = \"grape\" Then\n            grape = grape + 1\n        ElseIf ActiveSheet.Cells(i, 6).Value = \"pear\" Then\n            pear = pear + 1\n        ElseIf ActiveSheet.Cells(i, 6).Value = \"lemon\" Then\n           lemon = lemon + 1\n        ElseIf ActiveSheet.Cells(i, 6).Value = \"orange\" Then\n            orange = orange + 1\n        Else\n        End If\n    If comp1 &lt;&gt; comp2 Then\n        'If this is the last entry for this date, past the date and totals\n        ActiveSheet.Cells(lastRow + j, 1).Value = comp1\n        ActiveSheet.Cells(lastRow + j, 2).Value = apple\n        ActiveSheet.Cells(lastRow + j, 3).Value = banana\n        ActiveSheet.Cells(lastRow + j, 4).Value = grape\n        ActiveSheet.Cells(lastRow + j, 5).Value = pear\n        ActiveSheet.Cells(lastRow + j, 6).Value = lemon\n        ActiveSheet.Cells(lastRow + j, 7).Value = orange\n        'Clear variables for next day\n        apple = 0\n        banana = 0\n        grape = 0\n        pear = 0\n        lemon = 0\n        orange = 0\n        'Move to next line for totals row\n        j = j + 1\n\n    Else\n    End If\nNext i\n\nNext sheet\n\nEnd Sub\n<\/code><\/pre>\n<p>This should properly total each page in the manner you are looking for, but it will not create a Grand Total for all pages.  You could implement a large array in this code to store all the values between pages, or possibly create a new function using VLookup and some For loops, but it would be rather complex.  If possible, I would try to make a formula on your Grand Total sheet to pull the data in.<\/p>\n<\/p><\/div>\n<div class=\"mt24\"><\/div>\n<\/div>\n<p>            <span class=\"d-none\" itemprop=\"commentCount\">4<\/span> <\/p><\/div>\n<\/div>\n<p>[ad_2]<\/p>\n<p>solved Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed] <\/p>\n","protected":false},"excerpt":{"rendered":"<p>[ad_1] Edit: The code below should now arrange the totals by date. Private Sub Total() Dim apple As Integer Dim banana As Integer Dim grape As Integer Dim pear As Integer Dim lemon As Integer Dim orange As Integer Dim sheet As Worksheet Dim i As Integer Dim lastRow As Integer Dim j As Integer &#8230; <a title=\"[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed]\" class=\"read-more\" href=\"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/\" aria-label=\"More on [Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed]\">Read more<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[320],"tags":[400,2847,401],"class_list":["post-16818","post","type-post","status-publish","format-standard","hentry","category-solved","tag-excel","tag-pivot-table","tag-vba"],"yoast_head":"<!-- This site is optimized with the Yoast SEO plugin v26.5 - https:\/\/yoast.com\/wordpress\/plugins\/seo\/ -->\n<title>[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed] - JassWeb<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/\" \/>\n<meta property=\"og:locale\" content=\"en_US\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed] - JassWeb\" \/>\n<meta property=\"og:description\" content=\"[ad_1] Edit: The code below should now arrange the totals by date. Private Sub Total() Dim apple As Integer Dim banana As Integer Dim grape As Integer Dim pear As Integer Dim lemon As Integer Dim orange As Integer Dim sheet As Worksheet Dim i As Integer Dim lastRow As Integer Dim j As Integer ... Read more\" \/>\n<meta property=\"og:url\" content=\"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/\" \/>\n<meta property=\"og:site_name\" content=\"JassWeb\" \/>\n<meta property=\"article:published_time\" content=\"2022-10-22T01:02:00+00:00\" \/>\n<meta name=\"author\" content=\"Kirat\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Written by\" \/>\n\t<meta name=\"twitter:data1\" content=\"Kirat\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. reading time\" \/>\n\t<meta name=\"twitter:data2\" content=\"2 minutes\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/#article\",\"isPartOf\":{\"@id\":\"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/\"},\"author\":{\"name\":\"Kirat\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31\"},\"headline\":\"[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed]\",\"datePublished\":\"2022-10-22T01:02:00+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/\"},\"wordCount\":130,\"publisher\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#organization\"},\"keywords\":[\"excel\",\"pivot-table\",\"vba\"],\"articleSection\":[\"Solved\"],\"inLanguage\":\"en-US\"},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/\",\"url\":\"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/\",\"name\":\"[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed] - JassWeb\",\"isPartOf\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#website\"},\"datePublished\":\"2022-10-22T01:02:00+00:00\",\"breadcrumb\":{\"@id\":\"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/#breadcrumb\"},\"inLanguage\":\"en-US\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"Home\",\"item\":\"https:\/\/jassweb.com\/solved\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed]\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/jassweb.com\/solved\/#website\",\"url\":\"https:\/\/jassweb.com\/solved\/\",\"name\":\"JassWeb\",\"description\":\"Build High-quality Websites\",\"publisher\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/jassweb.com\/solved\/?s={search_term_string}\"},\"query-input\":{\"@type\":\"PropertyValueSpecification\",\"valueRequired\":true,\"valueName\":\"search_term_string\"}}],\"inLanguage\":\"en-US\"},{\"@type\":\"Organization\",\"@id\":\"https:\/\/jassweb.com\/solved\/#organization\",\"name\":\"Jass Web\",\"url\":\"https:\/\/jassweb.com\/solved\/\",\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/\",\"url\":\"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png\",\"contentUrl\":\"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png\",\"width\":693,\"height\":132,\"caption\":\"Jass Web\"},\"image\":{\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/\"}},{\"@type\":\"Person\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31\",\"name\":\"Kirat\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/jassweb.com\/solved\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1775798750\",\"contentUrl\":\"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1775798750\",\"caption\":\"Kirat\"},\"sameAs\":[\"http:\/\/jassweb.com\"],\"url\":\"https:\/\/jassweb.com\/solved\/author\/jaspritsinghghumangmail-com\/\"}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed] - JassWeb","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/","og_locale":"en_US","og_type":"article","og_title":"[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed] - JassWeb","og_description":"[ad_1] Edit: The code below should now arrange the totals by date. Private Sub Total() Dim apple As Integer Dim banana As Integer Dim grape As Integer Dim pear As Integer Dim lemon As Integer Dim orange As Integer Dim sheet As Worksheet Dim i As Integer Dim lastRow As Integer Dim j As Integer ... Read more","og_url":"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/","og_site_name":"JassWeb","article_published_time":"2022-10-22T01:02:00+00:00","author":"Kirat","twitter_card":"summary_large_image","twitter_misc":{"Written by":"Kirat","Est. reading time":"2 minutes"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/#article","isPartOf":{"@id":"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/"},"author":{"name":"Kirat","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31"},"headline":"[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed]","datePublished":"2022-10-22T01:02:00+00:00","mainEntityOfPage":{"@id":"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/"},"wordCount":130,"publisher":{"@id":"https:\/\/jassweb.com\/solved\/#organization"},"keywords":["excel","pivot-table","vba"],"articleSection":["Solved"],"inLanguage":"en-US"},{"@type":"WebPage","@id":"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/","url":"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/","name":"[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed] - JassWeb","isPartOf":{"@id":"https:\/\/jassweb.com\/solved\/#website"},"datePublished":"2022-10-22T01:02:00+00:00","breadcrumb":{"@id":"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/#breadcrumb"},"inLanguage":"en-US","potentialAction":[{"@type":"ReadAction","target":["https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/jassweb.com\/solved\/solved-is-it-possible-to-count-date-stamped-variables-accross-multiple-sheets-in-excel-2010-and-list-it-by-date-closed\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"Home","item":"https:\/\/jassweb.com\/solved\/"},{"@type":"ListItem","position":2,"name":"[Solved] Is it possible to count date stamped variables accross multiple sheets in Excel 2010 and list it by date? [closed]"}]},{"@type":"WebSite","@id":"https:\/\/jassweb.com\/solved\/#website","url":"https:\/\/jassweb.com\/solved\/","name":"JassWeb","description":"Build High-quality Websites","publisher":{"@id":"https:\/\/jassweb.com\/solved\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/jassweb.com\/solved\/?s={search_term_string}"},"query-input":{"@type":"PropertyValueSpecification","valueRequired":true,"valueName":"search_term_string"}}],"inLanguage":"en-US"},{"@type":"Organization","@id":"https:\/\/jassweb.com\/solved\/#organization","name":"Jass Web","url":"https:\/\/jassweb.com\/solved\/","logo":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/","url":"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png","contentUrl":"https:\/\/jassweb.com\/wp-content\/uploads\/2021\/02\/jass-website-logo-1.png","width":693,"height":132,"caption":"Jass Web"},"image":{"@id":"https:\/\/jassweb.com\/solved\/#\/schema\/logo\/image\/"}},{"@type":"Person","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/person\/65c9c7b7958150c0dc8371fa35dd7c31","name":"Kirat","image":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/jassweb.com\/solved\/#\/schema\/person\/image\/","url":"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1775798750","contentUrl":"https:\/\/jassweb.com\/solved\/wp-content\/litespeed\/avatar\/1261af3c9451399fa1336d28b98ea3bb.jpg?ver=1775798750","caption":"Kirat"},"sameAs":["http:\/\/jassweb.com"],"url":"https:\/\/jassweb.com\/solved\/author\/jaspritsinghghumangmail-com\/"}]}},"_links":{"self":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/posts\/16818","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/comments?post=16818"}],"version-history":[{"count":0,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/posts\/16818\/revisions"}],"wp:attachment":[{"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/media?parent=16818"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/categories?post=16818"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/jassweb.com\/solved\/wp-json\/wp\/v2\/tags?post=16818"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}