首页 > 解决方案 > 我需要一个输入框条目来做两件事

问题描述

我有一个带有输入框的 Excel 宏来选择一系列单元格。我还希望选择的范围坐标显示在某个地方,以便我可以检查它。

这是我拥有的代码的主要部分:

Dim Data_Sheet As Worksheet
Dim Pivot_Sheet As Worksheet
Dim StartPoint As Range
Dim DataRange As Range
Dim PivotName As String
Dim NewRange As String
Dim LastCol As Long
Dim lastRow As Long

Set DataRange = Application.InputBox("Please select INBOUND range", Default:="A:L", Type:=8)
    DataRange.Select
    Selection.Copy

列是预先选择的 (A:L),我在 A: 之后插入开始行,在 L 之后插入结束行。所以,如果我输入 10 和 50,我会得到范围 (A10:L50),但是那些坐标然后就消失了. 我希望“A10:L50”显示在某个单元格中。任何帮助,将不胜感激。

标签: excelvba

解决方案


尝试这个。它将自动默认为活动范围。用户可以选择他们想要的范围,并且可以使用。

请注意,用户选择范围总是很麻烦 - 用户可能不会选择所有数据等。尝试在您的代码中控制它。您应该在本地窗口中看到 rangeselected 变量。

    Dim oSelect As Range
    Set oSelect = Application.InputBox("Range", , Range("A1").CurrentRegion.Address, , , , , 8)
    RangeSelected = oSelect.Address

推荐阅读