【问题标题】:Microsoft Excel VBA code range based on cell contents基于单元格内容的 Microsoft Excel VBA 代码范围
【发布时间】:2018-11-11 20:02:10
【问题描述】:

我有一些 VBA 代码,但范围有问题。

在我的 Excel 工作表中,我希望范围基于单元格 C2 的内容。

这是VBA代码,

Sub Repeat()
'
' Repeat Macro
'

'
    Range("A1:A3").Select
    Selection.AutoFill Destination:=Range("A1:A19"), Type:=xlFillDefault
    Range("A1:A19").Select
    Range("B1").Select
End Sub

但是,如果单元格 C2 包含 24,我希望使用 AX 而不是 A19,我希望使用 AX 作为单元格 C2 中的值,我希望它说 A24 而不是 A19 有什么想法吗?

【问题讨论】:

  • 听起来你的问题不完整。就好像您正在手动做一些可以轻松自动化的事情。你为什么要输入一个范围来自动填充?这不能自动完成吗?最后一行是“24”还是有其他东西使“24”成为数字?
  • 你在A1:A3有什么类型的数据?
  • @Andreas 理想情况下,我希望该范围成为 A 中包含数据的第一个 X 单元格。这会改变,有什么简单的解决方法吗?
  • 是的,这很容易解决。但什么是 X 细胞?您需要更具体地说明 X 的构成要素。您的意思是 A 列中最后填充的行

标签: excel vba


【解决方案1】:

试试

Range("A1:A" & Range("C2").value)    

但您也应该使用工作表名称来限定。

例如:

With Worksheets("Sheet1")
    .Range("A1:A3").AutoFill Destination:= .Range("A1:A" & .Range("C2").value)    , Type:=xlFillDefault
End With

【讨论】:

    猜你喜欢
    • 1970-01-01
    • 2015-11-26
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2018-11-09
    相关资源
    最近更新 更多