PPT做的海报如何转换成高清的JPG图片?

 在PowerPoint 2003 打开要转换的ppt点击工具-->宏-->宏-->在第一个文本框中输入ppt2pic 

 然后点击创建 去点程序自己创建的这几行 然后粘贴最下面的代码进去 

 然后点击 文件关闭并返回.... 

 再次点击工具-->宏-->宏-->选中ppt2pic运行 然后就在D:\下面了 

 Sub ppt2pic() 

 ' 

 ' 宏由 zim 创建，日期 2012-10-5。 

 ' 

     Dim Nx     As Shape 

     Dim X     As Long 

     For X = 1 To ActivePresentation.Slides.Count 

             '跳至指定的幻灯片 

             'ActiveWindow.View.GotoSlide   X 

             '获

昨天在一家医药公司，做Excel需求沟通的时候，有一个学员遇到了一个Word的棘手问题，已经问遍了公司的高手，还是无解。

她的word问题是这样的：

正常的

在我们的工作过程中，很多时候遇到，Excel应用条件格式了，单元格也变色了。

但是我们想把条件格式的颜色，应用到其他表格或者区域，发现，颜色是无法copy的，也没法直接看单元格的颜色RGB颜色值的，那该肿么办呢？

比如下图，我在A1：A17设置了：条件格式-》色阶，A1单元格也变成绿色了，但是我们在单元格格式的界面里，看不到RGB颜色的具体数值，那就没办法把这些颜色应用到其他表或者图里了，肿么办？

以下是最终解决方法……看帖要顶啊

用英文谷歌搜了好多论坛，在某篇帖子里提到：把excel单元格复制到word，再从word粘回excel就能得到一个以该色阶颜色作为背景色的单元格。
受了启发，做了点小改动：把整个区域粘到word里，直接遍历word表格里的每

重要提示    如果您是软件开发人员，在为您的加载项设计安装和删除程序以前，可以使用此过程安装或删除自动化程序。如果您不是开发人员，则应该不需要使用此过程。如果需要安装和删除说明，请与提供加载项的系统管理员联系。

a=array(1,2,3) b=array(4,5,6) 希望生成一新的数组 c=array(14,15,16,24,25,26,34,35,36)

这里就需要用VBA来进行合并了：

Sub Test()
    Dim a, b, c
    Dim i%, j%, k%

    a = Array(1, 2, 3)
    b = Array(4, 5, 6)
    ReDim c(1 To (UBound(a) + 1) * (UBound(b) + 1))
    k = 0
    For i = 0 To UBound(a)
        For j = 0 To UBound(b)
            k = k + 1
            c(k) = a(i) & b(j)
        Next
    Next
End Sub