导出带有2个图形的表格作为JPEG [英] Export of form with 2 graphs As a JPEG

问题描述

嗨


想知道是否有人有一些智慧的话。


我有一个访问2002表单，其中包含2个覆盖的图形对象每个

其他，并希望将它们导出为JPEG以用于演示文稿。我/ b $ b可以为每个图表单独执行此操作，但这对我没有帮助，因为我需要

在同一个JPEG上。我以为我会尝试导出

包含两者但我遇到麻烦的表格。 （我的VBA是自学成才，而且b
知识很危险）。这是不可能的，因为对象不支持动作或我的代码错误。


我试过通过谷歌搜索新闻组，有很多关于将jpegs导入表单的内容很多，但是找不到任何关于以JPEG格式导出

表格的内容。

我使用的代码是：


函数PictureTest（）

Dim obj As Object

设置obj = Forms！[frmGraph]。[FirstGraph] .Object

obj.Export" c：\ temp \ PictTest.jpeg"，" jpeg"

Set obj = Nothing


结束功能


这适用于每个图表但不是我尝试的时候：


设置obj = Forms！[frmGraph] .Object


或：


设置obj = Forms！[frmGraph]


任何珍珠的智慧都会受到赞赏


问候

Dave

Hi

Wonder if someone has some words of wisdom.

I have a access 2002 form that contains 2 graph objects that overlay each
other and would like to export them as a JPEG to use in a presentation. I
can do this individually for each graph but this does not help me as I need
both on the same JPEG. I thought I would try an export the form that
contains both but I am having trouble. (My VBA is self taught and a little
knowledge is dangerous). It is either impossible to do as the object doesn''t
support the action or I have the code wrong.

I have tried looking through google through news groups, there is a lot
about IMPORTING jpegs into forms but can''t find anything about exporting a
form as a JPEG.

The code I am using is:

Function PictureTest()
Dim obj As Object
Set obj = Forms![frmGraph].[FirstGraph].Object
obj.Export "c:\temp\PictureTest.jpeg", "jpeg"
Set obj = Nothing

End Function

This works for each graph but not when I try :

Set obj = Forms![frmGraph].Object

or:

Set obj = Forms![frmGraph]

Any pearls of wisdom would be appreciated

Regards
Dave

推荐答案

嗨大卫，


我发现将MS Access报告转换为

图形的唯一选项是任何其他软件可用的东西：


转换.pdf使用Acrobat Writer然后打开.pdf使用

CorelDraw /另存为.jpg


或


打印屏幕/粘贴到CorelDraw（或其他图形程序）/

编辑位图/裁剪位图（以消除

屏幕上不需要的内容）/另存为。 jpg


如果有人有更好的想法，我很乐意听到它。


彼得


David Lauberts写道：

Hi David,

The only options I have found to convert a MS Access report as a
graphic into something useable by any other software:

Convert to .pdf using Acrobat Writer and then open .pdf using
CorelDraw / save as .jpg

or

Print Screen / paste into CorelDraw (or other graphics program)/
edit bitmap / crop bitmap (to eliminate what is not required on the
screen) / save as .jpg

If anyone has a better idea I would love to hear it.

Peter

David Lauberts wrote:

嗨

想知道是否有人有一些智慧的话。

我有一个包含2个图形对象的Access 2002表单覆盖每个
其他并希望将它们导出为JPEG以在演示文稿中使用。我可以为每个图表单独执行此操作，但这对我没有帮助，因为我需要
两个相同的JPEG。我以为我会尝试导出
包含两者但我遇到麻烦的表格。 （我的VBA是自学成才，有点知识是危险的）。这是不可能的，因为对象不支持该操作或我的代码错误。

我试过通过谷歌浏览新闻组，有很多<关于将jpegs导入表单但是找不到任何关于将
表单导出为JPEG的信息。

我使用的代码是：

函数PictureTest（）
Dim obj As Object
设置obj = Forms！[frmGraph]。[FirstGraph] .Object
obj.Export" c：\ temp \ PictureTest.jpeg" ，jpeg
设置obj = Nothing

结束功能

这适用于每个图形，但不适用于我尝试：

设置obj = Forms！[frmGraph] .Object

或：

设置obj = Forms！[frmGraph]

任何智慧珍珠都会是赞赏

关心
Dave

Hi

Wonder if someone has some words of wisdom.

I have a access 2002 form that contains 2 graph objects that overlay each
other and would like to export them as a JPEG to use in a presentation. I
can do this individually for each graph but this does not help me as I need
both on the same JPEG. I thought I would try an export the form that
contains both but I am having trouble. (My VBA is self taught and a little
knowledge is dangerous). It is either impossible to do as the object doesn''t
support the action or I have the code wrong.

