In this game, students fence off an area of the drill field and divide it up into a series of equally sized squares. (We will assume there are 500 such squares organized into a 20 by 25 matrix.) Each square is randomly assigned a unique integer value between 1 and 500 (i.e., each number between 1 and 500 is used exactly once).

The following Excel spreadsheet needs to automate the task of assigning random numbers to the squares, and selecting the winning square. Whenever the user clicks the "Go" button, the VBA program should assign new random numbers to the cells in the worksheet and also randomly select the winning cell and change its background color to red (or some other color).

Requirements & Hints:

1. Can use formulas in the worksheet to create the row and column headings in the table. However, there should not be any other formulas in the worksheet. All the random numbers should be generated in VBA and placed in the cells as numeric constants (not cell formulas).
2. In VBA, numbers between 1 and 500 can be randomly generated via: 1 + Int(Rnd * 500))
3. Need to figure out how to make VBA loop through the 500 cells in the range containing the numbers.
4. There are a variety of ways to approach this problem. One way is to first fill the range sequentially with the integers from 1 to 500. Then, generate a random cell number between 1 and 500 and then swap the value in the current cell with the value that is in whatever cell number you generate randomly.

Putting the "Go" button in your application

Once the VBA code is working, add a "Go" button to the spreadsheet that the user can click to execute.
 

Transcribed Image Text:

X A 1 234 File 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 A Go KAM Ready Cow.xlsm - Microsoft Excel Home Insert Page Layout Formulas Data Review View Developer Add-Ins Risk Solver Platform FGHIJKLMNOP Q R S T U V W X Y BCDE 1 2 3 4 5 1 2 3 4 5 6 7 214 142 386 420 491 350 119 77 167 478 389 347 339 371 143 63 307 257 319 290 337 6 12 179 215 47 203 373 42 7 380 16 144 288 464 8 422 46 273 146 81 492 428 69 284 455 456 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 266 369 483 466 256 495 419 330 229 465 440 72 231 425 283 490 244 197 117 217 334 404 154 367 302 363 297 484 448 102 185 118 234 251 335 27 101 29 2 209 158 145 427 202 493 365 254 377 116 147 11 443 76 447 230 45 84 123 252 487 381 476 54 86 177 430 299 150 207 298 449 70 438 204 26 68 394 134 499 499 23 82 80 279 454 78 220 439 130 325 415 163 112 89 135 196 133 291 387 461 345 212 22 498 59 259 474 4 471 171 346 362 96 162 450 462 208 236 137 326 489 370 342 395 286 93 460 232 424 21 267 216 160 406 5 414 416 105 94 238 238 341 374 268 60 122 148 73 8 379 233 336 258 104 281 180 410 262 31 418 354 14 9 71 340 127 338 479 277 3 323 303 85 401 301 459 30 437 228 182 472 398 28 411 10 15 413 321 99 436 235 166 432 51 128 35 384 170 468 66 66 198 98 261 75 155 18 366 218 358 24 348 322 378 108 332 20 496 7 121 446 157 255 270 269 372 90 368 376 391 12 138 83 356 312 264 433 52 152 407 396 131 125 480 328 488 13 17 293 126 250 393 224 140 458 242 13 25 431 246 311 481 44 79 188 165 417 295 353 37 161 248 285 39 435 114 194 100 50 62 253 329 14 103 95 305 445 181 315 199 500 482 129 263 159 149 61 429 247 19 320 453 271 385 74 227 109 56 15 324 318 206 67 292 64 360 239 451 190 388 168 34 306 139 237 470 333 9 226 141 110 289 452 409 16 486 308 352 314 434 497 272 300 327 349 169 494 115 225 403 364 473 403 364 473 187 124 274 260 240 41 309 33 17 193 423 36 331 151 87 97 399 280 153 294 120 132 467 58 183 178 359 405 136 397 426 390 172 38 310 191 205 219 392 282 40 400 184 192 317 175 357 243 245 469 344 442 88 221 223 249 106 10 107 1 457 164 113 201 49 156 463 210 444 402 485 296 173 186 213 92 92 375 6 421 65 351 43 477 313 53 355 265 383 222 412 276 475 189 189 361 55 91 200 278 111 48 11 441 382 316 275 343 211 225 18 195 408 304 19 287 241 174 32 20 176 57 Numbers E ♡ ? O ZAA IIII 90% X AB + X X A 1 234 File 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 A Go KAM Ready Cow.xlsm - Microsoft Excel Home Insert Page Layout Formulas Data Review View Developer Add-Ins Risk Solver Platform FGHIJKLMNOP Q R S T U V W X Y BCDE 1 2 3 4 5 1 2 3 4 5 6 7 214 142 386 420 491 350 119 77 167 478 389 347 339 371 143 63 307 257 319 290 337 6 12 179 215 47 203 373 42 7 380 16 144 288 464 8 422 46 273 146 81 492 428 69 284 455 456 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 266 369 483 466 256 495 419 330 229 465 440 72 231 425 283 490 244 197 117 217 334 404 154 367 302 363 297 484 448 102 185 118 234 251 335 27 101 29 2 209 158 145 427 202 493 365 254 377 116 147 11 443 76 447 230 45 84 123 252 487 381 476 54 86 177 430 299 150 207 298 449 70 438 204 26 68 394 134 499 499 23 82 80 279 454 78 220 439 130 325 415 163 112 89 135 196 133 291 387 461 345 212 22 498 59 259 474 4 471 171 346 362 96 162 450 462 208 236 137 326 489 370 342 395 286 93 460 232 424 21 267 216 160 406 5 414 416 105 94 238 238 341 374 268 60 122 148 73 8 379 233 336 258 104 281 180 410 262 31 418 354 14 9 71 340 127 338 479 277 3 323 303 85 401 301 459 30 437 228 182 472 398 28 411 10 15 413 321 99 436 235 166 432 51 128 35 384 170 468 66 66 198 98 261 75 155 18 366 218 358 24 348 322 378 108 332 20 496 7 121 446 157 255 270 269 372 90 368 376 391 12 138 83 356 312 264 433 52 152 407 396 131 125 480 328 488 13 17 293 126 250 393 224 140 458 242 13 25 431 246 311 481 44 79 188 165 417 295 353 37 161 248 285 39 435 114 194 100 50 62 253 329 14 103 95 305 445 181 315 199 500 482 129 263 159 149 61 429 247 19 320 453 271 385 74 227 109 56 15 324 318 206 67 292 64 360 239 451 190 388 168 34 306 139 237 470 333 9 226 141 110 289 452 409 16 486 308 352 314 434 497 272 300 327 349 169 494 115 225 403 364 473 403 364 473 187 124 274 260 240 41 309 33 17 193 423 36 331 151 87 97 399 280 153 294 120 132 467 58 183 178 359 405 136 397 426 390 172 38 310 191 205 219 392 282 40 400 184 192 317 175 357 243 245 469 344 442 88 221 223 249 106 10 107 1 457 164 113 201 49 156 463 210 444 402 485 296 173 186 213 92 92 375 6 421 65 351 43 477 313 53 355 265 383 222 412 276 475 189 189 361 55 91 200 278 111 48 11 441 382 316 275 343 211 225 18 195 408 304 19 287 241 174 32 20 176 57 Numbers E ♡ ? O ZAA IIII 90% X AB + X

Answer rating: 100% (QA)

Suppose I have a range filled with numbers from 1 to 15 3 8 13 1 6 11 2 7 12 Simplified Example 5 6 ... View the full answer