Code to use multiple trigger cells to hide / unhide rows of corresponding question sets

SDSSask

New Member
Joined
Sep 9, 2022
Messages
2
Office Version
  1. 2019
Platform
  1. Windows
Hi,

The code below was working exactly as needed with only one trigger cell value per Dim range but I now need to add 3 additional trigger cells to TriggerCellAg Range("J10, N10, R10, V10") and TriggerCellCom Range("J14, N14, R14, V14"). I'm trying to get the worksheet to unhide the question sets that are applicable to each trigger cell for the user to answer but nothing is working, the closest I came the second trigger cell would override the first trigger cell but still only show one question set at a time. I've also tried duplicating Dim and Set to include additional lines for TriggerCellAg2, etc.. Ag3, Ag4 without having to replicate all of the case statements four times....there is already a lot of code running in the workbook.

Any and all help would be appreciated.

VBA Code:
Option Explicit
Private Sub InIt()
 Application.EnableEvents = True
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)

Dim TriggerCellAg As Range
Dim TriggerCellCom As Range
Dim TriggerCellEO As Range

Set TriggerCellAg = Range("$J$10")
Set TriggerCellCom = Range("$J$14")
Set TriggerCellEO = Range("$I$23")

If Not Application.Intersect(TriggerCellEO, Target) Is Nothing Then

    If Application.Intersect(TriggerCellEO, Target) Is Nothing Then Exit Sub
    Application.EnableEvents = True
    Rows("24:56").Hidden = False
    Select Case TriggerCellEO.Value
        Case "No"
            Rows("24:56").Hidden = True

End Select

End If

If Not Application.Intersect(TriggerCellAg, Target) Is Nothing Then

    If Application.Intersect(TriggerCellAg, Target) Is Nothing Then Exit Sub
    Application.EnableEvents = False
    Rows("63:299").Hidden = True
    Select Case TriggerCellAg.Value
        Case "Potatoes (table) growing"
            Rows("63:63").Hidden = False
        Case "Potatoes (seed) growing"
            Rows("64:64").Hidden = False
        Case "Growing vegetables and melons and selling them at roadside stands"
            Rows("65:65").Hidden = False
        Case "Growing vegetables and melons and selling them at market gardens / farmers markets"
            Rows("66:66").Hidden = False
        Case "Grain growing"
            Rows("67:68").Hidden = False
        Case "Market gardening except greenhouses"
            Rows("69:69").Hidden = False
        Case "Mixed vegetables growing except greenhouses"
            Rows("70:70").Hidden = False
        Case "Citrus groves and farms"
            Rows("71:73").Hidden = False
        Case "Fruit and tree nut combination farming"
            Rows("74:76").Hidden = False
        Case "Fruit growers (e.g. pome and stone fruits)"
            Rows("77:79").Hidden = False
        Case "Non citrus fruit farming"
            Rows("80:82").Hidden = False
        Case "Small berry fruit farming (e.g. blackberry, blueberry, currant, dewbery, loganberry, raspberry)"
           Rows("83:85").Hidden = False
        Case "Herb farming (e.g. ginseng, echinacea, etc.) except greenhouses"
            Rows("86:86").Hidden = False
        Case "Christmas tree growing"
            Rows("87:89").Hidden = False
        Case "Turf (sod) farming"
           Rows("90:90").Hidden = False
        Case "Floriculture except greehouses"
            Rows("91:91").Hidden = False
        Case "Alfalfa, clover, hay or timothy farming"
           Rows("92:92").Hidden = False
        Case "Fruit and vegetable combination"
            Rows("93:93").Hidden = False
        Case "Maple syrup and products production"
            Rows("94:99").Hidden = False
        Case "Combination field crop farming"
            Rows("100:101").Hidden = False
        Case "Hemp growing"
            Rows("102:103").Hidden = False
        Case "Hops and grain growing, combination"
            Rows("104:104").Hidden = False
        Case "Peanut farming"
            Rows("105:106").Hidden = False
        Case "Seed growers"
            Rows("107:108").Hidden = False
        Case "Sugar beet farming and grain growing, combination"
            Rows("109:110").Hidden = False
        Case "Tea farming"
            Rows("111:112").Hidden = False
        Case "Beef cattle feedlots"
            Rows("113:121").Hidden = False
        Case "Beef cattle ranching"
            Rows("122:130").Hidden = False
        Case "Beef cattle finishing - Grassers seasonal"
            Rows("131:131").Hidden = False
        Case "Dairy cattle and milk production"
            Rows("132:136").Hidden = False
        Case "Hog - Farrow to Finish - Secondary operations only"
            Rows("137:139").Hidden = False
        Case "Hog - Finishing only - Secondary operations only"
            Rows("140:142").Hidden = False
        Case "Chicken egg production"
            Rows("143:149").Hidden = False
        Case "Broiler and other meat-type chicken production"
            Rows("150:156").Hidden = False
        Case "Caponor or Cornish hens farming"
            Rows("157:163").Hidden = False
        Case "Turkey production"
            Rows("164:170").Hidden = False
        Case "Egg hatcheries, poultry"
            Rows("171:179").Hidden = False
        Case "Combination poultry and egg production"
            Rows("180:186").Hidden = False
        Case "Ostrich or emu farming"
            Rows("187:188").Hidden = False
        Case "Pheasant, geesem, goose, duck quail or guinea fowl farming"
            Rows("189:190").Hidden = False
        Case "Pigeon or squab farming"
            Rows("191:1920").Hidden = False
        Case "Lamb or sheep farming, including feedlots"
            Rows("193:203").Hidden = False
        Case "Milk production, goat farming"
            Rows("204:206").Hidden = False
        Case "Aquaculture inland operations only"
            Rows("207:207").Hidden = False
        Case "Apiaries - honey"
            Rows("208:211").Hidden = False
        Case "Leafcutter bees raising"
            Rows("212:213").Hidden = False
        Case "Gathering of wild mushrooms and truffles"
            Rows("214:214").Hidden = False
        Case "Wild berry picking"
            Rows("215:215").Hidden = False
        Case "Worm gathering"
            Rows("216:216").Hidden = False
        Case "Custom crop spraying"
            Rows("217:225").Hidden = False
        Case "Custom granular application (spreading fines)"
            Rows("226:232").Hidden = False
        Case "Custom seed treating"
            Rows("233:235").Hidden = False
        Case "Custom soil amendment application"
            Rows("236:241").Hidden = False
        Case "Custom harvesting"
            Rows("242:243").Hidden = False
        Case "Custom mobile grain cleaning service"
            Rows("244:245").Hidden = False
        Case "Custom planting or seeding"
            Rows("246:247").Hidden = False
        Case "Custom tillage or land breaking"
            Rows("248:249").Hidden = False
        Case "Orchard cultivation services"
            Rows("250:251").Hidden = False
        Case "Agronomy"
            Rows("252:252").Hidden = False
        Case "Farm produce (e.g., fruit, vegetable) packing service"
            Rows("253:253").Hidden = False
        Case "Seed and / or chemical distributors"
            Rows("254:257").Hidden = False
        Case "Fruit picking service, hand (e.g., apple, strawberry, blueberry, cherry)"
            Rows("258:258").Hidden = False
        Case "Custom grain drying service"
            Rows("259:261").Hidden = False
        Case "Grain fumigation service"
            Rows("262:266").Hidden = False
        Case "Custom haying and/or chopping"
            Rows("267:268").Hidden = False
        Case "Hulling and shelling of almonds, filberts, nuts, peanuts, pecans and walnuts"
            Rows("269:269").Hidden = False
        Case "Animal semen collection, production and storage services"
            Rows("270:273").Hidden = False
        Case "Artificial insemination services, animal specialties and livestock"
            Rows("274:275").Hidden = False
        Case "Breeding services for livestock"
            Rows("276:277").Hidden = False
        Case "Brand inspector"
            Rows("278:278").Hidden = False
        Case "Catching poultry, with no hauling"
            Rows("279:280").Hidden = False
        Case "Cattle dehorning and hoof trimming services"
            Rows("281:281").Hidden = False
        Case "Chick sexing service"
            Rows("282:282").Hidden = False
        Case "Cleaning poultry houses"
            Rows("283:283").Hidden = False
        Case "Custom manure hauling, corral and feedlot cleaning, service"
            Rows("284:286").Hidden = False
        Case "Egg grading station, fee-based"
            Rows("287:287").Hidden = False
        Case "Embryo transplant service, agricultural"
            Rows("288:289").Hidden = False
        Case "Farriers (horseshoeing)"
            Rows("290:293").Hidden = False
        Case "Fur pelting service"
            Rows("294:294").Hidden = False
        Case "Sheep dipping and shearing services"
            Rows("295:296").Hidden = False
        Case "Vaccinating livestock (except by veterinarians)"
            Rows("297:299").Hidden = False

  End Select

