VBA-如何将数组当中的值作为列号使用

发布网友发布时间：2022-04-23 21:39

共1个回答

热心网友时间：2023-10-10 16:51

SPLIT没有按照你预期的把"BCD"分为B、C、D三个，所以arr只有一个结果，还是BCD，你F8单步执行就能发现。追问那么应该怎么办呢?

追答Option Explicit

Sub xxx()
Dim i, n, info
info = InputBox(prompt:="请输入要覆盖列.", Title:="请输入覆盖列", Default:="BCD")
For i = 1 To Len(info)
n = Mid(info, i, 1)
Sheets(1).Columns(n).Value = Sheets(2).Columns(n).Value
Next i
End Sub

以上程序在我的电脑上调试通过，运行没有问题。

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com