打开另一个模板后再传递一个本报表的值到另一模版

allan

假设第一张单为需要用到的物料信息的表，第二张是物类信息表，第一张表在填报时需改相关的信息

第一张表
Private Sub CommandButton5_Click()
    Range("_ESF1000").Select
    If Range("_ESF1000") <> "" Then
       Selection.Copy
       NewReport ("物料基本信息修改表")
    Else
       MsgBox "请选择要修改的物料"
    End If
End Sub

第二张表
Private Sub Workbook_Open()
    Range("_ESF1000").Select
    If Range("_ESF1000") = "" Then
       Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    End If
End Sub

jarryandtom

这个想法不错，但是VBA 能在WEB 上执行吗？
是不是只能在客户端上执行。

maoer8783

但是VBA 能在WEB 上执行吗？

本文来自:阳光网驿_企业信息化专家 详细出处请参考：http://bbs.sunwy.org/forum.php?m ... hlight=%C4%A3%B0%E6