当前位置: 代码迷 >> VBA
 解决方案列表
  • [VBA] excel 下拉列表内容丢失,该怎么处理

    excel下拉列表内容丢失别人给了一个excel文档,里面本身设定了下拉列表,包含7个选项。但是使用过程中出现点下拉列表没有选项,或者是选项缺少只显示一个或者两个选项的情况,请问谁知道怎么回事,应该怎么解决。------解决方案------------------------------------...

    8844
    热度
  • [VBA] 怎么判断outlook邮件没有发送出去

    如何判断outlook邮件没有发送出去使用officeoutlook(不是windows自带的outlookExpress)。调用发送邮件的方法后。显示出邮件编辑界面。如何判断用户是将邮件发送出去,还是关掉了邮件编辑界面(没有发送)?代码如下:officeItem.To=clsUser'邮件接收人o...

    5834
    热度
  • [VBA] xp下如何使用批处理自动telnet到服务器上,并执行命令

    xp下怎么使用批处理自动telnet到服务器上,并执行命令?rt------解决方案--------------------------------------------------------::@echooffexitsethostip=xx.xx.xx.xxsetosusr=ciscoset...

    5956
    热度
  • [VBA] 用VBA在EXCEL中查找并更改字体颜色(修改代码),该如何解决

    用VBA在EXCEL中查找并更改字体颜色(修改代码)我是在学习VBA在EXCEL财务中的应用。我现在可以把数字金额转换为大写的汉字了,希望在出现“负”这个字的时候,将当前单元格改成红色。但是运行的时候就会卡在那里出现未响应,我写的代码如下,请XDJM帮我调试,谢谢。举例:将黑色的“负伍元整”全部改为...

    4611
    热度
  • [VBA] 关于VBA编程中常见的单位不统一的有关问题

    关于VBA编程中常见的单位不统一的问题小弟刚刚开始研究VBA开发技术,遇到的第一个难题就是单位不统一的问题。希望能有高手帮忙解决一下。例如:在设置字体大小时,可以有以磅为单位的,还可以有“五号字”、“四号字”等,VBA中默认使用的是磅。在设置段落间距是,单位可以是磅也可以是厘米。默认使用的好像也是磅...

    5342
    热度
  • [VBA] Excel中sheet名随文件名变化,该如何处理

    Excel中sheet名随文件名变化一个Excel文件、我输入文件名(Test.xls)后、打开该文件时,里面有一个Sheet我想让这个Sheet的名字自动变成我的文件名(Test)。该如何做?------解决方案-------------------------------------------...

    1933
    热度
  • [VBA] office visio编程,该如何解决

    officevisio编程目前有对officevisio编程的需要,主要是实现自动导入excel中的数据到visio中,从而实现自动画图。有哪位牛人会的指教下。不管什么语言都可以汇编除外(不是很懂)。就是编程实现自动导入excel中的数据。急。。。。。fbi56fbi@163.com------解决...

    4991
    热度
  • [VBA] vba怎么自动复制excel表的一行到下一行

    vba如何自动复制excel表的一行到下一行我现在有一个excel表,我现在想通过代码实现在每次填写数据之前复制本行到下一行,例如:第一次执行复制第一行到第二行,然后填充数据,第二次执行时复制第二行到第三行,一次类推……------解决方案------------------------------...

    1225
    热度
  • [VBA] 请教 Office 开发的帮助文档在MSDN中的哪个位置

    请问Office开发的帮助文档在MSDN中的哪个位置?程序要新增一个功能:把数据写入EXCEL文档,要求使用OfficeAutomation而不用ODBC。我在网上找了一些此方面的示例代码://TODO:Addyourcontrolnotificationhandlercodehere _Appli...

    1756
    热度
  • [VBA] VBA将Sheet1的数据过滤后成为Sheet2 的数据格式,该怎么处理

    VBA将Sheet1的数据过滤后成为Sheet2的数据格式请问要如何将Sheet1的数据过滤后成为Sheet2的数据格式(Sheet1)23 A24 A55 B67 C89 A111 D112 D(Sheet2)A 23,24,89B 55C 67D 111,112另外请问VBA可以使用SQL语法来...

    5538
    热度
  • [VBA] 查找相同数据的有关问题

    查找相同数据的问题我在ExcelA列输入一列数据,该列数据中有若干数据是相同的.我编个程序,将A列数据中相同的数据查找出来.我想对查找出来的相同数据编个序号,如A列中有三个"南海"和两个"武汉"的记录.我想在B列添加辅助序号,以便对相同数据进行分类编号,如在B...

    6695
    热度
  • [VBA] 急有关于WORD二次开发的有关问题,多谢

    急有关于WORD二次开发的问题,谢谢我用VB控制WORD进行开发,让其自动批量生成WORD文档,我自己创建了一个WORD模板只有一页,可是有时候要输入的文字比较多,要创建一页,怎么来去实现的?谢谢------解决方案------------------------------------------...

    9952
    热度
  • [VBA] 一个VBA的有关问题

    一个VBA的问题我写了一个宏是将前几格所有的数串起来放在一个格子的程序,可是由于帐号太长结果串起来后显示的是科学记数法,希望各位大大帮忙解决代码如下:rivateSub属性汇总_Click()j=1WhileLen(Trim(Sheet2.Cells(1,j)))>0j=j+1Wendi=1W...

    5289
    热度
  • [VBA] 100分~动态控件事件没有反应!也动态增加了事件Click()!

    100分紧急求助~~动态控件事件没有反应!也动态增加了事件Click()!!紧急求助~~我在VBA添加了UserForm1,里面动态产生按钮控件,也动态增加了事件Click()执行上都能正常产生控件,程序代码也有产生,可是鼠标点击画面按键时事件没有反应!!!求高手能给小弟帮帮忙~~~感谢!!!Dim...

    8949
    热度
  • [VBA] Access 数据库 保存记录有关问题

    Access数据库保存记录问题我在用Access+VBA编写一个修改数据的FORM当数据被修改后,按下[保存]键后,数据会被写入数据库但是当数据被修改后,没有按下[保存]键,按[退出]或其他键时,会弹出一个[数据未被保存]的警告框。有没有那位高手知道,在按下[退出]或其他键时,怎样才能判断数据是否被...

    3372
    热度
  • [VBA] excel vba 如何样将自动生成图表并将其添加到已有的EXCEL中

    excelvba怎么样将自动生成图表并将其添加到已有的EXCEL中PrivateSubWorkbook_Open()Application.ScreenUpdating=FalseApplication.Calculation=xlCalculationManualDimtempAsLongDimr...

    4066
    热度
  • [VBA] 怎么将用户窗体及近代件各代码打包复制

    如何将用户窗体及近代件各代码打包复制我在word文档一中创建一个用户窗体,用户窗体中有控件及代码.我想将这个用户窗体及控件和代码打包复制到word文档二中,让word文档二也可以使用这个用户窗体,不知该如何操作?------解决方案----------------------------------...

    6539
    热度
  • [VBA] vba访问局域网内服务器解决办法

    vba访问局域网内服务器我用EXCEL做客户端,ACCESS数据库放在局域网内服务器上,如何访问到ACCESS数据库。请各位大侠帮帮。------解决方案--------------------------------------------------------数据库放入共享中。因ACCESS不...

    7784
    热度
  • [VBA] vb 实现word双面打印解决方案

    vb实现word双面打印打印不支持双面,想用WORD的手动双面打印功能.用WORD自身的打印功能,是没有问题的.现在,我在VB里写了程序调用.但是没有像WORD里的那样在打完奇数页后没有出那个提示放入纸的提示.怎么回事.代码如下.worapp.Options.PrintEvenPagesInAsce...

    8309
    热度
  • [VBA] 怎样在word中选取一整页?解决方法

    怎样在word中选取一整页?想选取a.doc其中第二页,然后存为b.doc应该怎么做呢?------解决方案--------------------------------------------------------PrivateSubtest()DimrngAsRangeDimintStart...

    1369
    热度