请教!能否在access定义新增的excel工作表的打印纸张和格式吗?

wjb5645

      我是在access中让excel复制一张工作表,并对新工作表修改保存. 从excel 打开又要手工进行打印设置,有没办法在access中解决???

wjb5645

我改为:

  With ActiveSheet.PageSetup



        .LeftMargin = ()
        .RightMargin = ()
        .TopMargin = ()
        .BottomMargin = ()
        .HeaderMargin = ()
        .FooterMargin = ()



       End With

倒是可以用了,是厘米制的,我还是想知道在ACCESS中的办法.

wjb5645

我只懂用笨办法:

用EXECL录制的宏来修改,可边距的属性在ACCESS中不能用:

       With ActiveSheet.PageSetup

        .LeftMargin = Application.InchesToPoints()
        .RightMargin = Application.InchesToPoints()
        .TopMargin = Application.InchesToPoints()
        .BottomMargin = Application.InchesToPoints()
        .HeaderMargin = Application.InchesToPoints()
        .FooterMargin = Application.InchesToPoints()

       End With

请教在ACCESS中的办法,非常感谢!

sgrshh29

以下是引用wjb5645在2007-2-11 0:53:00的发言：


      我是在access中让excel复制一张工作表,并对新工作表修改保存. 从excel 打开又要手工进行打印设置,有没办法在access中解决???

办法有几种，要看你的实际情况决定。