1. Create an Excel
2. Create a rectangle
3. Right click on the rectangle, specify the macro, create new
4.
SUB Rectangle 1_Click ()
Sheets ("sheet1"). Range ("a1") = 100
Sheets ("Sheet1"). Cells (2, 1) = 200
End Sub