{"text_format":"3","workbook":"xls","n_sheets":10,"sheets":["Table of Contents","Area","Pendulum","Drop Down Menus-No VBA 1","Drop Down Menus-no VBA 2","Drop Down Menu-VBA","Button and Macro","Acceleration1","Acceleration2","Buttons and Form Objects"],"not_rendered":{"images":3,"macros":1,"external_links":1,"defined_names":9},"read":"whole","date_system":"1900","formulas":"cached_only"}

{"sheet":"Table of Contents","index":0,"n_rows":23,"n_cols":2,"rows_kept":23,"flags":["formulas_cached_only"]}
[]
[null,"Using Visual Basic in Excel - Examples"]
[]
[null,"Developed by Deb Hansen"]
[null,"Biosystems and Agricultural Engineering"]
[null,"University of Minnesota"]
[]
[]
[null,"Functionn example: area of a rectangle"]
[null,"Function example: Period of a pendulum"]
[null,"Drop down menu with Index function (select a crop)"]
[null,"Drop down menu with Index function - complete (pressure and fan power table)"]
[null,"Drop down menu using VBA - select colors"]
[null,"Function example: Acceleration due to gravity"]
[null,"VBA example: Acceleration due to gravity"]
[null,"Macro assigned to a button"]
[null,"Option (Radio) buttons"]
[]
[]
[]
[]
[null,"To create links like this - right click on cell, choose Hyperlink"]
[null,"Click Bookmark… and select the appropriate worksheet"]

{"sheet":"Area","index":1,"n_rows":8,"n_cols":4,"rows_kept":8,"flags":["formulas_cached_only"]}
["Table of Contents"]
[]
[null,"Length","Width","Calculated Area"]
[null,10,10,100]
[null,10,15]
[]
["The code for this problem is stored in Module1; press Alt-F11 to open the Visual Basic Editor"]
["Cell D4 contains a call to a custom function"]

{"sheet":"Pendulum","index":2,"n_rows":15,"n_cols":5,"rows_kept":15,"flags":["formulas_cached_only"]}
["Table of Contents"]
["Calculate the period of a pendulum given length  (centimeters) and angle of displacement (radians)"]
["We will enter the angle of displacement on the spreadsheet in degrees, "]
["   and convert it to radians in the custom function"]
[]
[{"$nulls":4},"g = 980"]
[]
[]
["Pendulum length, cm:",null,null,20]
["Angle of displacement, degrees",null,null,15]
["Period, sec",null,null,{"v":0.9014210143759196,"d":"0.901"}]
[]
[]
["The code for this problem is stored in Module1; press Alt-F11 to open the Visual Basic Editor"]
["Cell D11 contains a call to a custom function"]

{"sheet":"Drop Down Menus-No VBA 1","index":3,"n_rows":19,"n_cols":7,"rows_kept":19,"merged":[[17,4,17,6]],"flags":["formulas_cached_only"]}
["Table of Contents"]
["No VBA-Use the Index function to look up values based on selection"]
[]
["In View | Toolbars, make sure the Forms toolbar is selected"]
["Draw the desired control on the spreadsheet."]
["Right click the control and choose Format Control to assign the cell link or input range"]
[]
[null,"Corn",1.5,0.000654,0.1544,null,"The drop down menu uses the crops entered in column B"]
[null,"Wheat",1.3,0.000853,0.0446,null,"as it's data source"]
[null,"Barley",1.5,0.000676,0.0671,null,"It stores results, I.e. the selected item, in cell E12"]
[null,"Oats",1.5,0.000762,0.0706]
[null,"Sorghum",1.5,0.00067,0.0409,null,"The inputs and outputs can be hidden on another worksheet"]
[null,"Soybeans",1.5,0.000322,0.0813]
[]
[]
[{"$nulls":4},1]
[]
[]
[null,"Selected crop:",null,"Corn",1.5,0.000654,0.1544]

