在Excel中使用VBA

在Excel中<em>使用</em>VBA，进入EXCEL自动化之门

使用postman如何上传附件？

-

VBA中list怎么使用

我有一个变量a="kathy"rn一个<em>list</em>。。。怎么把a添加到<em>list</em>里面去并且选中。。。<em>vba</em>的语句怎么写。。。

如何上传附件到数据库中？

<em>如何</em><em>上传</em><em>附件</em>到数据库中？谢谢！

使用VBA在Excel中如何合并单元格

近日，用EXCEL导出报表，有些项需要合并单元格，但执行完合并单元格这个语句后，就只能打印出一张报表，再打印就出错 。rnxlsheet.range(cells(1,1),cells(3,1)).merge truern'合并A1到A3的单元格rn出现的错误：Range对象的_worksheet方法错误 1004rn请赐教！

uploadswf附件上传的使用

uploadswf<em>附件</em><em>上传</em>的<em>使用</em>，<em>附件</em>异步<em>上传</em>，<em>附件</em>无刷新<em>上传</em>。

使用Ajax上传附件

<em>使用</em>Ajax<em>上传</em><em>附件</em> .................... ............

使用commonupload上传附件

各位大哥请问下怎么<em>使用</em> commonupload 实现<em>附件</em>的<em>上传</em>啊？rnrn急呀！请大家帮帮忙啊？

Excel中使用VBA的问题

<em>如何</em>判断单元格内是否有数据,是什么类型的数据?

VBA在64bit Excel中使用？

我有個Excel項目，是在32位Excel 2003中開發的,但是在64bit Excel2010，會報如下錯誤：rnCompile error:rnThe code in this project must be updated for use on 64-bit systems.rnPlease review and update Declare statements and then mark them with the PtrSafe attribute. rn誰知道怎麼解決？rn我在網上找了資料如下：rn•Original Statement: Private Declare Functionrn•Amended Statement: Private Declare PtrSafe Functionrnrn•Long → to → LongPtrrn•LongPtr → to → LongLongrn•and some "Long" are supposed to remain the same, depending on what they dorn

Maximo7.5如何上传附件

来个大牛指导下[img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/003/onion/3.gif][/img]

csdn如何上传附件

首先登陆你的csdn博客，看到首页有个下载   点击下载 进去之后点击<em>上传</em>资源   然后就可以<em>上传</em><em>附件</em>了   不过他会审核两天，不要着急，过两天就发布出来了...

如何上传大附件！

在ASP.NET中<em>如何</em><em>上传</em>打的<em>附件</em>！

如何上传附件

我建立了数据库，data1-data5为ole对象rnrn收件人：rn抄送：rn主题：rn内容：rn<em>附件</em>1：rn<em>附件</em>2：rn<em>附件</em>3：rn<em>附件</em>4：rn<em>附件</em>5：rnrn<em>如何</em>提交了后保存呢！

上传附件如何管理

各位好:我用jspsmartupload对<em>附件</em>进行<em>上传</em>,但是怎么进行管理呢?我上把<em>附件</em>名已系统时间定义,然后写到数据库.只是把名字写到数据库,然后<em>附件</em>在硬盘的一个文件夹下.我想定期在web页面上管理这些<em>附件</em>,请问<em>如何</em>解决.谢谢大家了

在CS下如何上传附件？

在CS结构下想实现将本地<em>附件</em><em>上传</em>到数据库里．请路过的朋友帮忙指点一下！先谢谢了！

VBA中如何关闭EXCEL?

在VBA中,我想单击一个按钮后,退出EXCEL,<em>如何</em>实现?rnrn另外,运行时要求我插入光盘加载宏,<em>如何</em>自动加载?

EXT.NET2.2中附件上传

