如何VBA选择一对工作表并将其复制到新的wb?

时间:2016-10-01 04:11:11

标签: excel-vba macros vba excel

'这里的第一个计时器,所以感谢您的耐心! 我有一张包含多张纸的工作簿,我需要:

1)选择工作表对(索引和索引+1)

2)将它们复制到新工作簿中

3)使用引用单元格中的任何标签重命名工作表(例如A1)

4)然后重复工作簿中的每对工作表(数十对)

由于我对vba很新(只上过一节课),我很容易混淆。到目前为止,我唯一的部分是引用单元格A1将工作表重命名为该单元格中的任何文本字符串。我无法弄清楚其余部分。我认为它与workheet.index或工作表(索引)以及某种循环有关,其中索引添加2并激活该工作表和复制之前的下一个:工作表1和2,然后工作表3和4等等。

let callCount = 0;
let expectedValues = ['someValue1', 'someValue2'];

sandbox.stub(someModule, 'someMethod', function(someParameter, callback) {
  someParameter.should.equal(expectedValues[callCount++]);
  callback(null, []);
});

我理解它的方式,必须检查单元格A1以确保它不为空,因为您无法为具有空值的工作表命名。其余部分的用法和语法在我看来已经超出了我的范围,但我真的想学习并最终成为这个社区的贡献成员。我在工作中崭露头角,只兼职工作,因此为我的老板提供解决方案可能意味着我会成为永久性的。因此,非常感谢!

1 个答案:

答案 0 :(得分:0)

private ChildEventListener mItemEventListener = new ChildEventListener() {
        @Override
        public void onChildAdded(DataSnapshot dataSnapshot, String s) {

            Item item = dataSnapshot.getValue(Item.class);
           // here i need to map the incoming item to specific order list


        }

        public void onChildRemoved(DataSnapshot dataSnapshot) { }
        public void onChildMoved(DataSnapshot dataSnapshot, String s) { }
        public void onCancelled(DatabaseError databaseError) { }
        public void onChildChanged(DataSnapshot dataSnapshot, String s) {
            Log.e(TAG , "onChildChanged called");
        }
    };

此代码将帮助您入门,但是,您需要一种方法来区分要复制的索引表和要复制到的索引表。您需要添加一个额外的if语句,请参阅上面的注释。我会看这里 - http://www.rondebruin.nl/win/s3/win006.htm