• 所有问题

    • 我要用vba把sheet1中所有的数据复制到sheet2中 求代码

    我要用vba把sheet1中所有的数据复制到sheet2中
    求代码

    举报该问题
    推荐答案   2016-05-21
    Sub 宏1()
    '
    ' 宏1 宏
    '

    '
        Sheets(1).Cells.Copy
        Sheets(2).Cells(1, 1).Select
        ActiveSheet.Paste
    End Sub

    以上是复制整个表

    温馨提示：答案为网友推荐，仅供参考
    相似回答
    excel 如何通过vba将sheet1中的操作写入到sheet2中答：1、假如要把Sheet1工作表中A1单元格的数据写入Sheet2工作表的A1单元格中。2、可以执行以下语句：sub test() sheets("Sheet2").range("A1").Value=sheets("Sheet1").range("A1").Valueend sub3、语句解释：range("A1")代表A1单元格，.Value代表是单元格的值属性。
    EXCEL用宏把Sheet1中数据复制到Sheet2中答：用万能的vba可以完成。第一步编制宏代码。代码如下：Sub test()Sheets("Sheet1").Select Cells.Select Selection.Copy Sheets("Sheet2").Select ActiveSheet.Paste End Sub 第二步：点击开发工具-宏-选择上述TEST宏，按执行按钮。如图：执行前如图：执行后如图：...
    利用VBA如何将工作表1的内容复制到工作表2里面?答：用下面代码要指明第左上解单元格 要复制表的区域.Copy Destination:=接收复制表的左上角单元格 如 把SHEET1中的已使用区域复制到SHEET2中 以SHEET2的A1单元格为起来粘贴进SHEET2 Dim myRange1 As Range Dim myRange2 As Range Set myRange1 = Sheets1.UsedRange Set myRange2 = Sheets2.Range...
    请问excel宏vba,把sheet1中数据复制到sheet2中,由一行分成五行该怎么...答：Sub aa()Dim i, k x = UsedRange.Columns.Count For i = 2 To Range("a65536").End(xlUp).Row For k = 2 To x Step 4 n = Sheets(2).Range("a65536").End(xlUp).Row Cells(i, 1).Copy Sheets(2).Cells(n + 1, "A")Range(Cells(i, k), Cells(i, k + 2)).Copy ...
    怎样用VBA 将B工作簿中的sheet1移动到A工作簿中的sheet2?答：xls" Sheets("Sheet1").Select Sheets("Sheet1").Copy After:=Workbooks("A.xls").Sheets(1) Sheets("Sheet1 (2)").Select Sheets("Sheet1 (2)").Name = "Sheet1"End Sub请在A.xls中建宏，复制以上代码到宏中编辑，执行。代码中的 E:\file\为文件路径。
    ...VBA 请教:如何将sheet1的每一列,插入到sheet2中,且每隔3列插入1列...答：Sub charu()i = 10 '假定表1中有10列，i为列数 For j = 1 To i k = (j - 1) * 4 + 1 Sheets("Sheet1").Select Range(Cells(1, j), Cells(65536, j)).Select Selection.Copy Sheets("Sheet2").Select Cells(1, k).Select ActiveSheet.Paste Next j End Sub ...
    使用VBA进行两个表格的数据复制答：软件版本：Office2007 方法如下：1.Sheet1中有如下数据，利用VBA复制到SHeet2中：2.Alt+F11，输入代码如下：3.F5执行代码，返回Excel中的Sheet2就可以看到数据复制过来了：
    大家正在搜
    把sheet1复制到sheet2将sheet复制多个的vbavba 多个sheet一起复制vba activesheet如何复制sheet1到2多sheet合并一个sheetvba sheet对象vba 删除sheetvba当前sheet