精华内容
下载资源
问答
  • CorelDRAW 编写和运行宏指令

    千次阅读 2010-06-06 17:53:00
    CorelDRAW 编写和运行宏指令 开发和运行 CorelDRAW 宏指令之前,必须安装 VBA 组件。 <br />安装 CorelDRAW VBA VBA 在 CoerlDRAW 11和12 中是作为典型安装的一部分安装。CoerlDRAW 10 中,VBA...
    
    

    开发和运行 CorelDRAW 宏指令之前,必须安装 VBA 组件。

    安装 CorelDRAW VBA
    VBA
    CoerlDRAW 1112 中是作为典型安装的一部分安装。CoerlDRAW 10 中,VBA 必须自定义安装。
    自定义安装 VBA
    1  
    插入标号为光盘1的安装CD到您的计算机的CD驱动器。如果安装程序不自动启动,双击D:/Setup.exe文件启动,其中     D:是您的计算机的CD驱动器。
    2  
    如果安装启动,然后点一下安装 CorelDRAW 12 图形套件。
    3  
    现在浏览安装目录 Corel Graphics Suite 12 / 实用工具 / ,并确保Visual Basic for Applications 6.3 设置为安装(默认)。
    4  
    禁用您不想安装的组件。
    5  
    单击下一步。任何被禁用的组件,都会被删除。

    CorelDRAW VBA
    工具栏
    CorelDRAW
    工具栏提供快捷的几个 VBA 的功能,和进入 VB 编辑器。

    下载 (5.07 KB)

    2008-9-19 09:26


    工具栏按钮提供下列功能:
    ·  
    运行宏
    ·  
    打开VB编辑器
    ·  VB
    编辑器设计和运行模式之间的开关
    ·  
    录制宏
    ·  
    暂停宏录制
    ·  
    停止录制宏
    这些功能在以后的章节描述。
    显示 VBA 的工具栏,右击工具栏上任何空白位置从弹出式菜单中选择Visual Basic for Applications。另外,选择菜单:窗口工具栏—Visual Basic for Applications

    编写宏
    只能在 VB 编辑器中进行宏编辑。不过,您可以在 CorelDRAW 中进行录制以节省时间。
    在所选择的项目创建一个新的VBA记录宏,然后可以在 VB 编辑器进行修改和自定义。

    VB 编辑器写宏
    宏指令在 VB 编辑可以充分利用程序控制代码,包括有条件的运行、循环、分支指令。包括这额外的指令并不只是单纯的宏,而是程序。在本指南中所有 VBA 代码统称为宏,虽然在某些情况宏只是在 CorelDRAW 下运行的代码。
    使用 VB 编辑器开发宏在第 4 “Visual Basic 编辑器有详细被描述。
    录制宏指令是非常有用的,特别当您不熟悉 CorelDRAW 对象模型,或者你不知道其中对象和方法的使用。对于许多简单而重复的任务,录制宏是一个快速、有效的解决办法。
    录制的宏是真正意义上的宏:严格上讲,宏指令是一个可以反复引用在应用程序之内的操作记录。当你创建一个录制宏时虽然被限制为 CorelDRAW 的操作,并且不记录键盘和鼠标动作,但是您在 CorelDRAW 中操作的一个真实副本。

    录制宏
    录制一个新宏
    1     
    单击菜单:工具 — Visual Basic — 记录,或在 VBA 工具栏直接按记录按钮。
    2     
    宏名框输入一个名称。宏名必须遵循 VBA 的命名规则,它们是:
           ·   
    必须以字母开头。
           ·   
    可以包含数字,但不能作为第一个字符。
           ·   
    不能包含空格或任何非字母数字字符,除了下划线( _ )。
           ·   
    必须在宏存储位置选择一个项目。

    下载 (16.44 KB)

    2008-9-19 09:26


    3     
    从宏存储位置选择一个 VBA 项目(GMS)文件或 CorelDRAWCDR)文件。您可以在描述框中输入一段可选的注释。选择一个 GMS CDR 文件的好处,将在后一节讨论。
    4     
    单击确定。
           ·   CorelDRAW
    开始记录你的每一个操作创建一个对象,移动一个对象,设置对象参数。
           ·   
    单击菜单:工具 — Visual Basic — 停止,将停止记录,并保存宏。
           ·   
    要暂停录制宏,单击菜单:工具 — Visual Basic — 暂停。
    注意:不是在 CorelDRAW 的所有操作都会录制。由于他们的复杂性,一部分不可能被录制,但是他们可以通过用 VB编辑进行手动编码。当某操作不能被录制时,会有以下提示:不支持这个命令录制

    备注:可以从 VBA 工具栏上控制宏的录制、暂停、停止。

    此程序用于自动闭合曲线,相邻两点自动连接,应用此程序时,需要注意以下两点:
    将所要自动闭合的曲线组合Ctrl+L),不是群组(Ctrl+G)
    组合的曲线中没有杂点、单线,如从CADAI中导过来的图形,需仔细检查。
    如上面两点没处理好,将导致程序处理缓慢,甚至假死。
    如有高人能将此程序加上几句以处理以上问题,再好不过了。

    Sub CloseShape()
    '自动闭合曲线

     Dim s As Shape

     Dim e As Double, r As Double, nr As Double

     Dim sp As SubPath

     Dim sn As Node, en As Node, n1 As Node, n2 As Node

     Dim b As Boolean 

     Set s = ActiveShape

     If s.Type <> cdrCurveShape Then

      MsgBox "Curve must be selected"

      Exit Sub

     End If

     ' E is auto-join limit beyond which the nodes are joined rather than connected

     ' Here assumed to be 1% of an average object size

     e = s.SizeHeight * s.SizeWidth / 10000

     Do

      Set sn = Nothing

      Set en = Nothing

      Set n1 = Nothing

      Set n2 = Nothing

      b = False

      For Each sp In s.Curve.SubPaths

       If Not sp.Closed Then

        Set n1 = sp.StartNode

        Set n2 = sp.EndNode

        nr = n1.GetDistanceFrom(n2)

        If nr < e And sp.Nodes.Count > 2 Then

         n1.JoinWith n2

         b = True

        Else

         If sn Is Nothing Then

          Set sn = n1

          Set en = n2

          r = nr

         Else

          nr = sn.GetDistanceFrom(n1)

          If nr < r Then

           Set en = n1

           r = nr

          End If

          nr = sn.GetDistanceFrom(n2)

          If nr < r Then

           Set en = n2

           r = nr

          End If

         End If

        End If

       End If

       If b Then Exit For

      Next sp

      If Not b And Not sn Is Nothing Then

       If r < e Then sn.JoinWith en Else sn.ConnectWith en

       b = True

      End If

     Loop While b

    End Sub

     

     

     

     

     

    'VBA生成一个CorelDraw工具栏

    Private Sub CommandButton2_Click()
         On Error Resume Next
         CommandBars("
    我的工具").Delete
         CommandBars.Add("
    我的工具").Visible = True
         FrameWork.CommandBars("
    我的工具").Controls.AddCustomButton "2cc24a3e-fe24-4708-9a74-9c75406eebcd", "converto.conver.ConverTo"
    End Sub

     

    展开全文
  • 在Python中运行Excel的VBA

    千次阅读 2020-08-12 17:17:25
    在EXCEL的VBA中提供了一个ExecuteExcel4Macro函数,可以用于运行Excel工作表中的指定。关于ExecuteExcel4Macro函数的用法具体详见MSDN上的描述。 在Python中,对Excel表格的操作需要借助于win32com.client模块...

    转载自https://www.cnblogs.com/russellluo/archive/2011/10/16/2214347.html
    并加以细化

    在EXCEL的VBA中提供了一个ExecuteExcel4Macro函数,可以用于运行Excel工作表中的指定宏。关于ExecuteExcel4Macro函数的用法具体详见MSDN上的描述。

    在Python中,对Excel表格的操作需要借助于win32com.client模块(位于PyWin32模块,不能用pip直接安装,需要下载);win32com.client模块使得在Python中同样可以调用ExecuteExcel4Macro函数来达到运行Excel宏的目的。

    以下为“在Python中运行Excel的VBA宏”所需的全部源码:

    import win32com.client
     
    filename = r'E:\excel.xls'
    xlApp = win32com.client.Dispatch('Excel.Application')
    xlApp.visible = 1 # 此行设置打开的Excel表格为可见状态;忽略则Excel表格默认不可见
    xlBook = xlApp.Workbooks.Open(filename)
     
    content = r'excellent!' # 需要写入Excel单元格的内容(字符串类型)
    rows = 60000 # 需要写入的行数(整数类型)
    

    ExecuteExcel4Macro函数的参数必须为字符串类型
    在该字符串参数中,依次包含了“宏函数所在的Excel表格名称”+“宏函数的名称”+“宏函数的参数”
    #在宏函数的参数中,字符串参数content需要在两边分别再加上一个",整型参数rows只需通过str转换为字符串即可

    strPara = xlBook.Name + '!Macro1("' + content + '", ' + str(rows) + ')'
    status = xlApp.ExecuteExcel4Macro(strPara)
    print status
     
    xlBook.Close(SaveChanges=True) # 关闭Excel,并保存更改
    
      上述代码可以成功地实现在Python中运行Excel表格“E:\excel.xls”中的“Macro1”宏的功能。
    
      然而,目前为止,通过ExecuteExcel4Macro运行Macro1宏后,返回得到的status值总是为False;如何获取Macro1宏的运行结果,还在研究之中。
    

    标签: Python, EXCEL与VBA

    展开全文
  • 配置Office Excel运行Python脚本!

    千次阅读 2019-08-31 14:22:35
    基本环境 名称版本 操作系统Windows 10 x64Office2016 Python资源共享群:626017123 ...Python2.x或Python3.x均可,推荐Python3.x(因为2020年1月1日起Python2就停止服务...至此,可以使用Python进行Excel的开发

    基本环境

    名称版本操作系统Windows 10 x64Office2016

    Python资源共享群:626017123

    安装Python

    1.下载Python安装包

    登录 https://www.python.org/downloads/windows/ 进行下载

    Python2.x或Python3.x均可,推荐Python3.x(因为2020年1月1日起Python2就停止服务了...)

     

     

     

     

     

    2.安装Python

    安装前,勾选 Add Python 3.x to PATH 选项。安装完毕之后,在Windows控制台可直接使用 python 命令。

     

     

     

     

     

    3.检查是否安装成功

    按 Win+R ,打开 运行 ,输入 PowerShell ,打开命令行。

    输入 python -V ,查看Python版本号。

     

     

     

     

     

    4.安装PythonWin32库

    Python2.x 按以下方式安装

    pip install pypiwin32 -i https://mirrors.aliyun.com/pypi/simple/
    

    Python3.x 按以下方式安装

    pip install pywin32 -i https://mirrors.aliyun.com/pypi/simple/
    

    安装ExcelPython

    1.从 https://sourceforge.net/projects/excelpython/files/ 处,下载 ExcelPython

    或点击此处直接下载

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

     

    2.新建一个Excel文件,打开可在标签栏显示 ExcelPython 标签

     

     

     

     

     

    3.打开Excel选项——信任中心——信任中心设置——宏设置——安全性,选中“信任对于VBA工程对象模型的访问”,按确定即可。

     

     

     

     

     

    测试安装是否正确

    1.将创建的 data.xlsx 文件另存为 data.xlsm 宏文件。

    2.回到Excel,点击 ExcelPython 标签的 Setup ExcelPython 按钮

     

     

     

     

     

    3.桌面上会出现一个名为 xlpython 的文件夹,以及一个与 *.xlsm 文件同名的 *.py 文件。

     

     

     

     

     

    4.打开 data.py 编辑,写入以下内容

    from xlpython import *
    import random
    @xlfunc
    def getRandomBirth():
        y = random.randint(1980, 2000)
        m = random.randint(1, 12)
        d = random.randint(1, 28)
        return str(y)+'/'+str(m)+'/'+str(d)
    @xlfunc
    def getAge(d):
        _today = [ 2019, 8, 30 ]
        _list = str(d).split('/')
        age = _today[0] - int(_list[0])
        if _today[1] < int(_list[1]):
            age -= 1
        elif _today[1] == int(_list[1]):
            if _today[2] < int(_list[2]):
                age -= 1
            else:
                pass
        else:
            pass
        return age
    

     

     

     

     

     

     

    5.回到Excel中,点击 ExcelPython 标签的 Import Python UDFs 按钮

     

     

     

     

     

    6.使用Python中定义的函数

    在输入框中输入 =getRandomBirth()

     

     

     

     

     

    效果如图

     

     

     

     

     

    7.在Excel中使用定义的第二个函数

     

     

     

     

     

    效果如图

     

     

     

     

     

    至此,可以使用Python进行Excel宏的开发

    展开全文
  • Word提示弹窗的关闭方法-亲测有效

    千次阅读 2020-07-13 18:30:16
    本文是网上所有解决方法的总结帖。 -如有错别字或无法解决问题,欢迎留言指正。 问题:office-word软件 选择了自定义...使用office-word软件打开word文件,总是弹窗提示:您正试图运行的函数包含有或需要语...

    本文是网上所有解决方法的总结帖。


                                                                                                                                     -如有错别字或无法解决问题,欢迎留言指正。

     

    问题:office-word软件 选择了自定义安装,安装成功后;

    使用office-word软件打开word文件,总是弹窗提示:您正试图运行的函数包含有宏或需要宏语言支持的内容。而在安装此软件时,您(或您的管理员)选择了不安装宏或控件的支持功能。

    请尝试以下方法:

    方法一、打开Word软件,修改”宏设置“

    点击左上角①【开发工具】-【宏安全性】-【宏设置】-选择“禁用无数字签署的所有宏(G)”;

    ②【开发人员宏设置】-勾选"信任对VBA工程对象模型的访问(V)";

    ③重新启动Word软件。

    如果是空白文档也出现这个问题,说明是默认模板出了问题,直接重装office。

     

    方法二、Word选项-取消选中所有加载项

    ①点击左上角【logo按钮】-【Word选项(I)】-【加载项】-管理:【COM加载项】-【转到(G)...】;

    ②在【COM加载项】弹窗中,点击可用加载项-前面的方框;

    ③全部点击后,方框显示空白,点击"确定"按钮。

     

     

    方法二可能遇到:”无法更改注册表中注册的Offfice 加载项的连接状态",此时请尝试其他方法。

    方法三、

    点击【开始菜单】—选择【控制面板】—找到并打开【程序和功能】—在里面找到安装好的【Office软件】右键选择【更改】—在弹出的更改对话框中选择【添加或删除功能】然后点击继续。

    在安装选项界面点击【Office共享功能】前面的+号,把【VBA工程数字证书】和【Visual Basic for Applications】两项选择"从本机运行",完成之后点击【继续】即可。

     

    方法四、重装Office软件,选择"全部安装"或选中"部分功能",这【VBA工程数字证书】和【Visual Basic for Applications】两项不能少。

     

    展开全文
  • FANUC机器人支持记录150个指令,可以将现有的程序记录为宏指令,也可以单独创建程序,然后再将其记录为宏指令。 使用指令时可以按如下步骤进行: 1.创建一个程序作为程序,并对程序进行示教编程。 2.将所...
  • 加载(Addin)使用方法

    千次阅读 2013-05-06 10:18:53
    Office VBA Addin加载是一种使用VBA编写的程序,它通过加载设置,可以随Office程序启动而自动加载运行,是制作Excel自定义函数、Office菜单和功能区按钮、添加常用辅助功能的常用载体。 在Excel、PPT中都可以编制...
  • 揭开的神秘面纱:什么是什么使用?  您是否曾经在 Microsoft Office 程序中的重复任务上花费了太多的时间?有没有想过可能有更好的办法?也许您需要在一个 Word 长文档中重新设置许多表格的格式,在...
  • Android运行时ART执行类方法的过程分析

    万次阅读 多人点赞 2014-11-10 01:00:24
    一旦找到了目标类方法,我们就可以获得它的DEX字节码或者本地机器指令,这样就可以对它进行执行了。在ART运行时中,类方法的执行方式有两种。一种是像Dalvik虚拟机一样,将其DEX字节码交给解释器执行;另一种则是...
  • 在notepad++中直接运行python代码

    千次阅读 2018-05-16 15:23:53
    按钮2)在弹出的窗口内输入以下命令:cmd /k python "$(FULL_CURRENT_PATH)" &amp; ECHO. &amp; PAUSE &amp; EXIT红色标注部分python程序源文件的路径。然后点击“保存”,随意取一个名字,...
  • C++ 定义

    万次阅读 多人点赞 2016-10-19 16:28:04
    ———————— #define基本用法 ————————#define命令是C语言中的一个定义命令,它用来将一个标识符(宏名)定义一个字符串,该标识符被称为宏名,被定义的字符串称为替换文本。程序编译之前,编译的...
  • 下面论证一下:c/c++中 运行速度对比,>内联函数>普通函数 首先简单的代码验证下: #include "stdafx.h" #include #include #define _SUM(x,y) x+y using std::cout; using std::endl; using boost::...
  • 点击下面的“运行”里的运行 在出现下面的窗口,输入如下所示的,保存后可直接运行的d:\code目录下 这样下次按快捷键后就会直接出现以下窗口 这样就可以运行你的更快的运行程序了 ...
  • word编程以及VBA

    万次阅读 多人点赞 2018-12-03 19:55:37
    如完成一个一打开word文件同时要打开某个文件的功能,必须要自己编写一段称之为宏的脚本。 具体做法是在菜单栏点击开发工具-,""弹出的对话框输入宏名,然后按"创建"按钮会打开visual ...
  • 1、概述 为了加速代码编写,我们可以首先通过录制Word的方式来查看完成相应功能所需要的代码,然后转换JavaScript代码。本文以插入表格例,描述将转换Javascript代码的过程及注意问题。[本文大部分内容...
  • 无参数的定义的一般形式 # define 标识符 字符序列 其中# define之后的标识符称为定义名(简称宏名),要求宏名与字符序列之间用空格符分隔。这种定义要求编译预处理程序将源程序中随后所有的定名的出现...
  • 定义详解

    万次阅读 多人点赞 2017-08-29 15:32:09
    定义在C系开发中可以说占有举足轻重的作用。底层框架自不必说,为了编译优化和方便,以及跨平台能力,被大量使用,可以说底层开发离开define将寸步难行。而在更高层级进行开发时,我们会将更多的重心放在业务...
  • 定义#define整理

    千次阅读 2014-04-01 12:58:50
    一、定义#define    优点:一方面可以节省程序的空间上的篇幅,另外,恰当地使用定义可提高程序的时间效率。...过多的定义,代码不容易调试,代码进不去定义当前所运行的内容。   一般来说,如果一个函
  • 定义 参数

    万次阅读 2013-01-29 17:31:13
     看看以下两个定义: #define PSQR(x) printf("The square of x is %d.\n",(x)*(x)) #define PSQR(x) printf("The square of "#x" is %d.\n",(x)*(x))  我们的目标是希望使用的时候将体中的x替
  • Zabbix,及自动发现的演示

    千次阅读 2019-08-27 22:23:37
    文章目录zabbix的概述的替换次序的使用示例的分类自定义演示用户自定义在监控模板中的使用模板变量的优先级大于全域主机层面的变量验证自动发现的演示配置低级别自动发现的步骤实战演示低级别...
  • 定义是比较常用的预处理指令,即使用“标识符”来表示“替换列表”中的内容。...替换列表可以是数值常量、字符常量、字符串常量等,故可以定义理解使用标识符表示一常量,或称符号常量。...
  • 的使用

    千次阅读 2013-11-19 16:05:17
    一些其他软件也会把某些执行动作的序列录制脚本,称之为宏(例如常用的文本编辑器UltraEdit );在汇编语言(如 MASM 或者 TASM )中,的使用形式上更接近于子函数。这些都不是我们今日讨论的。我们要...
  • 在我的上一篇博客 深入理解Java中什么内部类可以访问外部类的成员 中, 通过使用javap工具反编译内部类的字节码, 我们知道了什么内部类中可以访问外部类的成员, 其实是编译器在编译内部类的class文件时,偷偷...
  • Access学习总结

    万次阅读 2017-03-20 18:00:13
    我们把那些能自动执行某种操作的命令统称”。  也是一种操作命令,它和菜单操作命令都是一样的,只是它们对数据库施加作用的时间有所不同,作用时的条件也有所不同。菜单命 令一般用在数据库的设计...
  • InitializeObjectAttributes

    千次阅读 2017-03-07 19:17:19
    InitializeObjectAttributes初始化一个OBJECT_ATTRIBUTES 结构体, 当一个例程打开对象时由此结构体指定目标对象的属性 参数 InitializedAttributes [out] 指定需初始化的OBJECT_ATTRIBUTES结构体。 ObjectName...
  • 内核和微内核介绍

    千次阅读 2019-08-28 18:47:44
    内核和微内核的基本概念 内核:简单来说,就是把很多...所有的内核服务都在一个地址空间运行,相互之间直接调用函数,简单高效。 优点:效率高 缺点:稳定性差、开发过程中的bug经常会导致整个系统挂掉 ...
  • 定义的黑魔法 - 菜鸟起飞手册

    千次阅读 2014-01-24 09:46:36
    这篇文章很好,强烈推荐 ... ...定义的黑魔法 - 菜鸟起飞手册 ...定义在C系开发中可以说占有...底层框架自不必说,为了编译优化和方便,以及跨平台能力,被大量使用,可以说底层开发离开define将寸步难行。而
  • 在linux环境下编译运行OpenCV程序的两种方法 - woshijpfgg 时间 2014-07-13 23:08:00 博客园精华区 原文  http://www.cnblogs.com/woshijpf/p/3840530.html 主题 OpenCV Linux 原来以为在...
  • 定义与符号常量

    千次阅读 2018-10-16 15:09:15
    在C中,“”分为无参数的和有参数的两种 无参定义 (1)无参定义的一般格式:#define 标识符 语言符号 字符串 其中:"define"为宏定义命令;"标识符"所定义的宏名,通常用大写字母...
  • C语言带参定义

    万次阅读 多人点赞 2016-10-19 13:37:52
    C语言允许带有参数。...带参定义的一般形式: #define 宏名(形参列表) 字符串 在字符串中含有各个形参。带参调用的一般形式: 宏名(实参列表); 例如: #define M(y) y*y+3*y //定义 // Code k
  • WPS 2019解决不能启用问题

    万次阅读 2019-07-15 13:27:26
    从来没有听过这个东西,于是上网查了查,VBA究竟是做什么的,原来在使用Excel时候会用到编辑,Microsoft Office里面自带编辑插件,开启就好了,而WPS里面的是不能直接启用的,需要下载安装VBA插件才可以,那么...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 87,070
精华内容 34,828
关键字:

以下可以直接运行宏的方法为