使用Excel VBA复制列中的范围

用户名

我正在尝试添加一个按钮,该按钮在带有值的最后一列之后添加一个新列。这有效。

现在,我想将值复制到新列。值应从第32行的最后一列复制到最后一行,并在A列中复制一个值。我如何专注于特定范围?

Sub AddMeeting()
Dim ws As Worksheet
Dim lastcol As Long
 Set ws = ActiveSheet

lastcol = ws.Cells(32, ws.Columns.Count).End(xlToLeft).Column
Columns(lastcol).Copy Destination:=Columns(lastcol + 1)
Range ((Cells.Columns.Count.End(xlLeft)) & Range(32)), (lastcol + 1) & Cells.Rows.Count.End(xlUp)



 Application.CutCopyMode = False
End Sub
悉达思·劳特

值应从第32行的最后一列复制到最后一行,并在A列中复制一个值

这是您要尝试的吗?

Option Explicit

Sub Sample()
    Dim ws As Worksheet
    Dim lRow As Long, lCol As Long
    Dim LastColumn As String
    Dim rngToCopy As Range

    '~~> Set this to the relevant worksheet
    Set ws = Sheet1

    With ws
        '~~> Find last row in Col A
        lRow = .Range("A" & .Rows.Count).End(xlUp).Row
        '~~> Find last column in row 32
        lCol = .Cells(32, .Columns.Count).End(xlToLeft).Column
        '~~> Get Column Name from column number
        ' https://stackoverflow.com/questions/10106465/excel-column-number-from-column-name
        LastColumn = Split(Cells(, lCol).Address, "$")(1)

        Set rngToCopy = .Range("A32:" & LastColumn & lRow)

        Debug.Print rngToCopy.Address

        With rngToCopy
            '
            '   Do what you want here
            '
        End With
    End With
End Sub

本文收集自互联网,转载请注明来源。

如有侵权,请联系[email protected] 删除。

编辑于
0

我来说两句

0条评论
登录后参与评论

相关文章

来自分类Dev

Excel 2010 VBA帮助复制列的范围

来自分类Dev

使用VBA宏在excel中复制变量范围

来自分类Dev

在VBA Excel中复制粘贴范围

来自分类Dev

如何只复制范围内的Excel VBA中的值?

来自分类Dev

如何只复制范围内的Excel VBA中的值?

来自分类Dev

VBA代码将Excel范围复制并粘贴到Outlook中

来自分类Dev

Excel VBA:复制/粘贴范围

来自分类Dev

在Excel-Vba中复制多列

来自分类Dev

删除Excel VBA中的列范围

来自分类Dev

使用VBA将范围从Excel工作表复制到PowerPoint中的表

来自分类Dev

使用VBA将动态范围复制并粘贴到Excel中的新工作表

来自分类Dev

使用vba从添加标题的范围中复制值并按大小在Excel中排序

来自分类Dev

如何使用 Excel VBA 在 InnerText 中复制或插入多个范围数据

来自分类Dev

Excel VBA范围使用计数的列

来自分类Dev

Excel VBA复制并粘贴整个范围与条件?

来自分类Dev

Excel VBA问题-复制索引范围的语法

来自分类Dev

使用 VBA 将所选列复制并粘贴到 Excel 中的表尾

来自分类Dev

VBA仅复制excel中的特定列以导出为csv

来自分类Dev

Excel VBA - 遍历文件夹中的文件,复制范围,粘贴到此工作簿中

来自分类Dev

在 Excel VBA 中处理范围内的列

来自分类Dev

Excel VBA将范围复制到新工作簿中

来自分类Dev

Excel VBA-复制到特定工作表的代码中的错误,具体取决于范围

来自分类Dev

在VBA和Excel中复制粘贴具有随机范围的图片

来自分类Dev

Vba Excel:使用OR列条件而不复制行

来自分类Dev

使用VBA的大文件大小复制范围

来自分类Dev

在VBA Excel中多次将一个范围复制并粘贴到另一个范围的代码

来自分类Dev

使用VBA在Excel 2016中复制和粘贴值

来自分类Dev

使用VBA excel在word中复制形状和更改文本

来自分类Dev

VBA中的减法范围(Excel)

Related 相关文章

  1. 1

    Excel 2010 VBA帮助复制列的范围

  2. 2

    使用VBA宏在excel中复制变量范围

  3. 3

    在VBA Excel中复制粘贴范围

  4. 4

    如何只复制范围内的Excel VBA中的值?

  5. 5

    如何只复制范围内的Excel VBA中的值?

  6. 6

    VBA代码将Excel范围复制并粘贴到Outlook中

  7. 7

    Excel VBA:复制/粘贴范围

  8. 8

    在Excel-Vba中复制多列

  9. 9

    删除Excel VBA中的列范围

  10. 10

    使用VBA将范围从Excel工作表复制到PowerPoint中的表

  11. 11

    使用VBA将动态范围复制并粘贴到Excel中的新工作表

  12. 12

    使用vba从添加标题的范围中复制值并按大小在Excel中排序

  13. 13

    如何使用 Excel VBA 在 InnerText 中复制或插入多个范围数据

  14. 14

    Excel VBA范围使用计数的列

  15. 15

    Excel VBA复制并粘贴整个范围与条件?

  16. 16

    Excel VBA问题-复制索引范围的语法

  17. 17

    使用 VBA 将所选列复制并粘贴到 Excel 中的表尾

  18. 18

    VBA仅复制excel中的特定列以导出为csv

  19. 19

    Excel VBA - 遍历文件夹中的文件,复制范围,粘贴到此工作簿中

  20. 20

    在 Excel VBA 中处理范围内的列

  21. 21

    Excel VBA将范围复制到新工作簿中

  22. 22

    Excel VBA-复制到特定工作表的代码中的错误,具体取决于范围

  23. 23

    在VBA和Excel中复制粘贴具有随机范围的图片

  24. 24

    Vba Excel:使用OR列条件而不复制行

  25. 25

    使用VBA的大文件大小复制范围

  26. 26

    在VBA Excel中多次将一个范围复制并粘贴到另一个范围的代码

  27. 27

    使用VBA在Excel 2016中复制和粘贴值

  28. 28

    使用VBA excel在word中复制形状和更改文本

  29. 29

    VBA中的减法范围(Excel)

热门标签

归档