End If

If Not Application.Intersect(TriggerCellCom, Target) Is Nothing Then

    If Application.Intersect(TriggerCellCom, Target) Is Nothing Then Exit Sub
    Application.EnableEvents = False
    Rows("300:1823").Hidden = True
    Select Case TriggerCellCom.Value
        Case "Electrician (no alarm testing or hook up), farm based business"
            Rows("300:306").Hidden = False
        Case "Plumbing and heating contractors, farm based business"
            Rows("307:330").Hidden = False
        Case "Plumbing contractors, farm based business"
            Rows("331:338").Hidden = False
        Case "Assembly and installation for others of agricultural equipment in farm outbuildings, farm based business"
            Rows("339:344").Hidden = False
        Case "Automatic gate installation (e.g., garage, lane), farm based business"
            Rows("345:350").Hidden = False
        Case "Drywall finishing (e.g., sanding, spackling, stippling, taping, texturing), farm based business"
            Rows("351:357").Hidden = False
        Case "Drywall installation, including the hanging of drywall, sheetrock, plasterboard, gypsum wallboard and subsequent finishing, farm based business"
            Rows("358:364").Hidden = False
        Case "Heavy machinery painting, farm based business"
            Rows("365:372").Hidden = False
        Case "Painting contractors, farm based business"
            Rows("373:382").Hidden = False
        Case "Flooring contractors, excluding hardwood refinishing, farm based business"
            Rows("383:383").Hidden = False
        Case "Tile and terrazzo contractors, farm based business"
            Rows("384:384").Hidden = False
        Case "Deck and fence construction (wooden excluding pasture fencing), farm based business"
            Rows("385:390").Hidden = False
        Case "Brush clearing or cutting, farm based business"
            Rows("391:395").Hidden = False
        Case "Cutting of rights-of-way contractor, farm based business"
            Rows("396:400").Hidden = False
        Case "Land clearing contractors farm based business"
            Rows("401:407").Hidden = False
        Case "Power, communication and pipelines, rights of way clearance (except maintenance), farm based business"
            Rows("408:412").Hidden = False
        Case "Septic tanks and weeping tile installation, farm based business"
            Rows("413:431").Hidden = False
        Case "Brick pavers installation (e.g., driveways, patios and sidewalks), farm based business"
            Rows("432:437").Hidden = False
        Case "Concrete patio construction, farm based business"
            Rows("438:446").Hidden = False
        Case "Fences and corral installation, erection or repair, farm based business"
            Rows("447:452").Hidden = False
        Case "Mail boxes erection (single residential/farm - outdoor), farm based business"
            Rows("453:455").Hidden = False
        Case "Post Hole digging contractors, farm based business"
            Rows("456:456").Hidden = False
        Case "Dog and cat food manufacturing, excluding supplement additives, farm based business"
            Rows("457:461").Hidden = False
        Case "Other animal food manufacturing, excluding supplement additives, farm based business"
            Rows("462:462").Hidden = False
        Case "Barley feed, chopped, crushed or ground, excluding supplement additives, manufacturing, farm based business"
            Rows("463:465").Hidden = False
        Case "Bird food manufacturing, excluding supplement additives, farm based business"
            Rows("466:466").Hidden = False
        Case "Complete livestock feed manufacturing, excluding supplement additives, farm based business"
            Rows("467:469").Hidden = False
        Case "Specialty feed manufacturing excluding supplement additives (e.g., for mice, guinea pig, mink, earthworm, rabbit), farm based business"
            Rows("470:470").Hidden = False
        Case "Micro and macro feed premixes manufacturing for animals, excluding dogs and cats or supplement additives, farm based business"
            Rows("471:471").Hidden = False
        Case "Milling grain to make livestock feed excluding supplement additives, farm based business"
            Rows("472:474").Hidden = False
        Case "Pet food manufacturing excluding dogs and cats or supplement additives, farm based business"
            Rows("475:475").Hidden = False
        Case "Shell crushing and grinding for animal feed, excluding supplement additives, farm based business"
            Rows("476:476").Hidden = False
        Case "Flour milling, farm based business"
            Rows("477:479").Hidden = False
        Case "Rice or corn milling and malt manufacturing, farm based business"
            Rows("480:483").Hidden = False
        Case "Tapioca manufacturing, farm based business"
            Rows("484:486").Hidden = False
        Case "Wet grain or corn milling, farm based business"
            Rows("487:488").Hidden = False
        Case "Edible and inedible oilseed products, farm based business"
            Rows("489:490").Hidden = False
        Case "Oilseed crushing mills, farm based business"
            Rows("491:492").Hidden = False
        Case "Oils made from purchased oils (e.g., rapeseed (canola), cottonseed, soybean, olive, peanut, linseed, palm-kernel, sunflower), farm based business"
            Rows("493:495").Hidden = False
        Case "Breakfast cereal manufacturing, farm based business"
            Rows("496:498").Hidden = False
        Case "Sugar manufacturing, farm based business"
            Rows("499:505").Hidden = False
        Case "Dried beet pulp manufacturing, farm based business"
            Rows("506:511").Hidden = False
        Case "Non-chocolate confectionery manufacturing, farm based business"
            Rows("512:517").Hidden = False
        Case "Cake ornaments & edible confectionery manufacturing, farm based business"
            Rows("518:522").Hidden = False
        Case "Candied fruit & fruit peel products manufacturing (e.g., candied, glazed, crystallized), farm based business"
            Rows("523:526").Hidden = False
        Case "Chewing gum manufacturing, farm based business"
            Rows("527:529").Hidden = False
        Case "Corn confections manufacturing (e.g., popcorn balls, candy-coated popcorn products), farm based business"
            Rows("530:534").Hidden = False
        Case "Cough drops or lozenges manufacturing (except medicated), farm based business"
            Rows("535:537").Hidden = False
        Case "Sugared and stuffed dates manufacturing, farm based business"
            Rows("538:542").Hidden = False
        Case "Energy food bar manufacturing, farm based business"
            Rows("543:547").Hidden = False
        Case "Fudge manufacturing, farm based business"
            Rows("548:552").Hidden = False
        Case "Granola bars and clusters manufacturing, farm based business"
            Rows("553:557").Hidden = False
        Case "Halvah manufacturing, farm based business"
            Rows("558:562").Hidden = False
        Case "Marshmallows manufacturing, farm based business"
            Rows("563:567").Hidden = False
        Case "Covered nuts manufacturing, farm based business"
            Rows("568:572").Hidden = False
        Case "Synthetic chocolate, marzipan or toffee manufacturing, farm based business"
            Rows("573:575").Hidden = False
        Case "Confectionery manufacturing from purchased chocolate, farm based business"
            Rows("576:580").Hidden = False
        Case "Chocolate-covered granola bars made from purchased chocolate, farm based business"
             Rows("581:585").Hidden = False
        Case "Drinks, cocoa powder or instant chocolate made from purchased chocolate, farm based business"
             Rows("586:588").Hidden = False
        Case "Chocolate-covered nuts made from purchased chocolate, farm based business"
            Rows("589:591").Hidden = False
        Case "Frozen food manufacturing, farm based business"
            Rows("592:597").Hidden = False
        Case "Blast freezing on a contract basis, farm based business"
            Rows("598:598").Hidden = False
        Case "Frozen fruit and vegetable juice concentrates manufacturing, farm based business"
            Rows("599:604").Hidden = False
        Case "Dietetic, homogenized or low sodium frozen foods, farm based business"
            Rows("605:610").Hidden = False
        Case "Frozen whipped topping manufacturing, farm based business"
            Rows("611:616").Hidden = False
        Case "Fruit and vegetable canning, pickling & drying, farm based business"
            Rows("617:621").Hidden = False
        Case "Bouillon canning, farm based business"
            Rows("622:626").Hidden = False
        Case "Broth canning (except seafood), farm based business"
            Rows("627:631").Hidden = False
        Case "Canned pasta manufacturing, farm based business"
            Rows("632:636").Hidden = False
        Case "Canning soups (except seafood), farm based business"
            Rows("637:641").Hidden = False
        Case "Catsup & similar tomato sauces manufacturing, farm based business"
            Rows("642:646").Hidden = False
        Case "Chili con carne canning, farm based business"
            Rows("647:651").Hidden = False
        Case "Chinese foods canning, farm based business"
            Rows("652:656").Hidden = False
        Case "Dehydrating fruits and vegetables (except sun drying), farm based business"
            Rows("657:658").Hidden = False
        Case "Freeze-drying fruits & vegetables, farm based business"
            Rows("659:664").Hidden = False
        Case "Gravy canning, farm based business"
            Rows("665:669").Hidden = False
        Case "Canned hominy manufacturing, farm based business"
            Rows("670:674").Hidden = False
        Case "Horseradish canning (except sauce), farm based business"
            Rows("675:679").Hidden = False
        Case "Infant and junior food canning, farm based business"
            Rows("680:684").Hidden = False
        Case "Pork and beans canning, farm based business"
            Rows("685:689").Hidden = False
        Case "Potato products dehydrating (e.g., flakes, granules), farm based business"
            Rows("690:694").Hidden = False
        Case "Preserves, jams and jellies manufacturing, farm based business"
            Rows("695:699").Hidden = False
        Case "Relishes canning, farm based business"
            Rows("700:704").Hidden = False
        Case "Dry salad dressing mixes, farm based business"
            Rows("705:709").Hidden = False
        Case "Dry Sauce mixes, farm based business"
            Rows("710:714").Hidden = False
        Case "Sauerkraut manufacturing, farm based business"
            Rows("715:719").Hidden = False
        Case "Fluid milk manufacturing, farm based business"
            Rows("720:724").Hidden = False
        Case "Cottage cheese manufacturing, farm based business"
            Rows("725:729").Hidden = False
        Case "Cream manufacturing, farm based business"
            Rows("730:734").Hidden = False
        Case "Sour-cream based dips manufacturing, farm based business"
           Rows("735:740").Hidden = False
        Case "Fresh non-alcholic eggnog manufacturing, farm based business"
            Rows("741:745").Hidden = False
        Case "Fluid milk substitutes manufacturing, farm based business"
            Rows("746:750").Hidden = False
        Case "Milk-based drinks manufacturing (except dietary), farm based business"
            Rows("751:755").Hidden = False
        Case "Non-dairy liquid creamers manufacturing, farm based business"
           Rows("756:761").Hidden = False
        Case "Sour cream substitutes manufacturing, farm based business"
            Rows("762:767").Hidden = False
        Case "Sour cream manufacturing, farm based business"
            Rows("768:772").Hidden = False
        Case "Substitute milk products manufacturing, farm based business"
            Rows("773:778").Hidden = False
        Case "Whipping cream manufacturing, farm based business"
            Rows("779:783").Hidden = False
        Case "Yogurt manufacturing (except frozen), farm based business"
            Rows("784:789").Hidden = False
        Case "Butter, cheese & dry and condensed dairy product manufacturing, farm based business"
            Rows("790:793").Hidden = False
        Case "Anhydrous butterfat manufacturing, farm based business"
            Rows("794:797").Hidden = False
        Case "Animal feed dry milk products manufacturing, farm based business"
            Rows("798:800").Hidden = False
        Case "Baby formula fresh, processed & bottled manufacturing, farm based business"
            Rows("801:806").Hidden = False
        Case "Butter, creamery & whey manufacturing, farm based business"
            Rows("807:810").Hidden = False
        Case "Dry & wet casein manufacturing, farm based business"
            Rows("811:812").Hidden = False
        Case "Cheese manufacturing, farm based business"
            Rows("813:817").Hidden = False
        Case "Cheese spreads manufacturing, farm based business"
            Rows("818:822").Hidden = False
        Case "Imitation, substitute or analog cheese manufacturing, farm based business"
            Rows("823:827").Hidden = False
        Case "Condensed, evaporated or powdered whey manufacturing, farm based business"
            Rows("828:831").Hidden = False
        Case "Dried & powdered cream manufacturing, farm based business"
            Rows("832:835").Hidden = False
        Case "Dehydrated milk manufacturing, farm based business"
            Rows("836:839").Hidden = False
        Case "Dairy & non-dairy base drinks manufacturing, farm based business"
            Rows("840:844").Hidden = False
        Case "Ice milk mix manufacturing, farm based business"
            Rows("845:849").Hidden = False
        Case "Milk concentrated, condensed, dried, evaporated or powdered manufacturing, farm based business"
            Rows("850:853").Hidden = False
        Case "Milk UHT (ultra-high temperature) manufacturing, farm based business"
            Rows("854:858").Hidden = False
        Case "Non-dairy dry creamers manufacturing, farm based business"
            Rows("859:863").Hidden = False
        Case "Nonfat dry milk manufacturing, farm based business"
            Rows("864:867").Hidden = False
        Case "Soy beverages manufacturing, farm based business"
            Rows("868:872").Hidden = False
        Case "Substitute butter & cheese manufacturing, farm based business"
            Rows("873:877").Hidden = False
        Case "Liquid raw whey, farm based business"
            Rows("878:881").Hidden = False
        Case "Yogurt mix manufacturing, farm based business"
            Rows("882:886").Hidden = False
        Case "Ice cream, frozen pops & frozen dessert manufacturing, farm based business"
            Rows("887:892").Hidden = False
        Case "Sorbets or sherbets manufacturing, farm based business"
            Rows("893:898").Hidden = False
        Case "Tofu frozen desserts manufacturing, farm based business"
            Rows("899:904").Hidden = False
        Case "Frozen yogurt manufacturing, farm based business"
            Rows("905:910").Hidden = False
        Case "Custom slaughtering, farm based business"
            Rows("911:911").Hidden = False
        Case "Custom cut & wrap, farm based business"
            Rows("912:918").Hidden = False
        Case "Custom slaughtering and cut & wrap, farm based business"
            Rows("919:925").Hidden = False
        Case "Frozen meat pies (i.e., tourtières), made from purchased meat, farm based business"
            Rows("926:931").Hidden = False
        Case "Processed meat (except poultry) made from purchased meat (i.e., pastrami, salami, smoked meat, bologna, weiners, sausage), farm based business"
            Rows("932:936").Hidden = False
        Case "Meat curing, drying, salting, smoking or pickling, made from purchased meat, farm based business"
            Rows("937:941").Hidden = False
        Case "Pigs' feet, cooked and pickled, made from purchased meat, farm based business"
            Rows("942:9446").Hidden = False
        Case "Poultry processing (except baby or pet food), farm based business"
            Rows("947:949").Hidden = False
        Case "Poultry processed meat manufacturing (e.g., hot dogs, luncheon meats, sausages), farm based business"
            Rows("950:954").Hidden = False
        Case "Rabbits slaughtering, processing & dressing (i.e., fresh, frozen, canned or cooked), farm based business"
            Rows("955:958").Hidden = False
        Case "Slaughtering, dressing & packing small game, farm based business"
            Rows("959:960").Hidden = False
        Case "Fish & seafood, curing, drying, pickling, salting, smoking, canning, chowders and soups fresh or frozen, farm based business"
            Rows("961:965").Hidden = False
        Case "Seafood & seafood products fresh prepared or frozen manufacturing, farm based business"
            Rows("966:969").Hidden = False
        Case "Seaweed processing (e.g., dulse), farm based business"
            Rows("970:973").Hidden = False
        Case "Shucking & packing fresh shellfish, farm based business"
            Rows("974:975").Hidden = False
        Case "Retail bakeries stands or markets, farm based business"
            Rows("976:979").Hidden = False
        Case "Commercial bakery products fresh or frozen, farm based business"
            Rows("980:984").Hidden = False
        Case "Communion wafers manufacturing, farm based business"
            Rows("985:989").Hidden = False
        Case "******* meal and crumbs manufacturing, farm based business"
            Rows("990:994").Hidden = False
        Case "*******s, cookies & biscuits manufacturing (e.g., graham, saltine, soda), farm based business"
            Rows("995:999").Hidden = False
        Case "Ice cream cones & wafers manufacturing, farm based business"
            Rows("1000:1004").Hidden = False
        Case "Zwieback & rusk manufacturing, farm based business"
            Rows("1005:1009").Hidden = False
        Case "Flour mixes, dough, pie crust shells, pasteries, prepared batters & pasta manufacturing, farm based business"
            Rows("1010:1014").Hidden = False
        Case "Packaging dry pasta that are manufactured with other ingredients, farm based business"
            Rows("1015:1019").Hidden = False
        Case "Tortilla manufacturing, farm based business"
            Rows("1020:1024").Hidden = False
        Case "Nixtamal milling, farm based business"
            Rows("1025:1029").Hidden = False
        Case "Roasted nut & peanut butter manufacturing, farm based business"
            Rows("1030:1034").Hidden = False
        Case "Nuts, kernels & seeds roasting and processing, farm based business"
            Rows("1035:1039").Hidden = False
        Case "Baked snack foods manufacturing (e.g., corn chips, tortillas, pretzels), farm based business"
            Rows("1040:1044").Hidden = False
        Case "******* sandwiches made from purchased *******s, farm based business"
            Rows("1045:1049").Hidden = False
        Case "Non-baked snack foods manufacturing (e.g., corn chips, tortilla chips, pretzels), farm based business"
            Rows("1050:1054").Hidden = False
        Case "Popped popcorn manufacturing (except candy-covered), farm based business"
            Rows("1055:1059").Hidden = False
        Case "Potato chips & sticks manufacturing, farm based business"
            Rows("1060:1064").Hidden = False
        Case "Coffee concentrates manufacturing (i.e., instant coffee), farm based business"
            Rows("1065:1069").Hidden = False
        Case "Coffee or tea extracts manufacturing, farm based business"
            Rows("1070:1074").Hidden = False
        Case "Coffee flavourings & syrups manufacturing (i.e., made from coffee), farm based business"
            Rows("1075:1079").Hidden = False
        Case "Blended coffee or tea manufacturing, farm based business"
            Rows("1080:1084").Hidden = False
        Case "Coffee and tea substitutes manufacturing, farm based business"
            Rows("1085:1089").Hidden = False
        Case "Concentrated drink manufacturing (except frozen fruit juice), farm based business"
            Rows("1090:1094").Hidden = False
        Case "Flavouring & syrup concentrates manufacturing (except coffee-based), farm based business"
            Rows("1095:1099").Hidden = False
        Case "Soft drink concentrates manufacturing (i.e., soda fountain syrup), farm based business"
            Rows("1100:1104").Hidden = False
        Case "Seasoning & dressing manufacturing, farm based business"
            Rows("1105:1109").Hidden = False
        Case "Chili pepper or powder manufacturing, farm based business"
            Rows("1110:1114").Hidden = False
        Case "Dips manufacturing (except cheese and sour cream-based), farm based business"
            Rows("1115:1119").Hidden = False
        Case "Dry mixes manufacturing (e.g., gravy, salad dressing, sauce), farm based business"
            Rows("1120:1124").Hidden = False
        Case "Natural food colourings manufacturing, farm based business"
            Rows("1125:1129").Hidden = False
        Case "Hop extract manufacturing, farm based business"
            Rows("1130:1134").Hidden = False
        Case "Mayonnaise & prepared mustard manufacturing, farm based business"
            Rows("1135:1139").Hidden = False
        Case "Mining and processing of table salt, farm based business"
            Rows("1140:1144").Hidden = False
        Case "Pectin manufacturing, farm based business"
            Rows("1145:1149").Hidden = False
        Case "Processing purchased salt into table salt manufacturing, farm based business"
            Rows("1150:1154").Hidden = False
        Case "Salt with seasoning additives manufacturing, farm based business"
            Rows("1155:1159").Hidden = False
        Case "Salt substitute manufacturing, farm based business"
            Rows("1160:1164").Hidden = False
        Case "Spice grinding & blending, farm based business"
            Rows("1165:1169").Hidden = False
        Case "Vinegar & cider vinegar manufacturing, farm based business"
            Rows("1170:1174").Hidden = False
        Case "Worcestershire sauce manufacturing, farm based business"
            Rows("1175:1179").Hidden = False
        Case "Almond pastes manufacturing, farm based business"
            Rows("1180:1184").Hidden = False
        Case "Baking powder & yeast manufacturing, farm based business"
            Rows("1185:1189").Hidden = False
        Case "Dry ****tail mixes manufacturing, farm based business"
            Rows("1190:1194").Hidden = False
        Case "Corn for popping manufacturing, farm based business"
            Rows("1195:1199").Hidden = False
        Case "Corn syrups made from purchased sweeteners, farm based business"
            Rows("1200:1204").Hidden = False
        Case "Gravy manufacturing (except dry mix), farm based business"
            Rows("1205:1209").Hidden = False
        Case "Honey processing, farm based business"
            Rows("1210:1214").Hidden = False
        Case "Manufacturing and packaging for individual resale of perishable prepared foods such as salads, fresh pizza, and fresh pasta, farm based business"
            Rows("1215:1219").Hidden = False
        Case "Manufacturing fresh perogies, farm based business"
            Rows("1220:1224").Hidden = False
        Case "Noodle mixes made from purchased dried ingredients (e.g., pad thai noodle mix), farm based business"
            Rows("1225:1229").Hidden = False
        Case "Pancake syrup manufacturing (except pure maple), farm based business"
            Rows("1230:1234").Hidden = False
        Case "Freah pizza manufacturing, farm based business"
            Rows("1235:1239").Hidden = False
        Case "Popcorn manufacturing (except popped), farm based business"
            Rows("1240:1244").Hidden = False
        Case "Potato or rice mixes made from purchased dried ingredients, farm based business"
            Rows("1245:1249").Hidden = False
        Case "Dry soup mixes made from purchased dry ingredients, farm based business"
            Rows("1250:1254").Hidden = False
        Case "Sushi manufacturing, farm based business"
            Rows("1255:1259").Hidden = False
        Case "Corn syrup manufacturing (except wet milled), farm based business"
            Rows("1260:1264").Hidden = False
        Case "Artificially flavoured table syrup manufacturing, farm based business"
            Rows("1265:1269").Hidden = False
        Case "Tofu manufacturing (except frozen desserts), farm based business"
            Rows("1270:1274").Hidden = False
        Case "Beer manufacturing not brewed (e.g., birch, ginger or root), farm based business"
            Rows("1275:1280").Hidden = False
        Case "Carbonated non-alcoholic beverage manufacturing, farm based business"
            Rows("1281:1286").Hidden = False
        Case "Carbonated mineral waters manufacturing, farm based business"
            Rows("1287:1292").Hidden = False
        Case "Fruit drinks manufacturing, farm based business"
            Rows("1293:1298").Hidden = False
        Case "Ice manufacturing for food purposes, farm based business"
            Rows("1299:1300").Hidden = False
        Case "Iced tea or coffee manufacturing, farm based business"
            Rows("1301:1302").Hidden = False
        Case "Soft drinks or soda pop manufacturing, farm based business"
            Rows("1303:1308").Hidden = False
        Case "Beer breweries, farm based business"
            Rows("1309:1311").Hidden = False
        Case "Malt liquor or brewing, farm based business"
            Rows("1312:1314").Hidden = False
        Case "Non-alcoholic beer brewing (e.g., near beer), farm based business"
            Rows("1315:1317").Hidden = False
        Case "Alcoholic cider manufacturing, farm based business"
            Rows("1318:1321").Hidden = False
        Case "Champagne-method sparkling wines manufacturing, farm based business"
            Rows("1322:1325").Hidden = False
        Case "Growing grapes and manufacturing wine from purchased grapes and other fruits, blending wines and distilling brandy, farm based business"
            Rows("1326:1329").Hidden = False
        Case "Neutral spirits fruit beverage manufacturing, farm based business"
            Rows("1330:1333").Hidden = False
        Case "Alcoholic liquor manufacturing (e.g., rum, vodka, whisky), farm based business"
            Rows("1334:1337").Hidden = False
        Case "Blending distilled beverages (except brandy), farm based business"
            Rows("1338:1341").Hidden = False
        Case "Alcoholic cordials manufacturing, farm based business"
            Rows("1342:1345").Hidden = False
        Case "Alcoholic eggnog manufacturing, farm based business"
            Rows("1346:1349").Hidden = False
        Case "Liqueurs manufacturing, farm based business"
            Rows("1350:1353").Hidden = False
        Case "Alcoholic coolers manufacturing, farm based business"
            Rows("1354:1357").Hidden = False
        Case "Alcoholic mixed drinks manufacturing, farm based business"
            Rows("1358:1361").Hidden = False
        Case "Neutral spirits beverage manufacturing (except fruit), farm based business"
            Rows("1362:1365").Hidden = False
        Case "Animal fibre yarn, spooling, twisting or winding purchased yarn, farm based business"
            Rows("1366:1367").Hidden = False
        Case "Artificial or synthetic filament yarn, throwing, twisting, texturizing or winding of purchased yarn, farm based business"
            Rows("1368:1369").Hidden = False
        Case "Cotton-type fibre spun yarns made from purchased fibre, farm based business"
            Rows("1370:1371").Hidden = False
        Case "Darning or embroidery thread manufacturing (e.g., cotton, man-made fibres, silk, wool), farm based business"
            Rows("1372:1373").Hidden = False
        Case "Flax-type yarns manufacturing made from purchased yarns, farm based business"
            Rows("1374:1375").Hidden = False
        Case "Hemp bags and ropes, farm based business"
            Rows("1376:1377").Hidden = False
        Case "Knitting and crochet thread manufacturing, farm based business"
            Rows("1378:1380").Hidden = False
        Case "Man-made fibre thread manufacturing, farm based business"
            Rows("1381:1383").Hidden = False
        Case "Mohair and wool yarn twisting or winding of purchased yarn, farm based business"
            Rows("1384:1386").Hidden = False
        Case "Natural hard fibre yarns made from purchased fibre (e.g., flax, hemp, jute, ramie, paper), farm based business"
            Rows("1387:1389").Hidden = False
        Case "Rug yarn, wool, mohair or similar animal fibre spinning, farm based business"
            Rows("1390:1392").Hidden = False
        Case "Sewing thread of any textile material manufactuing (e.g., cotton, nylon, polyester, rayon, silk), farm based business"
            Rows("1393:1395").Hidden = False
        Case "Silk yarn, spooling, throwing, twisting or winding of purchased fibres, farm based business"
            Rows("1396:1398").Hidden = False
        Case "Manufacture of synthetic or artificial silk filament yarns made from purchased fibres, farm based business"
            Rows("1399:1401").Hidden = False
        Case "Silk-type filament yarns throwing, twisting, texturizing or winding of purchased fibres (e.g., polyester, polypropylene, nylon, rayon, acrylic, modacrylic, etc.), farm based business"
            Rows("1402:1404").Hidden = False
        Case "Silk-type spun yarns made from purchased fibre (e.g., acetate, acrylic, modacrylic, nylon, polyester, polypropylene, rayon), farm based business"
            Rows("1405:1407").Hidden = False
        Case "Silk-type yarns made from purchased artificial or synthetic fibres, farm based business"
            Rows("1408:1410").Hidden = False
        Case "Texturizing purchased monofilament yarn, farm based business"
            Rows("1411:1413").Hidden = False
        Case "Woolen-type yarns made from purchased fibre, farm based business"
            Rows("1414:1416").Hidden = False
        Case "Worsted-type yarns (combed) manufacturing either with wool, artificial or synthetic fibres, farm based business"
            Rows("1417:1419").Hidden = False
        Case "Broad-woven or weaving of artificial fibre fabrics (e.g., acetate, rayon), farm based business"
            Rows("1420:1422").Hidden = False
        Case "Artificial fur on woven base, farm based business"
            Rows("1423:1425").Hidden = False
        Case "Weaving broad-woven fabrics from plant fibre, farm based business"
            Rows("1426:1428").Hidden = False
        Case "Brocade weaving, farm based business"
            Rows("1429:1431").Hidden = False
        Case "Weaving broad-woven fabrics from wool, mohair and similar animal fibres, farm based business"
            Rows("1432:1434").Hidden = False
        Case "Hand weaving fabrics, farm based business"
            Rows("1435:1437").Hidden = False
        Case "Bags and bagging fabrics, farm based business"
            Rows("1438:1438").Hidden = False
        Case "Hand knitting lace or flat (warp) fabric products, farm based business"
            Rows("1439:1439").Hidden = False
        Case "Batik work (hand painting on textile fabrics), farm based business"
            Rows("1440:1440").Hidden = False
        Case "Bleaching purchased fibres, thread, yarn or fabrics (except of wool or similar animal fibres), farm based business"
            Rows("1441:1441").Hidden = False
        Case "Carding textile fibres, farm based business"
            Rows("1442:1442").Hidden = False
        Case "Combing and converting top, farm based business"
            Rows("1443:1443").Hidden = False
        Case "Combing textile fibres, farm based business"
            Rows("1444:1444").Hidden = False
        Case "Degreasing wool, farm based business"
            Rows("1445:1445").Hidden = False
        Case "Dyeing purchased knit fabrics, farm based business"
            Rows("1446:1446").Hidden = False
        Case "Dyeing purchased yarn or woven fabrics (except wool and similar animal fibre), farm based business"
            Rows("1447:1447").Hidden = False
        Case "Dyeing purchased yarn or woven fabrics of wool and similar animal fibres, farm based business"
            Rows("1448:1448").Hidden = False
        Case "Finishing purchased broad-woven fabrics of wool and similar animal fibre, farm based business"
            Rows("1449:1449").Hidden = False
        Case "Horse hair preparation (e.g., dressing, heckling, teasing, willowing), farm based business"
            Rows("1450:1450").Hidden = False
        Case "Hemp scutching, farm based business"
            Rows("1451:1451").Hidden = False
        Case "Preparing textile fibres for spinning, farm based business"
            Rows("1452:1452").Hidden = False
        Case "Oiling purchased clothing (i.e., waterproofing), farm based business"
            Rows("1453:1453").Hidden = False
        Case "Oiling purchased textile fabrics (i.e., waterproofing), farm based business"
            Rows("1454:1454").Hidden = False
        Case "Door mats manufacturing (except entirely of rubber or plastic), farm based business"
            Rows("1455:1455").Hidden = False
        Case "Finishing rugs and carpets (e.g., dyeing), farm based business"
            Rows("1456:1456").Hidden = False
        Case "Weaving or knitting floor coverings made of textile materials (e.g., carpets, rugs, mats, matting), farm based business"
            Rows("1457:1457").Hidden = False
        Case "Bedspreads and bed sets made from purchased fabric, farm based business"
            Rows("1458:1458").Hidden = False
        Case "Blankets (except electric) made from purchased fabrics or felts, farm based business"
            Rows("1459:1459").Hidden = False
        Case "Wool blankets made from purchased fabrics, farm based business"
            Rows("1460:1460").Hidden = False
        Case "Curtains and draperies made from purchased fabrics, farm based business"
            Rows("1461:1461").Hidden = False
        Case "Cushions (except spring) made from purchased fabrics, farm based business"
            Rows("1462:1462").Hidden = False
        Case "Dishcloths made from purchased fabrics, farm based business"
            Rows("1463:1463").Hidden = False
        Case "Furniture covers manufacturing made from textiles, farm based business"
            Rows("1464:1464").Hidden = False
        Case "Pads, protectors and covers made from purchased fabrics or felts (e.g., ironing board, mattress, table), farm based business"
            Rows("1465:1465").Hidden = False
        Case "Bed pillows made from purchased materials, farm based business"
            Rows("1466:1466").Hidden = False
        Case "Placemats made from purchased materials, farm based business"
            Rows("1467:1467").Hidden = False
        Case "Quilts made from purchased materials, farm based business"
            Rows("1468:1468").Hidden = False
        Case "Shower curtains, napkins & linens made from purchased materials (except plastic), farm based business"
            Rows("1469:1469").Hidden = False
        Case "Tablecloths (except paper) made from purchased materials, farm based business"
            Rows("1470:1470").Hidden = False
        Case "Towels and washcloths made from purchased fabrics, farm based business"
            Rows("1471:1471").Hidden = False
        Case "Textile bags made from purchased woven or knitted materials, farm based business"
           Rows("1472:1472").Hidden = False
        Case "Canvas products made from purchased canvas or canvas substitutes, farm based business"
            Rows("1473:1473").Hidden = False
        Case "Covers made from purchased fabrics (e.g., boat, car, truck), farm based business"
            Rows("1474:1474").Hidden = False
        Case "Canvas duffel bags manufacturing, farm based business"
            Rows("1475:1475").Hidden = False
        Case "Garment storage bags manufacturing, farm based business"
            Rows("1476:1476").Hidden = False
        Case "Knapsacks manufacturing (e.g., backpacks, book bags), farm based business"
            Rows("1477:1477").Hidden = False
        Case "Laundry bags made from purchased woven or knitted materials, farm based business"
            Rows("1478:1478").Hidden = False
        Case "Shipping bags made from purchased woven or knitted materials, farm based business"
            Rows("1479:1479").Hidden = False
        Case "Appliqueing on textile products (except clothing), farm based business"
            Rows("1480:1480").Hidden = False
        Case "Appliqueing on clothing owned by others, farm based business"
            Rows("1481:1481").Hidden = False
        Case "Art needlework on clothing owned by others, farm based business"
           Rows("1482:1482").Hidden = False
        Case "Banners made from purchased fabric, farm based business"
            Rows("1483:1483").Hidden = False
        Case "Beading on textile products or clothing owned by others, farm based business"
            Rows("1484:1484").Hidden = False
        Case "Bows made from purchased fabrics, farm based business"
            Rows("1485:1485").Hidden = False
        Case "Crochet ware made from purchased materials, farm based business"
            Rows("1486:14864").Hidden = False
        Case "Decorative stitching on clothing owned by others, farm based business"
            Rows("1487:1487").Hidden = False
        Case "Decorative stitching on textile articles (except clothing)owned by others, farm based business"
            Rows("1488:1488").Hidden = False
        Case "Dust cloths made from purchased fabrics, farm based business"
            Rows("1489:1489").Hidden = False
        Case "Embroidering of advertising on clothing owned by others, farm based business"
            Rows("1490:1490").Hidden = False
        Case "Embroidering on clothing owned by others, farm based business"
            Rows("1491:1491").Hidden = False
        Case "Pet supplies manufactured from textile fabrics (i.e. leashes, blankets, booties), farm based business"
            Rows("1492:1492").Hidden = False
        Case "Reclaimed wool processing, farm based business"
            Rows("1493:1493").Hidden = False
        Case "Custom rope and specialty western ropes manufacturing (i.e. for lasso, tie down), farm based business"
            Rows("1494:1494").Hidden = False
        Case "Saddle cloths manufacturing, farm based business"
            Rows("1495:1495").Hidden = False
        Case "Twine manufacturing from natural fibers, farm based business"
           Rows("1496:1497").Hidden = False
        Case "Handmade paper manufacturing, farm based business"
            Rows("1498:1498").Hidden = False
        Case "Handmade knitted articles, farm based business"
            Rows("1499:1499").Hidden = False
        Case "Unisex Adults handmade clothing, farm based business"
            Rows("1500:1500").Hidden = False
        Case "Unisex Childrens handmade clothing, farm based business"
            Rows("1501:1501").Hidden = False
        Case "Unisex Infants handmade clothing up to 24 months, farm based business"
            Rows("1502:1502").Hidden = False
        Case "Aprons and bibs, cut and sewn from materials owned by others, farm based business"
            Rows("1503:1503").Hidden = False
        Case "Fur and leather clothing manufacturing, farm based business"
            Rows("1504:1504").Hidden = False
        Case "Leather caps and hats manufacturing, farm based business"
            Rows("1505:1505").Hidden = False
        Case "Furs, hides and skins processing (i.e., bleaching, colouring, currying, cutting, embossing, japanning), farm based business"
            Rows("1506:1507").Hidden = False
        Case "Moccasins manufacturing, farm based business"
            Rows("1508:1508").Hidden = False
        Case "Leather aprons manufacturing used for textile machinery, farm based business"
            Rows("1509:1509").Hidden = False
        Case "Leather boxes manufacturing, farm based business"
            Rows("1510:1510").Hidden = False
        Case "Leather briefcases manufacturing, farm based business"
            Rows("1511:1511").Hidden = False
        Case "Burnt leather goods manufacturing, farm based business"
            Rows("1512:1513").Hidden = False
        Case "Riding crops manufacturing, farm based business"
            Rows("1514:1514").Hidden = False
        Case "Embossing leather goods, farm based business"
            Rows("1515:1515").Hidden = False
        Case "Leather harnesses and harness parts manufacturing, farm based business"
            Rows("1516:1516").Hidden = False
        Case "Leather holsters manufacturing, farm based business"
            Rows("1517:1517").Hidden = False
        Case "Horse boots and muzzles manufacturing, farm based business"
            Rows("1518:1518").Hidden = False
        Case "Leather welders jackets manufacturing, farm based business"
            Rows("1519:1519").Hidden = False
        Case "Lashes manufacturing (i.e., whips), farm based business"
            Rows("1520:1520").Hidden = False
        Case "Leashes or collars for dog manufacturing, farm based business"
            Rows("1521:1521").Hidden = False
        Case "Leather goods, small personal items manufacturing (e.g., coin purses, eyeglass cases, key cases), farm based business"
            Rows("1522:1524").Hidden = False
        Case "Leather handbags and purses manufacturing, farm based business"
            Rows("1525:1527").Hidden = False
        Case "Leather handicrafts manufacturing, farm based business"
            Rows("1528:1530").Hidden = False
        Case "Leather luggage manufacturing, farm based business"
            Rows("1531:1533").Hidden = False
        Case "Musical instrument cases manufacturing, farm based business"
           Rows("1534:1534").Hidden = False
        Case "Razor strops manufacturing, farm based business"
            Rows("1535:1535").Hidden = False
        Case "Leather saddles and parts manufacturing, farm based business"
            Rows("1536:1538").Hidden = False
        Case "Leather welders' sleeves and leggings manufacturing, farm based business"
            Rows("1539:1539").Hidden = False
        Case "Leather spats manufacturing, farm based business"
            Rows("1540:1540").Hidden = False
        Case "Leather straps manufacturing (excluding automotive or production machinery), farm based business"
            Rows("1541:1541").Hidden = False
        Case "Trunks manufacturing, farm based business"
            Rows("1542:1544").Hidden = False
        Case "Whipstocks manufacturing, farm based business"
           Rows("1545:1545").Hidden = False
        Case "Wood brackets manufacturing, farm based business"
            Rows("1546:1546").Hidden = False
        Case "Wood brush blocks turned and shaped, farm based business"
            Rows("1547:1547").Hidden = False
        Case "Wood and covered wood mouldings manufacturing, farm based business"
            Rows("1548:1548").Hidden = False
        Case "Wood porch work manufacturing (e.g., columns, newels, rails, trellises), farm based business"
            Rows("1549:1549").Hidden = False
        Case "Wood stairwork manufacturing (e.g., newel posts, railings, staircases, stairs), farm based business"
            Rows("1550:1550").Hidden = False
        Case "Wood trellises manufacturing, farm based business"
            Rows("1551:1551").Hidden = False
        Case "Wood or part wood jewellery boxes manufacturing, farm based business"
            Rows("1552:1552").Hidden = False
        Case "Wood tool chests manufacturing, farm based business"
            Rows("1553:1553").Hidden = False
        Case "Fruit and vegetable wood containers or wood pallet manufacturing (e.g., baskets, boxes, crates, hampers, bushel baskets), farm based business"
            Rows("1554:1554").Hidden = False
        Case "Wood tray manufacturing, farm based business"
            Rows("1555:1555").Hidden = False
        Case "Wood bowls and dishes turned and shaped manufacturing, farm based business"
            Rows("1556:1556").Hidden = False
        Case "Broom handles manufacturing, farm based business"
            Rows("1557:1557").Hidden = False
        Case "Wood and cork bulletin boards manufacturing, farm based business"
            Rows("1558:1558").Hidden = False
        Case "Burnt wood articles manufacturing, farm based business"
            Rows("1559:1559").Hidden = False
        Case "Grinding bark for mulch, farm based business"
            Rows("1560:1561").Hidden = False
        Case "Wood handicrafts manufacturing (e.g., carvings), farm based business"
            Rows("1562:1562").Hidden = False
        Case "Scratching posts and condos for cats manufacturing, farm based business"
            Rows("1563:1563").Hidden = False
        Case "Straw baskets manufacturing, farm based business"
            Rows("1564:1564").Hidden = False
        Case "Wood wall-mounted hat and coat racks manufacturing, farm based business"
            Rows("1565:1565").Hidden = False
        Case "Novelties paper manufacturing, farm based business"
            Rows("1566:1566").Hidden = False
        Case "Architectural sculptures from clay manufacturing, farm based business"
            Rows("1567:1571").Hidden = False
        Case "Art and ornamental pottery manufacturing, farm based business"
            Rows("1572:1576").Hidden = False
        Case "Kitchen articles and cooking ware manufacturing (e.g., china, stoneware, coarse and fine earthenware, pottery), farm based business"
            Rows("1577:1581").Hidden = False
        Case "Garden pottery and florists' articles manufacturing (i.e., flower pots), farm based business"
            Rows("1582:1586").Hidden = False
        Case "Lamp bases pottery manufacturing, farm based business"
            Rows("1587:1591").Hidden = False
        Case "Christmas tree ornaments made from purchased glass, farm based business"
            Rows("1592:1592").Hidden = False
        Case "Glassware, art, decorative and novelty made from purchased glass, farm based business"
            Rows("1593:1593").Hidden = False
        Case "Hand blowing purchased glass, farm based business"
            Rows("1594:1596").Hidden = False
        Case "Lamp shades made from purchased glass, farm based business"
            Rows("1597:1597").Hidden = False
        Case "Stained glass and stained glass products made from purchased glass, farm based business"
            Rows("1598:1598").Hidden = False
        Case "Iron basic shapes made from purchased iron (except pipe, tube or wire), farm based business"
            Rows("1599:1599").Hidden = False
        Case "Steel basic shapes made from purchased steel (except pipe, tube or wire), farm based business"
            Rows("1600:1600").Hidden = False
        Case "Machining metal parts on a job order basis, farm based business"
            Rows("1601:1601").Hidden = False
        Case "Providing custom and repair services, farm based business"
            Rows("1602:1602").Hidden = False
        Case "Wood counter and bar tops manufacturing, farm based business"
            Rows("1603:1605").Hidden = False
        Case "Wood bathroom vanities manufacturing, farm based business"
            Rows("1606:1608").Hidden = False
        Case "Kitchen cabinets and counters from prefabricated wood manufacturing and installation, farm based business"
            Rows("1609:1611").Hidden = False
        Case "Custom made kitchen wood cabinets manufacturing (except free standing), farm based business"
            Rows("1612:1614").Hidden = False
        Case "Bedroom wood furniture manufacturing (except childrens), farm based business"
            Rows("1615:1617").Hidden = False
        Case "Household wood furniture (except chairs or childrens furniture), farm based business"
           Rows("1618:1620").Hidden = False
        Case "Household chairs (except childrens), farm based business"
            Rows("1621:1623").Hidden = False
        Case "Children's wood furniture manufacturing, farm based business"
            Rows("1624:1627").Hidden = False
        Case "Wood or cedar chests (excluding childrens) and silverware chests manufacturing, farm based business"
            Rows("1628:1630").Hidden = False
        Case "Costume jewellery manufacturing (except precious metal and precious or semiprecious stones), farm based business"
            Rows("1631:1631").Hidden = False
        Case "Jewellery made of precious metal or precious or semiprecious stones manufacturing, farm based business"
            Rows("1632:1632").Hidden = False
        Case "Dolls including parts and accessories manufacturing, farm based business"
            Rows("1633:1634").Hidden = False
        Case "Stuffed toys including animals manufacturing, farm based business"
            Rows("1635:1635").Hidden = False
        Case "Wooden toys manufacturing, farm based business"
            Rows("1636:1639").Hidden = False
        Case "Art goods and novelties manufacturing, farm based business"
            Rows("1640:1640").Hidden = False
        Case "Artificial flower arrangements and assembling from purchased components, farm based business"
            Rows("1641:1641").Hidden = False
        Case "Candle manufacturing, farm based business"
            Rows("1642:1645").Hidden = False
        Case "Christmas tree ornaments manufacturing (except electrical and glass), farm based business"
            Rows("1645:1645").Hidden = False
        Case "Artifical Christmas plants and wreaths manufacturing, farm based business"
            Rows("1646:1646").Hidden = False
        Case "Garlands, wreaths and sprays made from tree boughs and cones, farm based business"
            Rows("1647:1647").Hidden = False
        Case "Wooden mirror and picture frames manufacturing, farm based business"
            Rows("1648:1650").Hidden = False
        Case "Fruit and vegetable stands or markets, farm based business"
            Rows("1651:1651").Hidden = False
        Case "Pick your own fruit and vegetables, farm based business"
           Rows("1652:1663").Hidden = False
        Case "Bakeries stands or at markets without baking on the premises, farm based business"
            Rows("1664:1665").Hidden = False
        Case "Candy stands or at markets, farm based business"
            Rows("1666:1666").Hidden = False
        Case "Chocolate stands or at markets, farm based business"
            Rows("1667:1667").Hidden = False
        Case "Confectionery stands or at markets, farm based business"
            Rows("1668:1668").Hidden = False
        Case "Nut stands or at markets, farm based business"
            Rows("1669:1669").Hidden = False
        Case "Popcorn stands or at markets, farm based business"
            Rows("1670:1670").Hidden = False
        Case "Cheese stands or at markets, farm based business"
            Rows("1671:1671").Hidden = False
        Case "Dairy products stands or at markets, farm based business"
            Rows("1672:1672").Hidden = False
        Case "Egg dealers stands or at markets, farm based business"
            Rows("1673:1673").Hidden = False
        Case "Frozen perogies stands or at markets, farm based business"
            Rows("1674:1674").Hidden = False
        Case "Honey stands or at markets, farm based business"
            Rows("1675:1675").Hidden = False
        Case "Spice and herb stands or at markets, farm based business"
            Rows("1676:1676").Hidden = False
        Case "Beer stands or at markets excluding on site consumption, farm based business"
            Rows("1677:1677").Hidden = False
        Case "Fermented malt beverages stands or at markets excluding on site consumption, farm based business"
            Rows("1678:1678").Hidden = False
        Case "Wine stands or at markets excluding on site consumption, farm based business"
            Rows("1679:1679").Hidden = False
        Case "Nutritionist, farm based business"
            Rows("1680:1680").Hidden = False
        Case "Domestic pet boarding kennels, farm based business"
            Rows("1681:1682").Hidden = False
        Case "Domestic pet grooming, farm based business"
            Rows("1683:1685").Hidden = False
        Case "General insurance broker, farm based business"
            Rows("1686:1687").Hidden = False
        Case "Certified accountants' offices, farm based business"
            Rows("1688:1688").Hidden = False
        Case "Certified management accountants' (CMA), farm based business"
            Rows("1689:1689").Hidden = False
        Case "Certified public accountants (CPAs), farm based business"
            Rows("1690:1690").Hidden = False
        Case "Chartered accountants' offices, farm based business"
            Rows("1691:1691").Hidden = False
        Case "Provision of related services, such as bookkeeping, tax return preparation, payroll, management consulting and insolvency, farm based business including Errors & Omissions"
            Rows("1692:1703").Hidden = False
        Case "Provision of related services, such as bookkeeping, tax return preparation, payroll, management consulting and insolvency, farm based business excluding Errors & Omissions"
            Rows("1704:1707").Hidden = False
        Case "Income tax return preparation or compilation services without accounting, auditing, or bookkeeping services, farm based business including Errors & Omissions"
            Rows("1708:1719").Hidden = False
        Case "Income tax return preparation or compilation services without accounting, auditing, or bookkeeping services, farm based business excluding Errors & Omissions"
            Rows("1720:1722").Hidden = False
        Case "Billing, bookkeeping or payroll processing services, farm based business including Errors & Omissions"
            Rows("1723:1734").Hidden = False
        Case "Billing, bookkeeping or payroll processing services, farm based business excluding Errors & Omissions"
            Rows("1735:1737").Hidden = False
        Case "Bookkeepers, offices or private practice, farm based business including Errors & Omissions"
            Rows("1738:1749").Hidden = False
        Case "Bookkeepers, offices or private practice, farm based business excluding Errors & Omissions"
            Rows("1750:1752").Hidden = False
        Case "Bed and breakfast homes characterized by a highly personalized service including a full breakfast served by the owner or owner-supervised staff, farm based business"
            Rows("1753:1758").Hidden = False
        Case "Providing access to private beaches and fishing, farm based business"
            Rows("1759:1761").Hidden = False
        Case "Tourist courts and cabin accommodations, farm based business"
            Rows("1762:1766").Hidden = False
        Case "Camping grounds and trailer parks, farm based business"
            Rows("1767:1770").Hidden = False
        Case "Social event functions, with catering and bartending, farm based business"
            Rows("1771:1774").Hidden = False
        Case "Social event functions, without catering and bartending, farm based business"
            Rows("1775:1777").Hidden = False
        Case "Agricultural machinery, equipment and incidental auto repair and maintenance, farm based business"
            Rows("1778:1783").Hidden = False
        Case "Agricultural machinery painting on contract, farm based business"
            Rows("1784:1787").Hidden = False
        Case "Electric motor repair, farm based business"
            Rows("1788:1792").Hidden = False
        Case "Mobile welding shop (excluding oilfields), farm based business"
           Rows("1793:1798").Hidden = False
        Case "Repair welding and custom fabrication (excluding oilfields), farm based business"
            Rows("1799:1805").Hidden = False
        Case "Small electric motor repair, farm based business"
            Rows("1806:1806").Hidden = False
        Case "Welding equipment repair and maintenance, farm based business"
            Rows("1807:1807").Hidden = False
        Case "Welding repair services (except construction), farm based business"
            Rows("1808:1815").Hidden = False
        Case "Welding shop, farm based business"
            Rows("1816:1823").Hidden = False

  End Select

