想要循环帮助 [英] Want help for loop

问题描述

我想知道如何为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

循环

推荐答案

抱歉，这不是VBA论坛。  ;在Excel VBA论坛中发布VBA问题。

Sorry but this is not a VBA forum.  Post VBA questions in the Excel VBA forum.

这篇关于想要循环帮助的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！