two excel vba small programs

City Philadelphia Number of data points in sample 175 Cholesterol Data 197,318,239,221,255,218,236 224,327,256,273,316,209,168 175,348,294,315,182,243,200 245,103,237,153,128,107,184 224,259,291,185,202,176,333 243,332,273,233,285,133,224 221,347,266,185,186,178,240 318,329,275,149,199,282,212 285,201,146,198,279,251,108 238,170,286,251,205,331,191 204,240,230,133,241,242,133 276,294,325,115,222,233,257 227,225,328,252,321,246,121 327,311,297,301,167,242,247 158,235,153,254,121,316,190 282,176,144,202,335,321,123 328,199,157,145,168,244,248 183,222,322,219,248,243,185 264,276,162,334,174,284,205 290,208,161,285,305,272,201 101,177,271,191,177,265,181 291,321,260,216,291,283,268 216,198,285,231,142,162,151 151,238,282,262,172,232,334 245,283,174,349,225,222,313