对于做管理工作的,收集表格这种工作应该会经常有,设计一个表格模板,发给各个有关单位去填写,收集起来后再合并到一起。
Excel里有个分列的功能,能根据单元格中指定的符号,把单元格拆分为多个单元格,并按列存放。
有个表格,有许多单元格的数据,制作者为了方便,很多数据是写在一行的,类似下面这种:
要创建工作簿的目录,其实就是遍历获取所有的文件,然后过滤一下,再增加超链接就可以:
工作中碰到过这种情况:有些外部收集来的资料,由于表格制作者不知道如何在单元格中输入换行符,他的做法是设置单元格格式自动换行,为了达到排版换行目的,是输入了一些空格用来占位的:
例如,在单元格A1中的内容为“This is<just> a test”,单词“just”位于一对尖括号中。现在想要将“just”提取出来,并将其放置在相邻的单元格B1中,如何使用VBA代码来实现这样的操作?
在前面介绍的一些操作数据库的代码中,可以看到,主要的操作逻辑基本上是打开数据库-操作-关闭数据库,很多时候改变的仅仅是操作,所以,把这些封装到一个类里面,以后调用自己写的类就会更方便。
一个单元格区域内有一组数字,这些数字中存在多个相同的数字,想要将这些数字中的唯一值提取出来并组合成一串数字文本,如下图1所示。
工作中碰到过这种情况:有些外部收集来的资料,由于表格制作者不知道如何在单元格中输入换行符,他的做法是设置单元格格式自动换行,为了达到排版换行目的,是输入了一些空格用来占位的,这种表格在列宽变化了后,很可能就会变的有点乱,替换为真正的换行符或者其他符号就很有必要了:
模块的隐藏看起来好像好高深,其实原理和前面的清除VBAProject工程密码的原理是一样的,只需要改写PROJECT数据流。
经常碰到这种情况:自己家里设置了wifi密码,电脑手机连接后,过段时间很容易忘记,有时候朋友过来问起来就要回忆半天!
要对Excel数据进行筛选,最容易想到的方法自然是Excel本身的数据-筛选功能,但是如果是要在VBA中对数据进行筛选,那么一般的做法是对数据进行循环遍历,把符合条件的数据提取出来,假如数据是这样的:
Q:我在列D的单元格中存放着一些数据,每个单元格中的多个数据使用换行分开,列E是对列D中数据的相应描述,我需要在列E的单元格中查找是否存在列D中的数据,并将找到的数据标上颜色,如下图1所示。
受限在网页上右击查看网页源代码,按Ctrl+F搜索form表单,找到post的网址(或者自身就是post的网址),然后找到账号和密码的name,用来做VBA里Send的Data,这样登录完就可以直接post数据获取网址获取网页数据了,这里举例代码最后是返回文本,可以用left和right配合instr、invinstr、len等反复截取文本,或者直接用正则表达式。 Set http = CreateObject("Msxml2.ServerXMLHTTP") http.Open "post", "登录网址
如果你收到过一些这样的Excel文件,文件里有VBA代码,实现了很好的功能,可是作者却对VBA工程进行了加密,你可能会非常希望查看到里面的VBA代码。
小仙同学不得不承认,懒是本小仙进步的最大动力(虽然有的时候花费大把时间找捷径失败,但真正能找到的时候,那个feel倍爽?)! 今天给大家介绍一个批量转csv的方法。这个方法就是基于Excel软件中的V
在使用Excel工作表时,我们往往会对某些单元格插入批注来解释其中的数据,用户也可能会插入批注来写下他们的建议。如果你的工作表中有很多批注,而你不想逐个点开查看,那么可以将所有批注集中显示在工作表中。
DB信息:就是手动记录历史DB用的按钮,开始是想打开一个新的数据库就自动记录,后来发现更多的都是临时操作一下,不值得记录,所以干脆做成一个按钮来记录。
一共150道题,算上选项,答案,题干,题型,900+条信息。一条一条整理,岂不是要累死啊?那如何又好又快完成数据整理呢?我说的是把Word题库实现题干、选项、答案分离,保存在Excel里。
Workbook.FullName在VBA中是一个非常常用的属性,返回的是工作簿的全路径,首先查看一下帮助文件:
在VBA中,InStr函数是一个非常有用的函数,可用于查找某字符串在另一个字符串中第一次出现的位置。
下面的自定义函数:ExtractString函数,来源于《VBA Developer’s Handbook》,对于分析字符串来说,是一个很有用的函数。
这个示例很简单,主要是给有兴趣学习VBA的朋友提供研究代码的素材,当然如果有应用场景,那正好适用。
MyVBA加载宏主要功能是设置为自动加载,作为打开其他宏文件的一个程序,做好后大概是这么一个东西:
2、ctrl+H,然后按住alt输入“10”或者“0010”,然后替换,测试无效,可能我操作不对
Dir方法是VBA里封装好了的,但是对于判段是否是文件夹并没有很好的方法,一般是利用文件名是否包含“.”来判断,但这个是很不严谨的。
在C语言中,经典的函数printf用来格式化输出内容,在格式字符串中包含了要原样输出的字符和占位符,占位符一般由%和指定转换格式组成,例如:
根据多次项目实战中发现,office宏仍然是最高的成功率,在静默钓鱼中也是最不容易触发人员的警觉。因为大部分员工即使有安全意识,也是不运行陌生的exe程序,但是对于word文档则没有足够的安全意识,认为word文档都是安全的。正是基于此心理状态,office宏在钓鱼中仍然占据重要成分。
A:在《VBA小技巧04:使用VBA获取能够打开指定文件的EXE程序》中,我们介绍了一个自定义函数ExePath,可以获取能够打开指定文件的EXE程序的路径。这样,我们就可以使用EXE程序来打开该文件了。因此,下面的代码先使用ExePath函数获取PDF文件的可执行程序路径,然后使用它来打开指定的PDF文件。
在本文开头的VBA示例中,你看到了如何通过使用工作簿的Activate和Deactivate事件调用宏来创建和删除菜单控件,从而来更改单元格上下文菜单。
下面是2020年11月12日发布的一些简单的ExcelVBA问题的答案,是不是和你想的一样。
字符串处理函数在Excel VBA中使用频率非常的高,很多函数都非常的好理解,只要多使用一般都可以掌握。
文章背景: 在工作中,有时需要将多个工作簿进行合并,比如将多份原始数据附在报告之后。一般的操作方法是打开两个工作簿(目标工作簿和待转移的工作簿),然后选中需要移动的工作表,右键单击以后选择“移动或复制”。接下来在新的对话框里面进行设置。
Sub 测试() If IsFileExists("D:\new_temp\") Then Debug.Print "存在" Else Debug.Print "不存在" End If End Sub '参数名称 含义 说明 'strShtName 指定工作表名称 必选 'strWbName 指定工作簿名称 可选 'Sub Demo() ' Debug.Print udfSheetExists("Sheet1") ' Debug.Print udfSheetExist
引言:本文学习整理自functionx.com,可能是我见过的最完整的VBA字符串相关知识介绍,有兴趣的朋友可以参阅。
如果Excel表格里数据比较多的时候,查看数据很容易看错行,这时候如果给要查看的这行数据标记颜色,那么查看数据就方便多了。
VB6/VB.NET 直接调用即可 EXCEL VBA 先把函数粘贴到模块中,然后在单元格单用即可 Public Function FY_Data(ByVal StrData As String) As String ''***********由VB小源码编写********************************* ''**********更多精彩请继续关注,微信公众号:VB小源码********** ''**********************************************
本文整理自https://fastexcel.wordpress.com/,有兴趣的朋友可以研究一下。
这是用Excel制作的一个条形码生成器,仍然是在forum.ozgrid.com中找到的一个很好的示例。
本文提供的Word VBA程序可以在Word中制作类似网站中的屏幕提示,即将鼠标悬停在特定文本上时显示包含相关信息的小框。你可以使用这类屏幕提示来显示术语的定义、提示该段文本的特殊作用,等等。
大家知道,DATEDIF函数虽然可用,但已不在Excel插入函数可搜索的范围内了。
这两天在折腾给一个项目打安装包,第一次接触软件打包,用的Advanced Installer(以下简称AI),应该说如果安装过程没有特殊动作(常规动作指释放文件、写注册表、建快捷方式等)的话,倒挺傻瓜的,按照向导和界面操作就能打好一个包。但我的安装动作包括:
听说,如果我们用程序调用CDO,再调用QQ邮件系统发送邮件时,如果发送太快太PF,系统可能会把你的QQ邮箱功能锁定,所以加了Sleep(3000)函数
在自定义功能区,先新建选项卡,再新建组,然后在宏下面把上一步创建的宏放到里面:如下图操作
我们知道,有多种方法可以进入“Excel加载宏”对话框。最简单的就是,单击功能区“开发工具”选项卡“加载项”组中的“Excel加载项”,即可打开如下图1所示的的“加载宏”对话框。
本小程序只适用于,解析TXT文件中保存的发票扫码结果数据! 活不多说!直接上源码: ''********************************************************
在《Excel图表学习60:给多个数据系列添加趋势线》中,我们手工给多个散点图系列添加了一条趋势线,如下图1所示。
//Decompiled by Jad v1.5.8e. Copyright 2001 Pavel Kouznetsov.//Jad home page:http://www.geocities.com/kpdus/jad.html//Decompiler options: packimports(3)//Source File Name: packagecn.eulic.codelab.cglib;importjava.lang.reflect.Method;importnet.sf.cglib.core.Signature;importnet.sf.cglib.proxy.*;//Referenced classes of package cn.eulic.codelab.cglib://InfoManagerpublicclassCGLIB.BIND_CALLBACKSextendsInfoManagerimplementsFactory
昨日,也就是25日,在墨天轮的「每日一题」上面答题,做错了,当再次认真审题的时候,发现了,哦吼。原来如此,明明是三个“surge”,……这?想着就再复习下这个函数吧。首先说下哈,这个栏目其实挺好的,每天做一题,查缺补漏也好,增长知识也罢,至少让自己都在学习中,是一件很快乐的事情。
领取专属 10元无门槛券
手把手带您无忧上云