<em>如何</em>实现类似SWFUPLOAD的点击浏览，选择多个文件后批量<em>上传</em>（[color=#FF0000]注：不是多个file控件，选择多次再<em>上传</em>，是一个控件浏览一次选择多个文件[/color]），SWFUPLOAD引入到EXT.NET中有问题，有没有做过的？求指点

email中的附件上传

[code=&quot;html&quot;] 选择<em>附件</em> [/code] email中的<em>附件</em><em>上传</em>

Excel VBA/Excel VBA

Excel VBA/Excel VBA/Excel VBA/Excel VBA

在Excel的VBA编程中，如何自动保存Excel!

我写了一个窗体，让Excel在启动的时候开始运行，结束运行的时候就自动关闭Excel，而不弹出保存对话框！rn另外一个是老问题了，就是<em>如何</em>在启动的时候不弹出Excel的安全提示！

【Excel VBA】在VBA中调用函数

在VBA代码中直接调用计算数据 EXCEL的表函数也可以直接在VBA中直接调用执行，具体调用格式如下： 调用方法1：变量对象= Application.WorksheetFunction.表函数（表函数参数） 实例：Range("d8") = Application.WorksheetFunction.CountIf(Range("A1:A10"), "B")...

SharePoint2013中，关于共享excel工作簿的问题

最近在看一些关于SharePoint2013资料，其中有一个问题：怎样做能共享<em>excel</em>的工作簿，就像在局域网中一样开启<em>excel</em>中的“共享工作簿”，让同事们可以共同处理一个工作簿呢？rnrn试了下文档共享，不同的用户是可以都看到并访问、编辑<em>excel</em>文件，但是不能同时处理一个文件。即使开启了“共享工作簿”后，再<em>上传</em>到SharePoint2013上去，第二个用户打开文件时也只能以只读或者通知对方的方式打开，不能像在局域网中那样共同处理一个工作簿。rnrn不知道我这样描大家能否理解。

Excel里VBA的使用

1.开启开发工具菜单    左上角“office” LOGO下，“Excel选项”下的“常用“下的在功能区显示“开发工具”选项卡; 2.VBA打开快捷键Alt+F11; 3.VBA返回Excel快捷键Alt+Q; 4.注释代码无快捷键，调出编辑工具栏：视图--工具栏--编辑--设置注释块； 5.换行“空格”+“_”,应用方式“ _”； 6.当文件过大时需要新建模...

Excel VBA函数的使用

本课程帮助您了解：VBA的介绍，什么是宏与模块，及其作用；什么是对象及对象程序设计的方法；VBA中常用的语法语句；对象程序设计中的窗体、控件、事件的掌握；过程、数据类型、变量、常量定义；VBA程序的调试与跟踪，有效的发现错误所在的位置，并优化程序设计。

excel的VBA使用技巧

Excel的VBA开发技巧，详细介绍怎么<em>使用</em>VBA，和一些编程的方法

Excel VBA使用

Excel VBA学习Excel的利器可以深入了解<em>excel</em>的功能，学了他基本可以解决日常中遇到的数据问题

使用VBA处理excel

1. 开启宏： 文件 --》 选项 --》信任中心 --》信任中心设置 --》宏设置 --》启用所有宏 2. 在功能区显示“开发工具”： 文件 --》选项 --》自定义功能区 --》在“开发工具”前打勾 3. 在表格中添加按钮并给该按钮加上事件 开发工具 --》插入 --》按钮 右击按钮，选择“指定宏...”，点击“新建”会打开VBA编辑器 4. VBA语法： ...

VBA使用EXcel出现问题！！！

我在应用程序中<em>使用</em><em>vba</em>调用<em>excel</em>后台打印报表 怎么让表格线打印出来rn调整单元格宽度：rnMYEXCEL.ACTIVEWORKBOOK.SHEETS(1).CELLS(1,1).columnwidth=30rn调整单元格对齐方式：rnMYEXCEL.ACTIVEWORKBOOK.SHEETS(1).CELLS(1,1).horizontalalig=1rnrn表格线怎么设置？？？

Excel中使用VBA中遇到的坑

今天因为工作需要，不得不<em>使用</em>VBA在Excel中对数据进行处理，虽然本人有一些编程的经验和逻辑思维能力，但是因为VBA用得少，所以还是费了很多功夫搜索相关的文档。百度上搜索出来的内容参差不齐，感觉都是只言片语，很少有系统化的把VBA讲明白的。尤其是例子感觉有些人说得头头是道，但是都是拷贝粘贴，没有把实践与思考，所以也缺少有说服力的例子。这篇文章也没有办法系统的讲解，但是仅仅是我自己碰到的一些坑，拿...

新上传的附件如何替代以前的附件？

新<em>上传</em>的<em>附件</em><em>如何</em>替代以前的<em>附件</em>？

Servlet使用jquery.uploadify上传附件

<em>使用</em>servlet结合jquery.uploadify <em>上传</em><em>附件</em>

nodejs使用multer上传附件

代码见node-multer

使用dropzone上传附件实例

项目中的实例，<em>使用</em>dropzone<em>上传</em><em>附件</em>实例，<em>使用</em>layer作为弹出层组件（可替换为别的组件），包含文件<em>上传</em>工具类，dropzone组件。

Excel VBA中可不可以使用SHBrowseForFolder，如何使用？

Excel VBA中可不可以<em>使用</em>SHBrowseForFolder，<em>如何</em><em>使用</em>？最好给点Sample.rn谢谢！

如何控制Lotus中上传附件的位置

问题还是没有解决.. 唉...rn上次问过shilei兄,无奈自己太菜...rn-------------------rn用lotus自带的资料上载元件上载<em>附件</em>的时候<em>附件</em>是默认上载到资料库的, 这样时间长了会导致资料库非常庞大, <em>如何</em>才能控制<em>上传</em>的<em>附件</em><em>上传</em>到指定的位置, 比如我想将<em>附件</em><em>上传</em>到自建的docs文件中??rn具体要<em>如何</em>做呢? 谢谢各位.rn1.我有个前台的表单页面,<em>上传</em><em>附件</em>想指定传到docs文件夹里面去...rn2.详细的表单视图页面中这个<em>附件</em>要<em>如何</em>显示出来呢? (多于一个<em>附件</em>的话)rn------------rn有没有例子参考下

jsp中如何上传附件到服务器的目录

在jsp中的文本框中粘贴<em>附件</em>的路径，例如：c:\aaa\test.txtrn把此文件以“/uploadfile/bbb/2002042400000001.txt”的形式存储在数据库中，rn并把此文件存储在服务器的“x:/../uploadfile/bbb/2002042400000001.txt”路径rn同时在显示的时候可以查看该<em>附件</em>rnrn注：需要给出<em>上传</em>的源代码和查看的源代码，(javabeans以及jsp调用方法)rn不要再网上查找之后再给我，一定要是你实践过的，并且编译通过，否则一律不给分。rn

.net中上传附件如何显示？？？

我现在免强知道<em>如何</em><em>上传</em><em>附件</em>，可不会做<em>附件</em>的显示页面，我的<em>附件</em>是<em>上传</em>在服务器的某个目录下的！当然在数据库里也有它的路径记录！rn请问该<em>如何</em>做这个显示页面呢？后台<em>如何</em>写？20分相送！！！！

Qt中如何建立HTTPS上传附件

以前用的是HTTP，可以<em>上传</em><em>附件</em>，现在要改用https, 用的是QNetworkAccessManager连接类 + QNetworkRequest 类。rn基本流程如下：rn QNetworkAccessManager *p_networkMng = new QNetworkAccessManager;rn QNetworkRequest request;rn serverURL="https://report.com/a/b/c/";rn QByteArray content;rn QFile filePackage(logFile);rn content = filePackage.readAll();rn rn request.setHeader(QNetworkRequest::ContentTypeHeader, "application/zip");rn request.setRawHeader("fileName",logFile.toAscii());rnrn l_request.setUrl(QUrl(serverURL));rn mp_reply = p_networkMng->post(request, content);rnrn在HTTP下可以正常运行，但是在 HTTPS下不知道为什么出错。rn

BS中如何上传大的附件？

我在BS 中<em>使用</em>按钮运行rn@Command([FileSave]);rn@Command([ToolsRunMacro]; "send")；rn可是为什么不能<em>上传</em>大的<em>附件</em>呢？现在只能<em>上传</em>100k以下的<em>附件</em>。求高手告之！

上传附件

<em>上传</em><em>附件</em> 代码

附件上传

<em>附件</em><em>上传</em> 开发工具与关键技术：Visual Studio 2015 、<em>附件</em><em>上传</em> 作者：袁何恩 撰写时间：2019年5月27日 今天，我要和大家分享的技术是<em>附件</em><em>上传</em>。 <em>附件</em><em>上传</em>是数据的直接<em>上传</em>，不用转换类型。但是有两点要记住和注意的，第一点是js直接<em>上传</em>文件，多于20M很容易报错；第二点在你没有点击保存的时候，<em>附件</em>是不能保存到数据库的，需要用Session来暂时储存它。 一、在视图上写上<em>附件</em><em>上传</em>的方...

http上传附件和https上传附件

同样的<em>上传</em>代码，在http下<em>上传</em>很快，为什么改成https<em>上传</em>非常慢呢？rnrntomcat配置：rnhttp:rnrnrnhttps:rnrnrn<em>上传</em>页面都是一样的，唯一区别就是上面，http下就很快，https下就超级慢，有高人知道为什么吗？

typecho 不能上传附件，上传附件失败

很多人在用typecho时（我用的1.0，其他的没测试过），都会遇见<em>附件</em><em>上传</em>失败的问题，其实很简单，你用的是虚拟主机，typecho把<em>上传</em><em>附件</em>的功能给屏蔽了。    修改方法详见：http://www.phpnote.net/index.php/Home/Article/index/id/54

附件的上传

文献种类：专题技术文献； 开发工具与关键技术：Visual Studio 2015 <em>附件</em>的<em>上传</em>与下载 作者： ；年级： ；撰写时间： 年 月 日 文献编号： ；归档时间： 5月 7日 <em>附件</em>的<em>上传</em> 开发工具与关键技术：Visual S...

上传附件【上传一个附件时】

其中jsp页面中只需定义type=”file“，name=&quot;proReCheckFile&quot; 在Aciton中，需要定义 priate File proReCheckFIle; private String proReCheckFileFileName;   jsp页面：  <em>附件</em>：&amp;lt;input type=&quot;file&quot;  name=&quot;proReCheckFile&quot; style=&quot;...

如何解决jsp上传附件中的附件名称中文问题

近期马上移交一个项目，就差<em>附件</em><em>上传</em>得时候中文的<em>附件</em>名称显示出来老是乱码，请高手解决 多谢rnrn前提我用得是UTF-8编码：在jsp页面头部有rnrn相关代码如下：rnrn其中我也设置了：request.setCharacterEncoding("gbk"); rn但是用起来不管用rnRequestContext requestContext = new ServletRequestContext(request); rnrnif(FileUpload.isMultipartContent(requestContext)) rnrn //get the uploading execel file, and write to temp dir .rn FileItemFactory filefactory = new DiskFileItemFactory();rnrn ServletFileUpload upload = new ServletFileUpload(filefactory);rnrn //upload.setHeaderEncoding("GBK");rnrn List items = upload.parseRequest(request);rn Iterator iter = items.iterator();rnrn while (iter.hasNext()) rnrn FileItem item = (FileItem) iter.next();rnrn //if it is file field, save the uploading filern if (!item.isFormField()) rnrn String fieldName = item.getFieldName();rnrn if ( fieldName.equalsIgnoreCase( "order_attached_file_url" ) ) rn upfilename = item.getName() ;rn rn //process orderAttachedrn if ( upfilename != null && ! upfilename.trim().equals( "" ) ) rn int k = -1 ;rn k = upfilename.lastIndexOf( File.separator ); //File.separatorrn if ( k == -1 ) rn attachedFileName = upfilename.trim() ;rn rn else rn attachedFileName = upfilename.substring( k + 1 ).trim() ;rn rn rn else // no file attachedrn attachedFileName = "" ;rn rnrn attachedFileName = attachedFileName.replace(':', '_' ) ;rn attachedFileName = attachedFileName.replace( File.separatorChar , '_' ) ;rnrn if ( attachedFileName != null && ! attachedFileName.trim().equals("") ) rn //save to temp filern realServerPathFileName = request.getRealPath( File.separatorChar + "ecatic" + File.separatorChar + "temp" + File.separatorChar + attachedFileName );rn File newFile = new File( realServerPathFileName );rn item.write(newFile);rn rnrn order_attached_file_url = realServerPathFileName ;rn rn rnrnrn在线等 ：rn

Asp.Net中上传附件时，如何取得附件的文件名和扩展名？

Asp.Net中<em>上传</em><em>附件</em>时，<em>如何</em>取得<em>附件</em>的文件名和扩展名？

Excel vba实例 Excel vba

Excel <em>vba</em> Excel <em>vba</em>EXCEL实现动画的四种实例.RAR

如何判断上传附件的文件类型

<em>上传</em>一个<em>附件</em>，<em>如何</em>知道他的文件类型，比如说（jpg,doc,txt等等)