I have tried looking through google through news groups, there is a lot
about IMPORTING jpegs into forms but can''t find anything about exporting a
form as a JPEG.

The code I am using is:

Function PictureTest()
Dim obj As Object
Set obj = Forms![frmGraph].[FirstGraph].Object
obj.Export "c:\temp\PictureTest.jpeg", "jpeg"
Set obj = Nothing

End Function

This works for each graph but not when I try :

Set obj = Forms![frmGraph].Object

or:

Set obj = Forms![frmGraph]

Any pearls of wisdom would be appreciated

Regards
Dave

Peter

我使用了打印屏幕和MS Paint，感谢提示，但我是jus t $ / b $ b想知道是否可以直接使用vb使用命令按钮

进行以后的工作。


任何人知道是否可以做到吗？


问候

Dave

" Peter Flick" < PF **** @ bigpondXXremoveXX.net.au>在消息中写道

新闻：KV ********************* @ news-server.bigpond.net.au ...

Peter

I used print screen and MS Paint, thanks for the tip, but I was just
wondering if the was a way to do it directly using vb using a command button
for future work.

Anyone know if it can be done?

Regards
Dave
"Peter Flick" <pf****@bigpondXXremoveXX.net.au> wrote in message
news:KV*********************@news-server.bigpond.net.au...

我发现将MS Access报告转换为可用于任何其他软件的东西的唯一选项：

使用Acrobat Writer转换为.pdf然后使用
CorelDraw打开.pdf /另存为



打印屏幕/粘贴到CorelDraw（或其他图形程序）/
编辑位图/裁剪位图（消除
屏幕上不需要的东西）/另存为.jpg
如果有人有更好的主意我会喜欢听到它。

彼得

David Lauberts写道：

Hi David,

The only options I have found to convert a MS Access report as a
graphic into something useable by any other software:

Convert to .pdf using Acrobat Writer and then open .pdf using
CorelDraw / save as .jpg

or

Print Screen / paste into CorelDraw (or other graphics program)/
edit bitmap / crop bitmap (to eliminate what is not required on the
screen) / save as .jpg

If anyone has a better idea I would love to hear it.

Peter

David Lauberts wrote:

嗨

想知道如果有人说的话智慧。

我有一个Access 2002表单，其中包含2个图形对象，它们互相叠加
，并希望将它们导出为JPEG以在演示文稿中使用。
我可以为每个图表单独执行此操作，但这对我没有帮助，因为I
需要在同一个JPEG上。我以为我会尝试导出
包含两者但我遇到麻烦的表格。 （我的VBA是自学成才，而b $ b bb的小知识是危险的）。这是不可能的，因为对象
不支持该操作或我的代码错误。

我试过通过谷歌浏览新闻组，有很多<关于将jpegs导入表单但是找不到任何关于将
a表格导出为JPEG的信息。

我使用的代码是：

功能PictureTest（）
Dim obj As Object
设置obj = Forms！[frmGraph]。[FirstGraph] .Object
obj.Export" c：\ temp \ PictureTest.jpeg"， " jpeg"
设置obj = Nothing

结束功能

这适用于每个图形，但不适用于我尝试：

设置obj = Forms！[frmGraph] .Object

或：

设置obj = Forms！[frmGraph]

任何智慧珍珠都会受到赞赏

问候
Dave

Hi

Wonder if someone has some words of wisdom.

I have a access 2002 form that contains 2 graph objects that overlay each other and would like to export them as a JPEG to use in a presentation. I can do this individually for each graph but this does not help me as I need both on the same JPEG. I thought I would try an export the form that
contains both but I am having trouble. (My VBA is self taught and a little knowledge is dangerous). It is either impossible to do as the object doesn''t support the action or I have the code wrong.

I have tried looking through google through news groups, there is a lot
about IMPORTING jpegs into forms but can''t find anything about exporting a form as a JPEG.

The code I am using is:

Function PictureTest()
Dim obj As Object
Set obj = Forms![frmGraph].[FirstGraph].Object
obj.Export "c:\temp\PictureTest.jpeg", "jpeg"
Set obj = Nothing

End Function

This works for each graph but not when I try :

Set obj = Forms![frmGraph].Object

or:

Set obj = Forms![frmGraph]

Any pearls of wisdom would be appreciated

Regards
Dave

On Mon，2003年11月3日06:54 ：19 -0000，David Lauberts <哒************ @ ntlworld.com>写道：


您可以尝试Stephen Lebans网站 http://www.lebans.com/ReportUtilities.htm 他的Report Utilies下载允​​许您将报告保存为EMF或WMF

文件。如果需要，可以将此文件转换为jpg。

您必须构建一个显示图表的报告才能使用此方法。最简单的方法是在

