Sub test()Dim i As Integeri = 8Range("A1") = iEnd Sub
2. 执行以上过程后，可以在工作表的A1单元格返回值8。
3. 当定义一个sht变量为工作表时，不能直接像上面的i那样赋值。注意在以下示例中的Sheets.Add动作，其返回的是一个工作表对象（Object）。Sub test1()Dim sht As WorksheetSheets.Addsht = Sheets.AddEnd Sub
4. 如果执行图中所示的代码，程序就会报错，提示“对象变量或With块变量为设置”，因为Sheets.Add返回的是对象，而sht定义为工作表无法直接与其对等。5. 要解决上面出现的错误，我们需要在代码中的sht前面加上一个Set，意为“设置”。Sub test1()Dim sht As WorksheetSet sht = Sheets.AddEnd Sub
6. 在如下的示例中，我们要依据当前工作表中A2至A4单元格的班级名称，分别创建新的工作表，这里就可以通过Set为对象sht赋值，然后根据班级名称命名新增的工作表。以上案例仅用于演示，更多应用请根据实际需求进行相应的调整。
喜欢的朋友请多多关注，感谢支持！