{"sheet":"Drop Down Menus-no VBA 2","index":4,"n_rows":51,"n_cols":10,"rows_kept":51,"flags":["formulas_cached_only"]}
["Table of Contents"]
["In View | Toolbars, make sure the Forms toolbar is selected"]
["Draw the desired control on the spreadsheet."]
["Right click the control and choose Format Control to assign the cell link or input range"]
[]
[{"$nulls":8},"Static pressure, inches water = Shedd's Curve Multiplier * grain depth * (a*Q²) /ln(1+b*Q)"]
[{"$nulls":9},"(Shedd's Curver Multiplier also known as \"Packing Factor\")"]
[{"$nulls":8},"Bushels="]
["Crop:",{"$nulls":3},"Canola-Tobin",{"$nulls":3},"   test weight multiplier * (bin floor area, ft²) * (grain depth, ft) * 0.8 (0.4 for ear corn)"]
["Shedd's Curve Multiplier:",{"$nulls":3},1.5,{"$nulls":3},"   test weight multiplier = 1.0"]
["Selected a:",{"$nulls":3},0.00165,{"$nulls":3},"   (1.0 is recommended value. Using a value greater than 1.0 will increase bushels in bin, expected static pressure, and power requirements.)"]
["Selected b:",{"$nulls":3},0.0369,{"$nulls":3},"Q = cfm/ft² = Total airflow / bin floor area"]
["Bin diameter, feet:",{"$nulls":3},30]
["Bin area, square feet:",{"$nulls":3},{"v":706.85775,"d":"707"},{"$nulls":3},"Required power, hp = (total airflow, cfm * Static pressure / (6356 * static efficiency)"]
["Airflow, CFM",{"$nulls":3},2,{"$nulls":3},"   static efficiency = 0.60"]
[]
[]
["Approximate Pressure and Fan Power Required to Provide Desired Airflow at Various Grain Depths"]
[]
[{"$nulls":3},"Total","Static pressure"]
["Grain Depth, feet",null,"Bushels","Airflow","Inches H20","HP"]
[2,null,{"v":1130.9724,"d":"1131"},{"v":2261.9448,"d":"2262"},{"v":0.454140937528825,"d":"0.45"},{"v":0.26936273655088383,"d":"0.27"}]
[4,null,{"v":2261.9448,"d":"2262"},{"v":4523.8896,"d":"4524"},{"v":1.9126662968020312,"d":"1.91"},{"v":2.268903704733906,"d":"2.27"}]
[6,null,{"v":3392.9172,"d":"3393"},{"v":6785.8344,"d":"6786"},{"v":4.513171558591535,"d":"4.51"},{"v":8.030636358137206,"d":"8.03"}]
[8,null,{"v":4523.8896,"d":"4524"},{"v":9047.7792,"d":"9048"},{"v":8.385991966583479,"d":"8.39"},{"v":19.89579496712322,"d":"19.90"}]
[10,null,{"v":5654.862000000001,"d":"5655"},{"v":11309.724000000002,"d":"11310"},{"v":13.655597476044049,"d":"13.66"},{"v":40.497440347481344,"d":"40.50"}]
[12,null,{"v":6785.8344,"d":"6786"},{"v":13571.6688,"d":"13572"},{"v":20.441606551262797,"d":"20.44"},{"v":72.74667344599563,"d":"72.75"}]
[14,null,{"v":7916.8068,"d":"7917"},{"v":15833.6136,"d":"15834"},{"v":28.859546410275694,"d":"28.86"},{"v":119.8214040621912,"d":"119.82"}]
[16,null,{"v":9047.7792,"d":"9048"},{"v":18095.5584,"d":"18096"},{"v":39.02143823069877,"d":"39.02"},{"v":185.156994534194,"d":"185.16"}]
[18,null,{"v":10178.751600000001,"d":"10179"},{"v":20357.503200000003,"d":"20358"},{"v":51.036257686426275,"d":"51.04"},{"v":272.4383205284895,"d":"272.44"}]
[20,null,{"v":11309.724000000002,"d":"11310"},{"v":22619.448000000004,"d":"22619"},{"v":65.01030429302625,"d":"65.01"},{"v":385.59292988784466,"d":"385.59"}]
[]
[]
["Selection:",2]
[null,null,"Shedd's Curve Multiplier","a","b"]
["Barley",null,1.5,0.000676,0.0671]
["Canola-Tobin",null,1.5,0.00165,0.0369]
["Canola-Westar",null,1.5,0.001438,0.0494]
["Corn,ear",null,1.5,0.000329,1.651]
["Corn, shelled",null,1.5,0.000654,0.1544]
["Corn, shelled (stirred)",null,1,0.000654,0.1544]
["Flax",null,1.5,0.000273,0.0421]
["Lupines (blue)",null,1.5,0.000338,0.1072]
["Oats",null,1.5,0.000762,0.0706]
["Popcorn, white",null,1.5,0.000692,0.0599]
["Popcorn, yellow",null,1.5,0.000563,0.0894]
["Sorghum",null,1.5,0.00067,0.0409]
["Soybeans",null,1.5,0.000322,0.0813]
["Sunflowers (Confectionery)",null,1.5,0.000348,0.0919]
["Sunflowers (Oil)",null,1.5,0.000787,0.12]
["Wheat",null,1.3,0.000853,0.0446]

