编程-VB 引用同一根目录下的文件夹的Excel

问题描述

VB 引用同一根目录下的文件夹的Excel
exe文件跟文件夹的根目录一样,要引用文件夹下面的Excel部分单元格的数据各位高手帮我解答下,新人的第一条提问

解决方案

 '工程-引用-将Microsoft Excel 12.0 Object Library选中,'工程-部件-将Microsoft Common Dialog Control 6.0选中,'在窗体上添加一个按钮Command1对象,一个CommonDialog1通用对话框对象Private Sub Command1_Click()CommonDialog1.CancelError = TrueCommonDialog1.DialogTitle = ""指定要接收的Txt文件""CommonDialog1.Filter = ""文本文件(*.xls)|*.xls|所有文件(*.*)|*.*""CommonDialog1.InitDir = App.PathCommonDialog1.ShowOpenText1 = CommonDialog1.FileNameSet xlApp = CreateObject(""Excel.Application"")xlApp.Visible = TrueSet xlBook = xlApp.Workbooks.Open(Text1)If xlApp.Worksheets(""Sheet1"").Range(""A1"").Cells(2 2) = """" Then   xlApp.Worksheets(""Sheet1"").Range(""A1"").Cells(2 3) = ""B2空""ElsexlApp.Worksheets(""Sheet1"").Range(""A1"").Cells(2 3) = ""B2不空""End IfMsgBox ""所要打开的Excel文件已经打开,下面将关闭""xlBook.SavexlApp.QuitSet xlApp = NothingEndEnd Sub搜一下就行了
时间: 2025-01-30 05:21:21

编程-VB 引用同一根目录下的文件夹的Excel的相关文章

读取android根目录下的文件或文件夹实例_Android

最近几天真的是各种意义上的忙,忙着考试,还要忙着课程设计,手上又有外包的项目,另一边学校的项目还要搞,自己的东西还在文档阶段,真的是让人想死啊!! 近半个月来,C#这方面的编码比较多,android和java这里完全搁置了,于是抽空写个小例子. 这个例子非常小,就是一个读取android根目录下的文件夹或文件,当做热一下身. @Override public void onCreate(Bundle savedInstanceState) { super.onCreate(savedInstan

c语言-Linux C编程:将Linux根目录下指定的一个文件夹内的所以文件按创建时间排序

问题描述 Linux C编程:将Linux根目录下指定的一个文件夹内的所以文件按创建时间排序 Linux C编程:将Linux根目录下指定的一个文件夹内的所以文件按创建时间排序,并删除创建时间最靠前的100个文件.请大神赐教代码,非常非常感谢!! 解决方案 http://blog.csdn.net/kesaihao862/article/details/6657399

excel表-在VB中怎么能够更改某个文件夹下所有的excel中的第二个sheet的名字?

问题描述 在VB中怎么能够更改某个文件夹下所有的excel中的第二个sheet的名字? 我现在在文件夹下放了很多excel表格,现在我想将sheet2的名字全部改成一个另外的名字?请问怎么能够实现? 解决方案 你先枚举指定目录下所有 Excel 文件,对每个枚举到的 Excel 文件执行 sheet1,sheet2,sheet3,改名为1,2,3,VBA中withworksheet("1"),把工作表名字改成变量怎么写,把工作表名字改成变量怎么写") 解决方案二: 多个Exc

(C#)Windows Shell 编程系列1 - 基础,浏览一个文件夹

原文 (C#)Windows Shell 编程系列1 - 基础,浏览一个文件夹  (本系列文章由柠檬的(lc_mtt)原创,转载请注明出处,谢谢-) Windows Shell 编程,即 Windows 外壳编程.我们所看到的资源管理器以及整个桌面,都是一个 Shell. 关于 Windows 外壳的基本概念,我这里不做详细介绍,不了解的朋友,可以看看 姜伟华 的 Windows外壳名字空间的浏览. 好,现在让我们从基础学起,早日做出一个强大的资源管理器软件.(偶也是初学者,多多指教) 1 -

asp.net如何绑定cvs?读取特定文件下的文件夹名和文件名

问题描述 我想在asp.net下,用vb读取csv服务器端某个特定文件夹(如Test)的下一级目录的所有文件名和文件夹名,然后生成一棵树.求各位大虾帮忙!在线苦等. 解决方案 解决方案二:该回复于2009-03-09 09:12:17被版主删除

flex + java 开发中遇到的问题,flex_src下的文件夹为什么没有部署到tomcat中

问题描述 为什么在flex_src建的文件夹,不会部署到项目中去,我使用的是tomcat,项目名叫userman, 正常情况下,部署后flex_src所有文件都会部署到userman下去的,但是只有flex_src根目录下的文件才能 部署过去,而flex_src下的所有文件夹都没有部署过去,不知道是为什么... 如:   项目的结构:        crm                flex_src                      user                     

windows-如何用Java扫描Windows下的文件夹?

问题描述 如何用Java扫描Windows下的文件夹? 如何用Java扫描Windows下的文件夹以及文件夹下面的文件 解决方案 import java.io.File;/** * *自动扫描文件夹下的文件 *用途:自动扫描脚本输入路径,输出要执行的sql导入数据库: */public class OutSql { /** * @param args */ public static void main(String[] args) { // TODO Auto-generated method

将windows下的文件夹挂载到linux虚拟机下

  如何将windows下的文件夹挂载到linux虚拟机下 这里的挂载,指的是linux虚拟机可以访问windows系统的指定文件夹,http://包括读写. 以下挂载方式,需要安装VMware Tools.安装VMware Tools,右键点击你要启动的linux虚拟机,会弹出一个右键菜单,在其中会有一个install VMware Tools.点击该选项,则在linux系统中会打开一个目录,该目录下有一个VMware Tools安装包的压缩文件.解压缩该文件,会发现里面有一个vmware-i

xp系统下驱动文件夹后退按钮呈灰色如何解决

xp系统下驱动文件夹后退按钮呈灰色如何解决   具体如下: 1.在菜单栏空白处右键,接着取消"锁定工具栏"; 2.勾选"标准按钮",在标准按钮下窗口的后退键自然就会显示出来,此时再点击左边的小竖条,其次把标准按钮工具条拖动到我们需要放置的位置,且勾选锁定工具栏这个选项即可.