数据库窗口中右键单击表单，然后选择另存为报告。这将根据您的表单创建一个新报告，您可以根据自己的需要进行编辑。

On Mon, 3 Nov 2003 06:54:19 -0000, "David Lauberts" <da************@ntlworld.com> wrote:

You could try Stephen Lebans site http://www.lebans.com/ReportUtilities.htm his Report Utilies download allows you to save a report as an EMF or WMF
file. This file could then be converted to a jpg if required.
You would have to build a report showing your graphs in order to use this method. The easiest way to do this is to right click on your form in the
database window and select "Save As Report". This will create a new report based on your form which you can edit to suit your needs.

Peter

我使用了打印屏幕和MS油漆，感谢小费，但我只是想知道是否可以直接使用vb使用命令按钮
进行以后的工作。

任何人都知道如果它可以做到吗？

Dave
Peter Flick < PF **** @ bigpondXXremoveXX.net.au>在消息中写道
新闻：KV ********************* @ news-server.bigpond.net.au ...

Peter

I used print screen and MS Paint, thanks for the tip, but I was just
wondering if the was a way to do it directly using vb using a command button
for future work.

Anyone know if it can be done?

Regards
Dave
"Peter Flick" <pf****@bigpondXXremoveXX.net.au> wrote in message
news:KV*********************@news-server.bigpond.net.au...

我发现将MS Access报告转换为可用于任何其他软件的东西的唯一选项：

转换为.pdf使用Acrobat Writer然后打开.pdf使用
CorelDraw /另存为.jpg


打印屏幕/粘贴到CorelDraw（或其他图形程序） /
编辑位图/裁剪位图（以消除
屏幕上不需要的内容）/另存为.jpg

如果有人有更好的想法，我很乐意听到它。彼得

David Lauberts写道：

Hi David,

The only options I have found to convert a MS Access report as a
graphic into something useable by any other software:

Convert to .pdf using Acrobat Writer and then open .pdf using
CorelDraw / save as .jpg

or

Print Screen / paste into CorelDraw (or other graphics program)/
edit bitmap / crop bitmap (to eliminate what is not required on the
screen) / save as .jpg

If anyone has a better idea I would love to hear it.

Peter

David Lauberts wrote:

>嗨
>
>不知道有人有一些智慧的话。
>
>我有一个Access 2002表单，其中包含2个图形对象，覆盖了>其他并希望将它们导出为JPEG以在演示文稿中使用.I>可以为每个图表单独执行此操作但这对我没有帮助，因为Ineed>两者都在同一个JPEG上。我以为我会尝试导出
>的表格包含两者但我遇到了麻烦。 （我的VBA是自学而且很少>知识很危险）。这是不可能的，因为对象不是>支持该操作或我的代码有误。
>
>我试过通过谷歌浏览新闻组，有很多
>关于将jpegs导入表单但无法找到有关exporta>的任何内容形式为JPEG。
>
>我使用的代码是：
>
>功能PictureTest（）
> Dim obj As Object
>设置obj = Forms！[frmGraph]。[FirstGraph] .Object
> obj.Export" c：\ temp \ PictureTest.jpeg"，" jpeg"
>设置obj = Nothing
>
>结束功能
>
>这适用于每个图表，但不适用于我尝试：
>
>设置obj = Forms！[frmGraph] .Object
>
>或：
>
>设置obj = Forms！[frmGraph]
>
>任何珍珠的智慧将不胜感激
>
>问候
> Dave
>
>

> Hi
>
> Wonder if someone has some words of wisdom.
>
> I have a access 2002 form that contains 2 graph objects that overlayeach > other and would like to export them as a JPEG to use in a presentation.I > can do this individually for each graph but this does not help me as Ineed > both on the same JPEG. I thought I would try an export the form that
> contains both but I am having trouble. (My VBA is self taught and alittle > knowledge is dangerous). It is either impossible to do as the objectdoesn''t > support the action or I have the code wrong.
>
> I have tried looking through google through news groups, there is a lot
> about IMPORTING jpegs into forms but can''t find anything about exportinga > form as a JPEG.
>
> The code I am using is:
>
> Function PictureTest()
> Dim obj As Object
> Set obj = Forms![frmGraph].[FirstGraph].Object
> obj.Export "c:\temp\PictureTest.jpeg", "jpeg"
> Set obj = Nothing
>
> End Function
>
> This works for each graph but not when I try :
>
> Set obj = Forms![frmGraph].Object
>
> or:
>
> Set obj = Forms![frmGraph]
>
> Any pearls of wisdom would be appreciated
>
> Regards
> Dave
>
>

Wayne Gillespie

Gosford NSW Australia

Wayne Gillespie
Gosford NSW Australia

这篇关于导出带有2个图形的表格作为JPEG的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！