{"sheet":"Drop Down Menu-VBA","index":5,"n_rows":18,"n_cols":7,"rows_kept":18,"flags":["formulas_cached_only"]}
["Table of Contents"]
[]
[null,"Red",null,5]
[null,"Green",null,"My menu selection = 5"]
[null,"Blue"]
[null,"Yellow"]
[null,"Transparent"]
[]
[]
[{"$nulls":6},"Module 3: Listbox3"]
{"$rows_empty":7}
[{"$nulls":3},1,null,null,"Module3: listbox4"]

{"sheet":"Button and Macro","index":6,"n_rows":13,"n_cols":3,"rows_kept":13,"flags":["formulas_cached_only"]}
["Table of Contents"]
[]
[]
[null,"Draw a button on the screen, then create a NEW macro by recording keystrokes"]
[null,"You probably want to depress the macro button that makes cell referencing \"relative\""]
[]
[null,"F","C"]
[null,212,100]
[null,100,37.77777777777778]
[null,32]
[null,16,-8.88888888888889]
[null,0]
[null,-17,-27.22222222222222]

{"sheet":"Acceleration1","index":7,"n_rows":28,"n_cols":3,"rows_kept":28,"merged":[[10,0,10,1]],"flags":["formulas_cached_only"]}
["Table of Contents"]
["Calculate the acceleration due to gravity at an elevation above the earth"]
{"$rows_empty":8}
["Elevation"]
["Meters","Miles","Acceleration"]
[0,0,{"v":9.798471544154433,"d":"9.798472"}]
[100,{"v":0.062140151515151516,"d":"0"},{"v":9.798163907080154,"d":"9.798164"}]
[1000,{"v":0.6214015151515152,"d":"1"},{"v":9.795395825255019,"d":"9.795396"}]
[10000,{"v":6.214015151515151,"d":"6"},{"v":9.767779404683523,"d":"9.767779"}]
[100000,{"v":62.140151515151516,"d":"62"},{"v":9.497922882690052,"d":"9.497923"}]
[1000000,{"v":621.4015151515151,"d":"621"},{"v":7.31985072785818,"d":"7.319851"}]
[10000000,{"v":6214.015151515152,"d":"6214"},{"v":1.4836786305088236,"d":"1.483679"}]
[100000000,{"v":62140.15151515152,"d":"62140"},{"v":0.035139767356214616,"d":"0.035140"}]
[1000000000,{"v":621401.5151515151,"d":"621402"},{"v":0.000392574274298368,"d":"0.000393"}]
[10000000000,{"v":6214015.151515151,"d":"6214015"},{"v":3.9708555188189514e-06,"d":"0.000004"}]
[100000000000,{"v":62140151.515151516,"d":"62140152"},{"v":3.975409516696594e-08,"d":"0.000000"}]
[1000000000000,{"v":621401515.1515151,"d":"621401515"},{"v":3.975865347314147e-10,"d":"0.000000"}]
[10000000000000,{"v":6214015151.515152,"d":"6214015152"},{"v":3.975910934687856e-12,"d":"0.000000"}]
[]
["The code for this problem is stored in Module1; press Alt-F11 to open the Visual Basic Editor"]
["The cells in column c call a custom function"]