End If

Application.EnableEvents = True

End Sub
 

Excel Facts

Do you hate GETPIVOTDATA?
Prevent GETPIVOTDATA. Select inside a PivotTable. In the Analyze tab of the ribbon, open the dropown next to Options and turn it off
Hi welcome to forum

You specify your range as per your post

VBA Code:
Set TriggerCellCom = Range("J14, N14, R14, V14")

Then one way you can the determine which address in the range triggered the event is to use a Select Case statement

VBA Code:
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim TriggerCellCom As Range
   
    Set TriggerCellCom = Range("J14, N14, R14, V14")
    If Not Intersect(Target, TriggerCellCom) Is Nothing Then
   
        Select Case Target.Address(0, 0)
           
            Case "J14"
               
            Case "N14"
               
            Case "R14"
               
            Case "V14"
               
        End Select
       
    End If
End Sub

This is only a suggestion, you will need to determine if this idea can be adapted to meet your project need.

I have only glanced at your code but feel there probably is a cleaner approach that can be taken that would avoid all the hard coding you have.
I would suggest that if possible that you post copy of your worksheet with dummy data using MrExcel addin XL2BB - Excel Range to BBCode
and maybe someone here can take the time to assist in your project

Dave
 
Upvote 0

Forum statistics

Threads
1,223,882
Messages
6,175,165
Members
452,615
Latest member
bogeys2birdies

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top