如何实现附件的上传和下载

我想用C#实现<em>附件</em>的<em>上传</em>和下载，大家帮帮忙，最好有例子rn我的邮箱tingting86131@163.comrn有的给我发一份，谢谢啊

excel vba excel vbaexcel vba

不错的东西<em>excel</em> <em>vba</em><em>excel</em> <em>vba</em><em>excel</em> <em>vba</em><em>excel</em> <em>vba</em>不错的东西不错的东西不错的东西不错的东西

如何提取上传附件的文件类型

大家帮忙

如何删除已上传的附件?

我是用.NET开发的，现在问题是：用户<em>上传</em>了<em>附件</em>后，我在后台要进行维护，可是怎么把[u[color=#FF6600]]它查出来并删掉[/color][/u]，这个删除指的是删除存放在（File）文件夹的用户<em>上传</em>的文件，比如：一个.doc的文件。

如何上传附件并分类管理？

在一个页面中，用户以某个身份进来，添加<em>附件</em>后<em>上传</em>；如果以另外的身份进来，只能浏览这个<em>附件</em>，而不能修改或删除。请问具体应该怎么实现<em>附件</em><em>上传</em>和在服务器上的分类管理？

如何处理多附件上传？

能不能在C#里实现多个<em>附件</em><em>上传</em>到oracle数据库里的同一个blob字段？然后读取的时候可以分开来

js如何删除上传的附件

我用fileupload <em>上传</em>多个<em>附件</em>到服务器 并且 数据库 有表存的<em>附件</em>信息 有存储的路径 我<em>如何</em>按照路径 用js把我<em>上传</em>的<em>附件</em>删除，希望好心人能给一份示例代码

如何实现上传附件的功能

各位好,rn能不能只用javascript实现<em>上传</em><em>附件</em>的功能呢?rn指定<em>附件</em><em>上传</em>到某个文件夹内rn能不能给个例子rn多谢各位了

如何取得上传附件的大小

请问<em>如何</em>获得<em>上传</em><em>附件</em>的大小？

邮箱无法上传word和excel附件

我现在<em>使用</em>了光纤从项目部到班组，班组有2个交换机的用户，项目部<em>上传</em>word和<em>excel</em><em>附件</em>都很正常rn但班组上网都正常，就几点不正常，一，不能<em>上传</em>word和<em>excel</em>，其他的rar、jpg、dwg等都能正常<em>上传</em>，二，项目访问班组计算机的共享文件复制会死机，甚至很慢的现象。还有几点不详说了，我已经排除病毒的可能，请各位指点，问题到底出在哪个地方，怎么改进才能使我的网络更加畅通？？rn

上传了附件">接"一个EXCEL问题,急"，上传了附件

不知道为什么这个文件有4M那么大。

请问上传的附件如何删除

如题：请问<em>附件</em><em>如何</em>删除

excel中的VBA问题

VBA<em>如何</em>将性别显示“F”和“M”转换为“女”和“男”，因为是通过宏实现的，提取数据后显示的是“F”“M”，初学宏，所以麻烦哪位大侠帮帮忙！！

Excel中的vba编程.

我遇到这样的一个问题在<em>excel</em>中有<em>vba</em>实现:rn例子:在a列中有 1,2,3,4,5,6,7,8,9个数字,rn 在b列中有1,2,4这3个数字.rn我想做的是,一个两重的循环,实现看看b列中的数字,在a列中有没有.rn该<em>如何</em>写呢?rn

Excel 中VBA文件夹操作

很有用的操作代码！！自己亲自<em>使用</em>的。简单易懂，方便操作！！

excel中的vba问题。

谁能帮帮我。在<em>excel</em>表中，我从一个表sheet1中复制一定范围的数据，再粘贴到别一个工作表“信息表”中，为何range("A3").select的select无效rnrnPrivate Sub CommandButton1_Click()rnRange("a2:d41").SelectrnSelection.CopyrnSheets("信息表").SelectrnRange("a3").SelectrnActiveSheet.PasternEnd Subrn

EXCEL中VBA问题

<em>如何</em>在EXCEL中动态的显示图片,要求如下: rn 1,在某一CELL中输入图片的绝对路径,移开焦点后,在该cell的右边自动显示图片,并且图片可根据列的大小自动适应. rn 2,当修改路径完后,该CELL右边的图片会被删除并替换上新的图片. rn 请高手帮忙!! rn 请问EXCEL能做到吗?? rnrnrn之前在论坛中找到一个类似问题答案..由于本人不懂VBA... rn帮忙看看... rn可以参考这个:[url=http://topic.csdn.net/t/20030721/17/2054348.html]http://topic.csdn.net/t/20030721/17/2054348.html[/url]

怎样在帖子中上传附件？？

每次<em>上传</em>都是出现未知错误，谁能告诉一下怎样做才行？？

easyui 行编辑中上传附件

springmvc easyui在行编辑中<em>上传</em><em>附件</em>

INotes中的附件上传功能

谁有此inotes模板的源码？谁可以把它里面的许多模块的功能移植到应用开发中<em>使用</em>？有兴趣着请加入qq群：15313896或者跟帖讨论。

unix系统中上传附件不成功？

在windows系统中<em>上传</em><em>附件</em>是成功的，<em>附件</em><em>上传</em>至oracle数据库的blob字段，环境如下：rnweblogic+oracle+struts+hibernatern重要代码如下：rnAddBlobStorage.jsprnrnrnrnstruts-config.xmlrnrnaction代码rnTblobstorage tb = new Tblobstorage(); //定义的vpo对象rnDynaActionForm fm = (DynaActionForm) form;rnFormFile accessory = ( (FormFile) fm.get("accessory"));rntb.setAaccessory(accessory.getFileData());rntb.setCfilename(accessory.getFileName());rntb.setLfilesize(new Long(accessory.getFileSize()));rn在unix环境下部署程序，<em>上传</em><em>附件</em>就会白屏。有谁遇到类似的问题，多谢指教!!

在asp中有关附件上传

各位高手我以前做的一个系统<em>附件</em><em>上传</em>用的是自已做的控件，用ftp,用户反应不稳定且不安全。我想知道目前流行的是哪种？？rn 有没有现成例子，急呀，最好自已用代码实现，不要用别人的组件。

asp.net 中的附件上传问题

在asp.net 中想增加一个<em>附件</em><em>上传</em>功能，而<em>附件</em>内容存储在数据库（sql 2000）的image 字段中，理论上，<em>附件</em>大小可以达到2G，但是每当<em>附件</em>超过5M时，页面就报错了，错误信息“The page cannot be displayed　...”,不知何故，请各位大侠帮忙??

VBA中使用EXCEL工作表函数

EXCEL的VBA有两个函数库，一个是VBA的函数库，另一个是EXCEL工作表函数，也就是我们在单元格中<em>使用</em>的函数，两个函数库不是完全一样的。例如FIND（），VLOOKUP（），在VBA的函数库中是没有的。通常，为了实现这些功能，我们需要自己写这些函数，但是还有另外一种方法，通过Application对象调用这些函数，方法如下：Application.WorksheetFunction.Find...

关于在VBA中使用Excel公式

公式如下rnB2=IF(ISERROR(LEFT(D2,FIND("爱好 爱好",D2)-1)),"",LEFT(D2,FIND("爱好 爱好",D2)-1))rn其中的“B2”“D2”，我希望是整个B列和D列。 rn请问VBA中怎么写？

vba中如何使用正则表达式

匹配Email地址的正则表达式：\w+([-+.]\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*rnrn语法怎么写啊。。。

使用EXCEL中VBA进行文本文件的输出

我想用<em>excel</em>中的VBA,向一个文本文件进行输出数据。rn要求可以类似于ini的输出方式，即把将要输出的数据输出到指定关键字行的后面。rn

在Excel中使用VBA来筛选数据

在Excel中<em>使用</em>VBA来筛选数据rnrnrnrn1. 问题由来rn早晨还没有完全醒来，你就被电话吵醒，有一个中学同学向你请教一个Excel的问题。作为一个所谓的Excel专家，你经常会受到此类骚扰。问题大概是这样的，一个很大的Excel文件，其中有些行是重复的，也就是说，有2行是完全一样的，而有些行是不重复的，现在的问题是要找出所有不重复或者重复的行，你没有听明白。你大概考虑了一下，用“VLOOKUP”查找一下，然后重新排序，应该就可以了，你需要试一下，然后告诉他怎么用，于是你告诉他，20分钟后再打电话给你。rn2. 问题解决的思路rn你首先打开Excel，输入一些测试数据，大概是这个样子：rnrn rnrn其中“张三”、“李四”有2个，其他只有一个，需要把他们分出来。首先在B列输入1，然后向下填充，在C列输入“VLOOKUP(A1,$A$1:$B$7,2,FALSE)” ，如果找到，那么返回1，如果找不到，空着就可以了。结果C列全部变成了1 ，因为查找自己肯定可以找到，那么查找的Range必须要去除本行。rn你接着找了几个其他函数，“MATCH”，“INDEX”试了试，都无法办到；那么用IF函数呢，你开始试着写IF函数。先输入第4行吧，参数和引用区域回头再处理，或许Excel聪明到可以填充出你需要的引用区域。rn你输入了如下的IF函数：rnIF(OR(VLOOKUP(A4,A1:B3,2,FALSE),VLOOKUP(A4,A5:B7,2,FALSE)),1,0)rn真够复杂的，Excel应该开一个小窗口，然后作为代码输入这样的判断逻辑，IF函数可以嵌套7层，真不知道微软的工程师怎么想的 ，你一边嘟囔一边按下了回车，结果是“#N/A”，就是“值不可用”，你知道函数 VLOOKUP如果找不到需要的值，则返回错误值 #N/A，表达式里有了这个东东，所以不管什么计算，结果都是它了。rn 从工具菜单选择“错误检查”，“显示计算步骤”，证实了你的猜测，第二个VLOOKUP函数返回的错误值 #N/A传递到了最后。rn rn rn 这时，你同学的电话来了，你告诉他需要写一段小程序，你决定还是<em>使用</em>直接又简单的VBA来解决问题。rn3. VBA程序rn打开VBA编辑器，插入一个模块，你不假思索的敲入了以下代码：rnrnSub SelectDouble()rnrn Dim i As Long, j As Longrn rn For i = 1 To 7 Step 1rn For j = 1 To 7 Step 1rn '不比较相同的行rn If i <> j Thenrn If Range("A" & i).Value = Range("A" & j).Value Thenrn Range("E" & i).Value = 1rn End Ifrn End Ifrn Next jrn Next irn rnEnd Subrnrn点击运行，很好，是重复的都标志了1，没有重复的空着，然后排序就可以了。你很满意你还输入了一行注释。你拨通了你同学的电话，告诉他可以了，然后他打电话给你，你把程序念给他，告诉他该改什么地方。天知道他上学时学的什么语言，反正不是Basic，你得解释Dim是什么含义。经过一番折腾，他终于在电话另一端把代码输入了计算机。作为电信员工的他可以每天24小时用电话聊天，只是可怜你的手机话费单，你叹了口气，该去洗脸刷牙了。rn4. 效率rn洗完脸，刷完牙，你泡好了一杯咖啡，又回到了计算机旁边，电话又来了。你以为是告诉你已经完成了的“喜讯”，听到的却是说死机了，愣了0.1秒钟，你想想应该是程序还在执行或者是死循环。你问了他大概的数据量，知道大概有9000多条记录，还好，你想。rn你检查了一下代码，没有什么死循环，也许是你同学输入时有什么错误，你把循环改到1到10000，然后拿起杯子，咽了一口咖啡，往后靠了靠，等着计算结果。几分钟过去了，还是没有结束，你觉得有些奇怪，你敲了“Ctrl + Break”，暂停了程序，将鼠标放在i变量上，显示i还是24，TNND，你知道是Range函数太慢，算了，你打电话告诉你同学，大概需要几个小时才可以计算完成。你又喝了一口咖啡，自言自语道，比起手工筛选，毕竟很快了。rn但不就不到1万条纪录吗，Excel的VLOOKUP等内置函数一眨眼也就计算好了啊。rn4.1. 通过数组rn数组要比Range函数快一些，你把程序改了一下，定义了2个数组，首先把数据全部读入第一个数组，然后对数组进行操作，对于重复的，把第二个数组的相应部分写为1，计算完成后，根据第二个数组，把结果写回去。程序代码如下：rnrnSub SelectDouble2()rnrn Dim i As Long, j As Longrn Dim max As Longrn Dim a() As String, b() As Longrn rn max = 10000rn rn ReDim a(max) As Stringrn ReDim b(max) As Longrn rn For i = 1 To max Step 1rn a(i) = Range("A" & i).Valuern Next irn rn For i = 1 To max Step 1rn For j = 1 To max Step 1rn '不比较相同的行rn If i <> j Thenrn If a(i) = a(j) Thenrn b(i) = 1rn End Ifrn End Ifrn Next jrn Next irn rn For i = 1 To max Step 1rn Range("F" & i).Value = b(i)rn Nextrn rnEnd Subrnrn你执行了一下，对于10000条纪录，大概需要不到5分钟。你觉得很满意，效率提高了几个数量级，你还没有忘记设置了一个max变量，这样，代码<em>使用</em>时改动就会少很多。rn4.2. <em>使用</em>内置函数rn你又想起了VLOOKUP这个函数，真是阴魂不散。是啊，为什么VLOOKUP执行这么快，当然是因为它是编译好的，不是用VBA写的 。你灵机一动，为什么不用这个函数呢，在VBA中，可以<em>使用</em>Application.函数名，调用Excel的内置函数。这样，改过的代码如下：rnrnSub SelectDouble3()rnrn Dim i As Long, j As Long, a, brn rn For i = 2 To 9999 Step 1rn a = Application.VLookup(Range("A" & i), Range("A1:B" & (i - 1)), 2, False)rn b = Application.VLookup(Range("A" & i), Range("A" & (i + 1) & ":B1000"), 2, False)rn If IsError(a) And IsError(b) Thenrn Range("G" & i).Value = 0rn End Ifrn Next irn rnEnd Subrnrn代码很短，但有一点复杂和讨厌，循环是从2到9999，因为为了防止VLOOKUP函数的Range范围失效，所以这两行需要手动处理。IsError函数来检测返回值，如果两个返回值都是错误，则此行为单一的没有重复的行，标志为0即可。程序执行速度和上面的差不多，至少你没有感觉出来差别。rn4.3. 继续Hackrn到这里，你还是觉得不满意，<em>使用</em>数组，数据量太大会内存吃紧，<em>使用</em>VLOOKUP函数，代码觉得很丑陋 。你不知道为什么想起来二分查找之类的东东，那么，查找前应该先排序，你在Excel里把数据排了序。现在的问题是需要循环2次，复杂度为N*N，如果…...，你想如果排好了序，只需要检查当前数值和下一个是否一样，如果一样，那么把当前和下一个位置标示出来，循环变量加2，跳过下一个，如果不一样，循环变量加1继续比较就可以了，代码如下：rnrnSub SelectDouble4()rnrn Dim i As Long, Max As Longrn rn Max = 10000rn i = 1rn Dorn If Range("A" & i).Value = Range("A" & (i + 1)).Value Thenrn Range("I" & i).Value = 1rn Range("I" & (i + 1)).Value = 1rn i = i + 2rn Elsern i = i + 1rn End Ifrn Loop While i < Maxrn rnEnd Subrnrn这个程序复杂度只有N，执行速度当然是你今天写的所有程序里最快的，而且内存占用也最小。你觉得很满意，露出了贼贼的笑容。rn5. 总结rn你打开了日志，开始记下了今天问题的解决过程。rn你想，嗯，如果只是想怎样把Range函数变快来解决问题，速度不会有本质的提高。速度提高，第一，排序才是关键，快速的查找和搜索都是要基于排好序的内容，比如二分查找，那么，为什么数据库要建索引，索引的有无对于查找速度影响很大，道理都是一样的了；第二，查找时没有回溯，对于查找过的内容直接跳过，这个和字符串的匹配算法，好像是KMP算法 ，思路是一样的，嗯，那么如果不是相同的内容不是2个，是多个，那么你可以<em>使用</em>一个循环来前溯，并且，对于不同的个数，可以标识为不同的数字。你忽然觉得自信满满，似乎要忘了已经失业半年的事实。rnrn（2004-11-23 夜）rn

在EXCEL中使用VBA画图（英文文档）

<em>使用</em>VBA扩展<em>excel</em>的功能，能够是现在<em>excel</em>中绘制各种报表图形。

vba中使用excel函数的问题

Dim i As Integerrn Dim pos As Doublern Dim stre As String, yzname As Stringrn yzname = Worksheets(1).Cells(5, 6).Valuern For i = 1 To 69rn stre = Worksheets(3).Cells(1, i).Valuern pos = Application.WorksheetFunction.FindB(stre, yzname)rn If pos > 0 Thenrn curcol = irn Exit Forrn End Ifrn Next irn运行至 findb函数时候老说“不能取得worksheetfunction的findb属性” 这是为何阿？rn知道的朋友帮帮忙

vba 中的Worksheet_SelectionChange如何使用?

在教程上看到这样一段rn<em>如何</em>利用 Worksheet_SelectionChange 输入数据的方法。rnPrivate Sub Worksheet_SelectionChange(ByVal Target As Range)rnTarget = 100rnEnd SubrnrnTarget 指的是你鼠标所选的单元格，Worksheet_SelectionChange() 事件的参数。rn可以是一个也可以是好几个单元格。rnRange 是 Excel 特有的变量形态，叫范围。rnTarget As Rang 是把 Target 这个参数设定为 Range 变量形态。rnTarget = 100 是把你点选的单元格输入数字100。rn教程说这是自动执行,怎么个自动执行法啊?把这段代码加进<em>vba</em>模块后选单元格没有任何反映。而且想给个按扭指定这个宏,在<em>excel</em>里找不到这个宏.这个函数是怎么用的 啊?rnrn

vba中如何使用容器类

vb中有ArrayList, HashTable等容器，<em>vba</em>中也能<em>使用</em>么？如果可以要引用那个库？

计算机程序的构造和解释(中文清晰版-全)下载

（本书为中文清晰版，绝不欺骗大家，我觉得上传资源就该对各位读者负责） 本书被广泛地认为是计算机科学的经典教材，在计算机科学的教学领域产生了深刻的影响。诸多的经典教材都是由本书间接催化。 相关下载链接：[url=//download.csdn.net/download/fuyun2000/2693047?utm_source=bbsseo]//download.csdn.net/download/fuyun2000/2693047?utm_source=bbsseo[/url]

SQL数据库检视器下载

非常好用的一个数据管理工作，可以连接任何版本的SQL server数据库。使用方便，是数据库开发者的最佳帮手。 相关下载链接：[url=//download.csdn.net/download/jiang801016/5596243?utm_source=bbsseo]//download.csdn.net/download/jiang801016/5596243?utm_source=bbsseo[/url]

gdb说明文档下载

gdb 说明文档 提示 开发 相关下载链接：[url=//download.csdn.net/download/sinat_16396897/7478829?utm_source=bbsseo]//download.csdn.net/download/sinat_16396897/7478829?utm_source=bbsseo[/url]

相关热词 c++和c#哪个就业率高 c# 批量动态创建控件 c# 模块和程序集的区别 c# gmap 截图 c# 验证码图片生成类 c# 再次尝试 连接失败 c#开发编写规范 c# 压缩图片好麻烦 c#计算数组中的平均值 c#获取路由参数