本文介绍了想要循环帮助的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!
问题描述
我想知道如何为Application.inputbox创建范围循环
i want to know how to create loop for Application.inputbox for range
Sub copylineup()
Dim copyrange As Range
Dim destinationrange As Range
Do
设置copyrange = Application.InputBox(提示:="输入要选择的范围",类型:= 8)
设置destinationrange = Application.InputBox(提示:="输入目的地范围",输入:= 8)
copyrange.Copy destinationrange
Sub copylineup()
Dim copyrange As Range
Dim destinationrange As Range
Do
Set copyrange = Application.InputBox(Prompt:="Enter a range to select", Type:=8)
Set destinationrange = Application.InputBox(Prompt:="Enter a destination range", Type:=8)
copyrange.Copy destinationrange
循环
推荐答案
这篇关于想要循环帮助的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持!