Private Sub CommandButton1_Click()
Dim each_sheet_name As String
Dim sheet_count As Integer
sheet_count = Worksheets.Count
For i = 1 To sheet_count Step 1
each_sheet_name = Worksheets.Item(i).Name
Worksheets("plot_Vg-Id").Cells(i + 8, 2) = each_sheet_name
Next i
End Sub
等高手帮忙解决--VB运行是报错57121
答案:2 悬赏:80 手机版
解决时间 2021-02-14 11:18
- 提问者网友：兔牙战士
- 2021-02-13 12:53
最佳答案
- 五星知识达人网友：零点过十分
- 2021-02-13 13:56
代码是没问题的 excel 2007 测试有效
你去下载vb sp6补丁 安装试试
你去下载vb sp6补丁 安装试试
全部回答
- 1楼网友：躲不过心动
- 2021-02-13 15:14
搜一下：等高手帮忙解决--VB运行是报错57121
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息
大家都在看
推荐资讯