精华内容
下载资源
问答
  • 在我们的日常生活中,我们经常遇到这样的问题,特别是当单位需要...我曾经几次从其他人的计算机上载文件,但是防病毒软件找到它们,但结果看起来像上面的文件. 这是无法判断的,尤其是因为某些文件需要使用“”...

    bae7ef2b3346fb86256d3655409d4e59.png

    在我们的日常生活中,我们经常遇到这样的问题,特别是当单位需要使用某些材料从上级或同事的计算机复制excel文件时,但是当将其放置在自己的计算机中时,一个问题. 打开excel文件,该文件将被无休止地复制,从而使您的计算机无法使用,并且在重新启动表单之前不会停止!

    我曾经几次从其他人的计算机上载文件,但是防病毒软件找不到它们,但结果看起来像上面的文件. 这是无法判断的,尤其是因为某些文件需要使用“宏”,这更难以解决. 然后在这种情况下excel禁用宏 关闭,我使用下面的手动方法来解决它,简单实用,并且效果明显!

    手动删除Excel宏病毒的具体方法:

    90bd9826734c82a6c8668c2ea4c24ed6.jpg

    1. 转到C: \ Program Files \ Microsoft Office \ OFFICE11 \ xlstart \并首先删除book1文件(注意: 此C指的是您的系统磁盘,例如,我的系统是双系统,那么打开C磁盘即删除它是没有用的excel禁用宏 关闭,取决于您所使用的系统. )然后创建Book1文件;

    2. 打开EXCEL文档(提示启用了宏的文档),格式->工作表->取消隐藏工作表,删除xl4poppy工作表(可能是其他工作表名称: 例如0000ppy工作表),然后单击菜单: 插入- ->名称->定义,删除所有名称. 保存;

    3. 处理后,删除刚刚创建的文件夹.

    2576b52e7020bd0c399da1ca054a7c23.png

    这样,您可以清除Excel宏病毒,然后打开excel文件,这是安全的. 这种方法保证快速有效! (可以通过此方法清除我的表单文件)

    以下是解决问题和解决方案的过程

    2012年5月,我收到了一个电子表格. 打开时,系统提示我设置安全性以打开表单. 将宏的安全性设置为“中”,并打开表单以提示“禁用宏”,“启用宏”或“取消”三个选项,当时我以为您必须选择“启用宏”才能打开表单,按启用宏以打开表单一切正常(实际上,禁用宏可以打开表单,这应该是一种更安全的方法),但是随后我在计算机上打开了另一个表单,当我保存它时,我也收到了宏病毒. 只要我打开另一个表格并保存它,它就会是宏病毒. 将其发送给另一个同事进行尝试. 他打开它,并有提示. 最后,他直接删除了表格. (我的计算机上的问题可以通过上述方法解决)

    abd2032590d0431e2b6ed9f233992841.jpg

    因为需要将数据发送给教材的同事,当他将数据发送给同事时,系统提示他可能提示他的问题,但是当同事打开它时,没有提示,但是同时,打开了120多个空表格. 他很快请我检查一下~~我也被同事想念

    24299346_1.gif

    直接单击“关闭”时,无法将其关闭,它将自动打开更多表单. 您只能使用任务管理器结束任务并关闭所有表单. 第二次打开时,不会自动打开很多表单,但是当您打开计算机表单文档时,它将打开一个新的BOOK1文档.

    1. 通过上面的方法可以解决此问题,并发现该问题: C: \ Program Files \ Microsoft Office \ OFFICE11 \(找不到xlstart \和book1文件,稍后我创建了自己的文件)

    2. 使用macro-format-worksheet-unhide-delete删除先前隐藏的0000ppy表,打开文档,单击菜单: 插入->名称->定义,删除所有名称. 保存并再次打开---无法解决,仍然打开一个新的BOOK1文档.

    3. 后来,我搜索了xlstart文件夹,发现我的同事的办公室表格软件已安装在D驱动器上: D: \ Program Files \ Microsoft Office \ OFFICE11 \ xlstart(似乎没有BOOK1文件,我不记得了,否,我将创建一个新的BOOK1文件),我还在Internet上找到了一种与此情况类似的方法,我添加了一个额外的步骤,即用户文件夹下的C: \ Documents and Settings \ Temporary数据发现没有此类文件,有删除,我发现没有.

    4. 重复步骤2解决问题! (使用宏病毒打开文档,然后打开其他文档之后,将包含宏病毒. 此方法需要打开每个文档并逐个删除宏病毒. 删除文档后安全打开该文档)

    本文来自电脑杂谈,转载请注明本文网址:

    http://www.pc-fly.com/a/jisuanjixue/article-234792-1.html

    展开全文
  • 打开模板工作簿 启用宏 '打開對話框 Application.Dialogs(xlDialogOpen).Show 选择数据源工作簿 ,sheet1工作表最后 (MsgBox:“ ”)行 复制数值格式,关闭工作簿 MsgBox(光标指定单元格)粘贴
  • 数据透视表可以两列汇总列吗 列出所有数据透视表样式 (List All Pivot Table Styles Macro) When you create a pivot table, a default PivotTable Style is automatically applied. You can change to a ...

    数据透视表可以两列汇总列吗

    When you create a pivot table, a default PivotTable Style is automatically applied. You can change to a different style, and you can even create custom pivot table styles. To help you keep track of the styles that you have, here's a List All Pivot Table Styles macro.

    创建数据透视表时,将自动应用默认的数据透视表样式。 您可以更改为其他样式,甚至可以创建自定义数据透视表样式。 为了帮助您跟踪所拥有的样式,这里是“列出所有数据透视表样式”宏。

    数据透视表自定义样式 (Pivot Table Custom Styles)

    If you're not sure how to create your own custom pivot table style, this short video shows the steps. Also, there are step-by-step written instructions on my Contextures site, on the Pivot Table Formatting page.

    如果您不确定如何创建自己的自定义数据透视表样式,则此简短视频将显示步骤。 另外,我的Contextures网站上的“数据透视表格式”页面上还有逐步的书面说明。

    演示地址

    默认和自定义数据透视表样式 (Default and Custom Pivot Table Styles)

    There are  about 85 built-in pivot table styles in my version of Excel – there might be more than that in your version, or fewer styles.

    在我的Excel版本中,大约有85种内置的数据透视表样式-可能比您的版本中的样式表更多,或者更少。

    If you create custom pivot table styles, they'll be added to that list too. The custom styles also appear at the top of the style gallery.

    如果您创建自定义数据透视表样式,它们也会添加到该列表中。 自定义样式也显示在样式库的顶部。

    列出所有数据透视表样式 (List All the Pivot Table Styles)

    To get a list of all the pivot table styles in the active workbook, use the macro that's shown below. The macro adds a sheet to the workbook, with a list of the pivot table style settings.

    若要获取活动工作簿中所有数据透视表样式的列表,请使用下面显示的宏。 该宏将工作表添加到工作簿,并带有数据透视表样式设置的列表。

    The list shows the style name and number, whether it's built in or custom, the header colour,  and inside border colour.

    列表显示样式名称和编号(无论是内置样式还是自定义样式),标题颜色和内部边框颜色。

    NOTE: Lots of black is used for the style formatting, so the macro shows a black dot, instead of filling the cell with black. I find that easier to read, and it also saves on printer toner, if you want to print the list!

    注意:很多黑色用于样式格式设置,因此宏显示一个黑点,而不是用黑色填充单元格。 如果您要打印列表,我发现它更易于阅读,并且还节省了打印机碳粉!

    列出所有数据透视表样式的宏 (Macro to List All Pivot Table Styles)

    This macro to list all Pivot Table styles is in the sample workbook that you can download. There are four other macros too, to list and set the styles.

    您可以下载示例工作簿中的此列出所有数据透视表样式的宏。 还有四个其他宏,用于列出和设置样式。

    Or, to use this macro in your own workbook, copy the code below to a regular code module. Then, add a worksheet button to run the macro, or run it from the Macros command on the Excel Ribbon's View tab.

    或者,要在自己的工作簿中使用此宏,请将下面的代码复制到常规代码模块中 。 然后,添加一个工作表按钮以运行宏,或从Excel功能区的“视图”选项卡上的“宏”命令运行它。

    Sub StylesPTListALL()
    Dim wb As Workbook
    Dim lStyle As Long
    Dim stl As TableStyle
    Dim ws As Worksheet
    Dim myRow As Long
    Dim lClrH As Long
    Dim lClrB As Long
    Set wb = ActiveWorkbook
    Set ws = Sheets.Add
    On Error Resume Next
    
    With ws
      .Range(Cells(1, 1), Cells(1, 5)).Value _
        = Array("Style", "Name", "BuiltIn", _
          "Header", "Borders")
    End With
    
    myRow = 2
    
    For lStyle = 1 To wb.TableStyles.Count
      Set stl = wb.TableStyles(lStyle)
      If stl.ShowAsAvailablePivotTableStyle = True Then
        ws.Cells(myRow, 1).Value = lStyle
        ws.Cells(myRow, 2).Value = stl.NameLocal
        ws.Cells(myRow, 3).Value = stl.BuiltIn
        
        lClrH = stl.TableStyleElements _
            .Item(xlHeaderRow).Interior.Color
        If lClrH = 0 Then
          ws.Cells(myRow, 4).Value = "•"
        Else
          ws.Cells(myRow, 4).Interior.Color = lClrH
        End If
        
        lClrB = stl.TableStyleElements _
            .Item(xlWholeTable) _
              .Borders(xlInsideHorizontal).Color
        If lClrB = 0 Then
          ws.Cells(myRow, 5).Value = "•"
        Else
          ws.Cells(myRow, 5).Interior.Color = lClrB
        End If
        
        myRow = myRow + 1
      End If
    Next lStyle
    
    With ws
      .Range("A1:E1").Font.Bold = True
      .Range("G1").Value = "• = Black"
      .Columns("A:G").EntireColumn.AutoFit
      .Columns("C:E").HorizontalAlignment = xlCenter
      .Columns(6).ColumnWidth = 3.57
      .Range("A1").Select
    End With
    
    End Sub
    

    获取样本工作簿 (Get the Sample Workbook)

    To get the sample workbook with pivot tables, custom styles, and more macros, go to the Pivot Table Styles Macros page on my Contextures website.

    若要获取带有数据透视表,自定义样式和更多宏的示例工作簿,请转到Contextures网站上的“ 数据透视表样式宏”页面

    The zipped file is in xlsm format, and contains macros. Be sure to enable macros when you open the workbook, if you want to test the macros.

    压缩文件为xlsm格式,并包含宏。 如果要测试宏,请确保在打开工作簿时启用宏。

    数据透视表工具 (Pivot Table Tools)

    To save time when building, formatting and modifying your pivot tables, use the tools in my Pivot Power Premium add-in. With just a few clicks, you can:

    为了节省构建,格式化和修改数据透视表时的时间,请使用我的Pivot Power Premium加载项中工具 。 只需单击几下,您就可以:

    • copy the formatting from one pivot table, and apply it to another pivot table.

      从一个数据透视表复制格式,然后将其应用于另一数据透视表。
    • change all the values from Count to Sum

      将所有值从Count更改为Sum
    • remove the "Sum of" from all the headings

      从所有标题中删除“总和”

    and much more!

    以及更多!

    更多数据透视表资源 (More Pivot Table Resources)

    Pivot Table Formatting

    数据透视表格式

    Classic Pivot Table Format

    经典数据透视表格式

    Copy Pivot Table Formatting

    复制数据透视表格式

    翻译自: https://contexturesblog.com/archives/2018/05/17/list-all-pivot-table-styles-macro/

    数据透视表可以两列汇总列吗

    展开全文
  • 电脑已经安装了office2016,某天右装了wps,然后又删了,之后电脑出现 office 2016找不到或者禁止 ,打开时出现 VBE6EXT.OLB不能被加载。 尝试 网上查了下说组件损坏,需要修复,我直接给卸载重装了,然并卵。...

    电脑已经安装了office2016,某天右装了wps,然后又删了,之后电脑出现 office 2016找不到宏或者禁止宏 ,打开时出现 VBE6EXT.OLB不能被加载。

    尝试
    网上查了下说组件损坏,需要修复,我直接给卸载重装了,然并卵。。。
    后面百度上还说把C:\Program Files (x86)\Common Files\microsoft shared\VBA\VBA6下的 
    VBE6EXT.OLB复制到VBA7下,尝试了下然并卵。。。
    解决
    后面看到一篇博文,说是WPS修改了注册表的问题,才搞定,最终解决方法如下 
    1. 打开注册表:win+R打开运行界面,输入regedit.exe, 点击确定。 
    2. 修改 HKEY_CLASSES_ROOT\TypeLib{0002E157-0000-0000-C000-000000000046}\5.3\0\win32 的数据值为自己的 VBE6EXT.OLB的路径,我这里的路径为 
    C:\Program Files (x86)\Common Files\microsoft shared\VBA\VBA6\VBE6EXT.OLB 
    3. 重启PPT
     

    展开全文
  • VBA复制Excel数据速度过慢解决方法 在使用VBA语句实现对Excel文件自动化处理过程中,当所操作的数据量很大时,会发现程序执行起来很慢,而且Excel文件中行数越多,速度越慢,这时除了改进程序,编写得更加高效方法外...

    VBA复制Excel数据速度过慢解决方法


    在使用VBA语句实现对Excel文件自动化处理过程中,当所操作的数据量很大时,会发现程序执行起来很慢,而且Excel文件中行数越多,速度越慢,这时除了改进程序,编写得更加高效方法外,还可以通过设置 Application.ScreenUpdating 属性来提高运行速度。
    Application.ScreenUpdating属性是用来设置屏幕更新是否启用,此属性的值为 True, 读/写 Boolean。
    禁用屏幕更新可以加快宏代码的速度。 虽然无法实时了解宏的最新动态,但它的运行速度会变快。
    当宏结束运行后,请记住将 ScreenUpdating 属性设置回 True。

    展开全文
  • Excel VB 限制单元格下拉拖拽复制 级联清空单元格数据
  • 现在在项目里已经大量使用redis了,...首先最重要的一点是不要开启Redis的VM选项,即虚拟内存功能,这个本来是作为Redis存储超出物理内存数据的一种数据在内存与磁盘换入换出的一个持久化策略,但是其内存管理成本非
  • 病毒刨析

    2019-12-09 16:05:53
    拿到宏病毒之后,先使用oledump.py工具进行宏数据流得查看: 通过查看数据流可以发现,在第八段和第九段有宏代码,同时需要注意在第十二的数据虽然没有宏代码 ,但是第12段数据大小却是很可疑需要注意一下,同时也...
  • 虽说现在VBA真的是毫无排面,但只要会启用」,收藏几个复制粘贴就用的代码,作为一名办公室民工,总有用得上的时候。所以这里记录几个之前工作中高频使用的小小小脚本。下面提到的工作簿,即单个的 .xlsx 或 ....
  • 下载.xlsm文件,或将VBA复制并粘贴到您自己的启用宏的excel文件中。 在单元格A:1中复制并粘贴您的DISS导出。 请务必覆盖此处的所有内容,包括说明,这一点很重要 启用宏:转到“文件”选项卡>“选项”。 在左侧...
  • http://hi.baidu.com/polar_light/blog/item/037dc3ef07ff9832adafd5af.html2008-03-20 18:37该宏能破解EXCEL的工作表保护密码 现举例破解EXCEL 的保护密码以及密码现有一 test.xls文件...数据表sheet2隐藏可见现
  • FormatDataLibsvm.xls使用步骤: 1、用office打开...3、将数据复制粘贴到sheet1。 4、粘贴的数据格式为:属性1 属性2......类别。 5、点击"开发工具"-->""-->执行FormatDatatoLibsvm,然后执行即可。
  • 文章目录VBA编程简介准备...而“”可以理解为一组自动化程序,执行一个执行其对应的一系列操作。创建主要有两种方法,一种是录制,也就是将人的一些操作录下来,需要的时候执行就可以自动重复这些操...
  • Access学习总结

    万次阅读 2017-03-20 18:00:13
    我们把那些自动执行某种操作的命令统称为“”。  也是一种操作命令,它和菜单操作命令都是一样的,只是它们对数据库施加作用的时间有所不同,作用时的条件也有所不同。菜单命 令一般用在数据库的设计...
  • 这是作者的网络安全自学教程系列,主要是关于安全工具...这篇文章将讲解病毒相关知识,它仍然活跃于各个APT攻击样本中,本文包括病毒基础原理、防御措施、自发邮件及APT28样本分析。基础性文章,希望对您有所帮助。
  • 制作自己的数据地图

    千次阅读 2012-01-17 20:40:28
    制作自己的数据地图 在接下来的3节里,我们将介绍3种制作填色型数据地图的方法。这3种做法各有其技术特点和表现效果,可适用于不同分析场景下的需求。 分档填色经典做法 最常见的数据地图形式是分档填色型热力...
  • VS 2010 IDE 学习总结

    千次阅读 2016-12-06 15:22:39
     在敲代码的过程中类和函数都需要进行注释,但总是一遍一遍的复制粘贴觉得很是麻烦,终于找到 了一个不错的解决方法:使用。  所谓,就是一些命令组织在一起,作为一个单独命令完成一个特定任务。在日常的...
  • B表很多数据,很繁乱,名字一定全, A表也是比较多的行,B表乱:比如有8行有李晨的,却只有3行是范仲淹的,现在需要快速拼接:  方法一:不用函数,利用ctrl+Enter  xls表格 ctrl+D 和ctrl+Enter区别 --快速...
  • 前面看到vfs屏蔽了各种送件系统的差异,为了做到这一点,vfs需要一些数据结构的支持,下面我们来看一下一些主要的相关数据结构。 1、 超级块对象 超级块对象由super_block结构组成: 存放已安装文件系统的有关...
  • 最近在使用遇到一个问题需要把csv格式的文件转成xls,随便新建一个excel,然后打开,选择“开发工具”,找到下图“宏”,如果跟下图一样的话就需要先启用宏,启用之后可以直接把下面的代码直接复制到代码区,修改一...
  • 病毒相关研究

    2018-03-13 15:11:12
    病毒 原文地址:https://www.52pojie.cn/thread-706440-1-1.html 基础知识 病毒 (英文Macro),广义上的定义是:就是把一系列的指令组织成一独立的命令,类似C语言中#define定义...
  • 病毒的研究与实例分析01——基础篇

    千次阅读 多人点赞 2019-03-10 19:45:02
    文章目录前言基础知识病毒VB基础sub与functionVB基本函数对象病毒实例分析实例1oledump.py病毒的分析技巧自动执行隐秘执行调用外部例程和命令执行字符串隐写Chr()函数Replace()函数CallByname 函数...
  • VBA一招解决病毒

    2020-12-29 17:56:16
    比如:关闭了Excel后,还有一个空白的页面需要关闭,比如每次换一个Excel页面,都有弹一个窗口说“XX找到”等等,我们的Excel文件中充斥着各种各种威胁表格数据存储但是很烦人的病毒,今天教大家设置以下即可...
  • Qt中的QStringLiteral

    千次阅读 2018-11-29 16:02:47
    如果编译器支持,则 QStringLiteral 在编译时从 str 生成一个 QString 的数据。在这种情况下从 QStringLiteral 创建一个 QString 是自由的,生成的字符串数据存储在编译的目标文件的只读段中。 对于...
  • 在日常工作中,经常会遇到需要实时记录数据录入的时间问题。 有朋友会说了,用快捷键啊,按Ctrl+;(分号)可以返回当前的系统日期,按Ctrl+Shift+;(分号)可以返回当前的系统时间。 但是如果需要同时返回日期和...
  • ->新建 2. 将Macrol 1中代码删除,复制如下代码放进去,运行可以在E盘得到保存坐标点的Excel文件 ' ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ ' ' 草图点导出到Excel中 ' ' ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~...
  • Wireshark数据抓包教程之Wireshark捕获数据
  • 4.VBA(refresh)启用宏刷新; 5.数据透视表选项-数据-打开文件刷新 6.外部数据刷新,分析-刷新-连接属性- 刷新频率/ 打开文件刷新 共享数据透视表缓存:按alt > d > p(先后按下)出现向导,数据源...
  • Access教程 第七章

    千次阅读 2008-03-12 12:29:00
    本章内容 ◆ 宏的概念和功能◆ 宏的建立和应用 宏是一个或多个操作的集合,其中每个操作执行特定的功能。...在创建宏时,就定义了一系列任务,只要启用宏,Access就执行了这些任务。 一、宏的功能
  • EXCEL常用

    2012-12-17 13:05:25
    Option Private Module '标记模块为私有,仅对同一工程中其它模块有用,在对话框中显示 Option Compare Text '字符串区分大小写 Option Base 1 '指定数组的第一个下标为1 (2) On Error Resume Next '忽略...

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 10,430
精华内容 4,172
关键字:

启用宏数据不能复制