{"sheet":"Acceleration2","index":8,"n_rows":29,"n_cols":3,"rows_kept":29,"merged":[[11,0,11,1]],"flags":["formulas_cached_only"]}
["Table of Contents"]
["Calculate the acceleration due to gravity at an elevation above the earth"]
[]
[]
[]
["Me",{"v":5.96e+24,"d":"5.96E+24"}]
["Re",{"v":6370000,"d":"6.37E+06"}]
["G",{"v":6.671e-11,"d":"6.67E-11"}]
[]
["Starting Elevation:",null,10]
["Elevation Multiplier:",null,5]
["Elevation"]
["Meters","Miles","Acceleration"]
[10,{"v":0.006214015151515152,"d":"0"},{"v":9.798440779795026,"d":"9.798441"}]
[50,{"v":0.031070075757575758,"d":"0"},{"v":9.798317723806257,"d":"9.798318"}]
[250,{"v":0.1553503787878788,"d":"0"},{"v":9.797702478633141,"d":"9.797702"}]
[1250,{"v":0.7767518939393939,"d":"1"},{"v":9.7946271218102,"d":"9.794627"}]
[6250,{"v":3.8837594696969697,"d":"4"},{"v":9.77927203560034,"d":"9.779272"}]
[31250,{"v":19.418797348484848,"d":"19"},{"v":9.703035553470492,"d":"9.703036"}]
[156250,{"v":97.09398674242425,"d":"97"},{"v":9.334902536758625,"d":"9.334903"}]
[781250,{"v":485.46993371212125,"d":"485"},{"v":7.774514517195485,"d":"7.774515"}]
[3906250,{"v":2427.349668560606,"d":"2427"},{"v":3.7650251185765162,"d":"3.765025"}]
[19531250,{"v":12136.74834280303,"d":"12137"},{"v":0.5926465395723863,"d":"0.592647"}]
[97656250,{"v":60683.74171401515,"d":"60684"},{"v":0.036741028907664466,"d":"0.036741"}]
[488281250,{"v":303418.70857007575,"d":"303419"},{"v":0.0016249461701477552,"d":"0.001625"}]
[2441406250,{"v":1517093.542850379,"d":"1517094"},{"v":6.635807318697204e-05,"d":"0.000066"}]
[]
["The code for this problem is stored in Module2; press Alt-F11 to open the Visual Basic Editor"]
["Clicking the Calculate button takes information from the spreadsheet and updates the table in rows 14 through 26"]

{"sheet":"Buttons and Form Objects","index":9,"n_rows":35,"n_cols":13,"rows_kept":35,"flags":["formulas_cached_only"]}
["Table of Contents"]
["In View | Toolbars, make sure the Forms toolbar is selected"]
["Draw the desired control on the spreadsheet."]
["Right click the control and choose Format Control to assign the cell link or input range"]
[]
["Option buttons (radio buttons) must all be contained within a Group Box to work interactively-a group box (frame) is another type of form object"]
[]
[]
[]
[]
[{"$nulls":6},6]
[]
[]
[]
[{"$nulls":12},"TUES"]
[]
[]
[]
[]
[]
[null,"Check boxes work independently of each other. You need to have a link cell for each check box."]
[]
[{"$nulls":7},"U S Citizen",true]
[]
[{"$nulls":7},"Minnesota Resident",true]
[]
[{"$nulls":7},"U of M Student",false]
[]
[{"$nulls":7},"U of M Staff",true]
[]
[]
[]
[]
[null,"To help with formatting controls, hold down the Ctrl and Shift keys to select multiple controls, "]
[null,"then find \"Align or Distribute\" in the Draw menu for format options"]