• 如何在ppt中设置单击图形时可以执行宏或vba代码?

    在excel中插入图形后,用鼠标右键单击该图形弹出的右键快捷菜单中有个“指定宏”命令,可以指定vba中的宏,从而实现单击图形即运行指定的vba宏代码,如下图所示:

    但是在ppt中插入图形后,用鼠标右键单击该图形弹出的右键快捷菜单中并没有类似的“指定宏”命令,如下图所示:

    我们可以通过以下的步骤来实现当单击ppt图形时,执行相应的宏。

    单击“插入”选项卡下的“链接”[……]

    阅读全文

  • 如何用vba实现ppt幻灯片中层叠图形的置于顶层或置于底层命令?

    如下图所示的ppt幻灯片中有12个矩形,其中6个矩形被其中6个矩形层叠覆盖在底层。

    如果要实现将某个图形置于顶层或置于底层,从而让它显示在层叠图片的上面或者隐藏在层叠图片的下面的效果,可以使用Shape对象的ZOrder方法将指定的图形置于顶层或者置于底层。

    代码如下:

    代码运行后的效果如下图所示:

    [……]

    阅读全文

  • 如何用vba给ppt幻灯片中的同类型的图形批量重命名?

    如下图所示

    ppt幻灯片中有6个矩形,名称分别为”矩形 N”的形式,现在想要批量将其名称换成”img N”的形式,可以使用如下的vba代码:

    结果如下图所示:

  • 如何用vba批量删除ppt幻灯片中同类型的所有图形?

    在ppt中,一切皆图形。

    有时候我们需要批量删除指定形状的图形,可以使用如下的vba代码:

  • 如何用vba给ppt幻灯片中插入同尺寸大小的图形?

    在ppt中,经常需要插入图形。

    有时候需要基于幻灯片中已有的图形再插入相同尺寸大小的同样的图形。

    如下图所示为ppt幻灯片中已有的6个矩形,现在需要再插入6个矩形,形成层叠的效果。

    可以使用如下的vba代码:

    结果如下图所示:

    新插入的6个矩形占据了原来的6个矩形的位置,形成了层叠效果。

  • 如何用vba把ppt幻灯片中的所有图形的尺寸大小批量统一调整?

    在ppt中,所有的操作都是在图形中完成的。

    在ppt中,可以插入的图形种类有很多,可以是自选图形、任意多边形、OLE 对象或图片等等。

    在ppt vba中,所有的图形的相关操作都可以用Shape对象来实现。

    如果要将一个ppt演示文稿中的特定某个类型的图形的尺寸、大小、位置都统一调整的话可以使用如下的vba代码:

    [……]

    阅读全文

  • 如何用excel工作表函数生成指定区间的随机数?

    在excel中,有两个函数可以生成随机数,分别是RAND函数和RANDBETWEEN函数。

    其中RAND函数返回的是一个大于等于0且小于1的随机实数。

    RANDBETWEEN函数返回的是指定区间的随机整数。

    在一个小规模的数据量范围内,可以认为RAND函数返回的随机数是不重复的。

    如果要生成指定区间的随机实数,比如生成[5,10)区间的随机实数,可以使用如下的公式:
    [c[……]

    阅读全文

  • 如何在vba的窗体列表框或组合框控件中添加显示多列数据?

    vba的窗体列表框或组合框控件可以显示多列数据。

    要在窗体列表框或组合框控件中显示多列数据,首先要设置ColumnCount属性,然后再添加多列数据,可以采用以下两种方式:

    一、列表框或组合框逐行多列数据添加

    列表框或组合框逐行多列数据添加步骤如下:

    1.设置列表框或组合框控件的ColumnCount属性为具体的列数;

    2.用列表框或组合框控件的AddItem方法先添[……]

    阅读全文

  • 如何在vba的窗体Image图像控件中显示excel工作表中创建的图表?

    在vba窗体中,Image图像控件可以显示图片。

    Image 图像控件可以显示的图片类型有以下几种

    • *.bmp

    • *.cur
    • *.gif

    • *.ico

    • *.jpg

    • *.wmf

    Image图像控件不仅可以显示图片,还可以修剪、缩放图片。

    要在Image图像控件中显示图片,需要设置Image图像控件的Picture属[……]

    阅读全文

  • 如何用vba进行排序?

    在编写程序的过程中,排序是一个常见的需求。

    利用程序排序的算法有很多,本文将介绍几个常见的排序算法以及它们的vba实现代码。

    1. 冒泡排序
      冒泡排序的算法如下:Step1:对每一对相邻元素作大小比较,然后交换位置,从开始第一对到结尾的最后一对。这一步后,最后的元素会是最大或最小的数。

      Step2:继续对除已经排序的末尾元素外的其它元素继续循环执行第一步操作。

      Step3:[……]

    阅读全文