编程论坛 → VB6论坛

名称是变动问题求解

我好学习发布于 2014-01-12 22:45， 383 次点击

Windows("客户明细(1).xls").Activate中的“客户明细(1).xls"的1是随时变动的，变成2或3后就出错，怎么处理？如何设置变量？请高手指教，谢谢了

2 回复

Artless2014-01-12 23:00

Windows("客户明细(" & 变量 &").xls").Activate

我好学习2014-01-13 21:21

Sub Macro1()
'
' Macro1 Macro
'
' 快捷键: Ctrl+q
'

   Windows("客户明细(" & i & ").xls").Activate    （这行如何声明i等于数字1、2. ....,我是新手，这是录制的，还是不会）
    Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
    Selection.Copy
    Windows("客户观察器(131228163429).xls").Activate
    ActiveSheet.Paste
    Selection.End(xlDown).Select
End Sub