用VB如何直接打开带有写保护工作簿的写入权密码的EXCEL [问题点数:20分,结帖人w1984721]

Bbs1
本版专家分:17
结帖率 89.11%
Bbs1
本版专家分:17
Bbs5
本版专家分:4608
如何在VB中打开一个Excel文件并调用Excel文件自身的VBA宏?
最近在做一个项目,项目的主体是基于Excel的VBA开发。项目的各个要求比较零碎,每一项要求之间互相独立,于是每一项要求就由一个Excel表格来单独实现,项目结果是产生了若干个零碎的<em>带有</em>VBA宏的Excel文件。 为了使软件整体化、结构化,借助于VB,绘制了一个窗体,窗体上有若干个Button,每一个Button对应着一个<em>带有</em>VBA宏的Excel文件。 借助于以下语句将Excel文件<em>打开</em> P
破解打开Excel文件编辑的时候提示受保护输入密码
第一、<em>打开</em>Excel表,按ALT+F11弹出界面后,点击插入---》模块把如下代码黏贴进去接着按F5,接下来都是确定即可。 使用方法:<em>打开</em>要解除保护的EXCEL ALT+F11----插入模块----复制粘贴代码----F5============================代码===================================P...
Office文件打开密码写保护密码、只读密码破解(ppt密码专业破解):
office文件<em>打开</em><em>密码</em>、<em>写保护</em><em>密码</em>、只读<em>密码</em>破解   方法一:1、将pptx文件重命名,比如天堂.pptx,更名为天堂.pptx.zip,双扩展名可以有效说明文件的格式以及原始格式;  2、将改名后的文件天堂.pptx.zip解压缩,得到一个天堂.pptx 文件夹;  3、切换到\ppt 之下,用记事本开启 presentation.xml 文件;  4、把 整块选中并删除;
//如何打开选定的带有密码的EXCEL文件
rn //<em>打开</em>选定的EXCEL文件rn tryrn eclApp:=CreateOleObject('Excel.Application');rn exceptrn ShowMessage('您的机器里未安装Microsoft Excel。');rn Exit;rn end;rnrn tryrn WorkBook:=eclApp.workBooks.Open(xlsFileName); -----没有<em>密码</em>rn finallyrn WorkBook.Close;rn eclApp.Quit;rn eclApp:=Unassigned;rn end;rn如果要<em>打开</em><em>带有</em><em>密码</em>的要怎么写
工作簿打开密码问题!
<em>如何</em>将<em>工作簿</em>另存并将<em>打开</em><em>密码</em>设置为123。求VB代码
Excel打开工作簿事件
Excel自定义重新计算,Excel自动重算设置,Excel<em>工作簿</em><em>打开</em>事件Application.WorkbookOpen
VB打开EXCEL两个工作簿的问题
先上代码:rnPrivate Sub Form_Load()rnDim XlApp As New Excel.Application '使用 Excel 对象删除指定行rnDim XlBook As New Excel.WorkbookrnDim XlSheet As New Excel.WorksheetrnrnrnSet XlApp = CreateObject("Excel.Application") '创建EXCEL对象rnXlApp.Visible = TruernXlApp.Caption = "应用程序调用 Microsoft Excel"rnSet XlBook = XlApp.Workbooks.AddrnSet XlBook = XlApp.Workbooks.Open(App.Path & "\Book1.xlsx")rnSet XlSheet = XlBook.Worksheets(1)rnrnActiveCell.AddComment "VB好犀利!"rnMsgBox ActiveCell.Comment.TextrnEnd Subrn<em>打开</em>一个EXCEL<em>工作簿</em>。rn我意图是<em>打开</em>一个book1.xlsx<em>工作簿</em>,可是一下子<em>打开</em>了两个。rnOFFICE是2010.rnBook1.xlsx是这样的:rn[img=https://img-bbs.csdn.net/upload/201905/08/1557295809_834500.jpg][/img]rn另一个是这样的:rn[img=https://img-bbs.csdn.net/upload/201905/08/1557295835_747723.jpg][/img]rn请教高手,<em>如何</em>只<em>打开</em>一个?<em>打开</em>那个Book1.xlsx。谢谢!
EXCEL工程加密及工作表保护密码破解方法
1.EXCEL工程加密破解方法 新建一个EXCEL文档 <em>打开</em>新建的这个Excel,按下alt+F11,<em>打开</em><em>vb</em>界面,新建一个模块,如图所示 将代码复制到这个模块中,代码如下: Private Sub VBAPassword() '你要解保护的Excel文件路径 Filename = Application.GetOpenFilename("Excel文件(*.xls & *.xl
VB打开excel,有密码验证,命令无法继续执行
<em>excel</em>有<em>vb</em>a代码,在<em>打开</em>时会出现一个登录框,要输账号和<em>密码</em>,我现在想<em>打开</em>这个<em>excel</em>并自动输入账号<em>密码</em>,但是现在代码会卡在<em>打开</em><em>excel</em>这一行,不会执行Call这行,自己输入账号和<em>密码</em>后又会继续执行之后的代码,这是由于什么原因,有没有比较简单的解决方法? 程序代码: Private Sub Command3_Click() Set xlapp = CreateObject("E
VB操作EXCEL表的常用方法
VB是常用的应用软件开发工具之一,由于VB的报表功能有限,而且一但报表格式发生变化,就得相应修改程序,给应用软件的维护工作带来极大的不便。因此有很多程序员现在已经充分利用EXECL的强大报表功来实现报表功能。但由于VB与EXCEL由于分别属于不同的应用系统,<em>如何</em>把它们有机地结合在一起,是一个值得我们研究的课题。 一、 VB读写EXCEL表: VB本身提自动化功能可以读写EXCEL表,其方法如下: ...
C++ 保存Excel文件(带密码保护)
最近有客户需求报表保存为xls的功能,需要保存的文件设置<em>密码</em>保护,特进行尝试! Workbook.SaveAs method (Excel) 参数详情:https://docs.microsoft.com/en-us/office/<em>vb</em>a/api/<em>excel</em>.workbook.saveas  C++ Code  123456   void SaveAs(VARIANT &amp;a...
VB打开Excel文件
(1)<em>vb</em><em>打开</em>Excel       用EXCEL对象读取EXCEL文件中数据.然后通过ADODB连接SQL进和导入     下面是EXCEL对象的详解 1 前言     做为一种简捷、系统的 Windows应用程序开发工具,VB具有强大的数据处理功能,提供了多种数据访问方法,可以方便地存取Microsoft SQL Server、Oracle、XBase等多种
怎样直接打开带有密码的数据库???
我用adoquery控件rn连接字符串处是Provider=Microsoft.Jet.OLEDB.4.0;DataSource=d:\db1.mdb;password=888rn但是把action设为true时却出现“无法启动应用程序,工作组信息文件丢失,或是已被其它用户以独占方式<em>打开</em>”。rn但是我是在自己机器上操作,<em>如何</em>数据库不设<em>密码</em>,用Provider=Microsoft.Jet.OLEDB.4.0;DataSource=d:\db1.mdb就可以<em>打开</em>,加上<em>密码</em>就不行,是不是还要设什么属性?请高手们赐教!
如何工作簿设置打开密码
【课程内容】n所涉及的具体内容包括输入录入技巧、排序、筛选、函数公式、数据透视表、图表、汇总等功能应用,并结合大量的企业应用实例,以互动的方式将解决思路和操作过程逐一呈现。n【课程特点】n1、190节大容量课程:包含了Excel软件的大部分知识点;n2、创新的教学模式:手把手教您电子表格,一看就懂,一学就会;n3、完美贴心的操作提示:让您的眼睛始终处于操作的焦点位置,不用再满屏找光标;n4、语言简洁精练:瞄准问题的核心所在,减少对思维的干扰,并节省您宝贵的时间;n5、视频短小精悍:即方便于您的学习和记忆,也方便日后对功能的检索;n【互动教程的特点】n•互动性n-首创互动式学习,不同于以往的任何一种学习方式,不看视频不看书,轻松,高效,好玩n-手把手教学,一步步引导操作,实时看到效果,就像自己在操作一样,信心满满n-即点即学,课程内可根据自己的需要,随时调整界面上方进度条,重复操作,加强记忆n-强大的学习跟踪系统,对整体学习进度一目了然,及时调整学习计划,查疑补漏n•人性化n-界面设计简洁,操作简单,没有繁琐的按钮,一点就可<em>直接</em>进入学习状态n-贴心小提示,读懂你的小心思,零基础快速入门,学习无压力,不尴尬n-超多原理解析,疑问解答,如同专业Excel导师亲身指导,不翻书快速记忆,Excel小白迅速成长n•实用性n-课程由浅入深,操作过程详细剖析,一步步模仿,马上就会做。n-涉及排序、筛选、函数公式、数据透视表、图表、汇总等核心功能的课程编排,通俗易懂不头疼n-互动+观看视频,两种学习方式切换,上班路上,地铁里享受随时随地自由学习n通过本课程的学习,您将逐步掌握Excel 2016的各项功能和使用技巧。从而提高您的办公效率,早做完,不加班!!!
怎么打开带有密码EXCEL表??
怎么<em>打开</em><em>带有</em><em>密码</em>EXCEL表??
VB如何打开指定工作簿A1和关闭指定工作簿
求救,<em>如何</em>获取指定的1.xls工作表A1,和<em>如何</em>关闭指定<em>工作簿</em>1.xls, 因为会运行很多<em>工作簿</em>,如果不指定的话,就可能会读取到其他的<em>工作簿</em>A1的数据,而不是读取1.XLS<em>工作簿</em>的A1数据。请老师们指点!谢谢,感激不尽rnrn注意下是VB,不是VBA,因为我的是VBA封装VB DLL的,我现在有一个1.XLS<em>工作簿</em>,还有好几个2.XLS/3.XLS,几个<em>工作簿</em>同时<em>打开</em>的情况下,我想通过点击按钮来关闭指定<em>工作簿</em>1.xls,但是现在用下面这段代码只能关闭当前活动<em>工作簿</em>,不能关闭指定的1.XLSrnrn我的代码是rnPrivate Sub Command_Click()rnOn Error Resume Nextrn Dim xlApp As Object, xlbok As Object, xlsht As Object '定义变量VBtrn Set xlApp = GetObject(, "Excel.Application") '取得Excel实例rn Set xlbok = xlApp.ActiveWorkbook(1.xls)rnrn xlApp.close ‘只能关闭当前活动的rnXLAPP.quit ’不能关闭指定的,只能关闭所以EXCELrn Unload MernrnEnd Sub
打开一个excel工作簿文件
在vs2008中创建一个asp.net项目,<em>如何</em>在button_click事件中添加一段代码用来<em>打开</em>一个<em>excel</em><em>工作簿</em>文件。(在客户端或服务器端<em>打开</em>读取数据并且显示出来数据。)
通过ADODB.RecordSet打开Excel工作簿
Sub test()    Dim dbRng As String dbRng = Sheet1.Range("contract").Address(False, False) Dim Conn As New ADODB.Connection Conn.Open "Provider=Microsoft.Jet.OleDb.4.0;Extended Properties=Exce
如何创建工作簿Excel
开发工具与关键技术:JS 作者:李宥良 撰写时间:2019年4月8日 简介 首先我们先来看看传统的创建方法是什么样的,每次启用Excel2016后,在Excel开始界面,单击【空白<em>工作簿</em>】选项即可创建一个名为“<em>工作簿</em>1”的空白<em>工作簿</em>;现在我们已<em>打开</em>了一个<em>工作簿</em>,<em>直接</em>单击左上角【文件】按钮,从弹出的界面中选择【新建】选项,系统会<em>打开</em>【新建】界面,在列表中选择【空白<em>工作簿</em>】选项,也可以新建一个空白工作...
如何使用VBA打开带有密码的Excel报表?
如题,另外问一下<em>如何</em><em>打开</em><em>带有</em><em>密码</em>的Access数据库?
如何直接打开EXCEL的文件?
各位大侠:最近我的EXCEL文件不能<em>直接</em><em>打开</em>,当我双击已建好的EXCEL文件时,就出现以下信息:"找不到文件"C:\MY DOCUMENTS\TEMP.XLS"(或它的组件之一).请确定路径和文件名是否正确,而且所需的库文件均可用."如果先<em>打开</em>EXECL程序,然后通过文件-><em>打开</em>,即可将指定的文件<em>打开</em>.请问该问提<em>如何</em>解决,谢谢!!!
vb用对话框打开excel
<em>打开</em>一个已有的<em>excel</em>是这个: rnSet objWorkBook = objExcel.Workbooks.Open("c:\1.xls") rn但是我想像<em>打开</em>文件一样<em>打开</em>一个文件夹,选择哪个硬盘,哪个文件,选择之后再<em>打开</em>,接着运行!怎么实现啊!类似用rndirvelistbox ,dirlistbox,filelistbox实现的文件访问!rn高手说的详细点,包括包含的控件!谢谢,好的追加分!rn安得<em>excel</em>2003
用OLE控制Excel如何选定工作簿
如题
如何使用ADO打开带有密码的ACCESS数据库
???
如何使用ADO打开带有密码的Access数据库?
请告知连接字符串。调试通过马上结贴!
vb6 如何打开带有密码的access2003的数据库?
<em>vb</em>6 <em>如何</em><em>打开</em><em>带有</em><em>密码</em>的access2003的数据库?
VB写入EXCEL的问题
VB<em>写入</em>EXCEL的问题rnrn读取一个文件内容为: rn"1 rn2 rn3 rn" rn当我<em>写入</em>EXCEL表中会出现A列下的 rn"1 rn2 rn3 rn" rn但我想下次再输入时候新数据在B列下 rn以下是我输入的代码,我想过用APPEND,但效果出来是在A列下继续写下去 rnDIM a(30) as string ,i as integer rnOpen App.Path & "\123.xls" For Output As #1 rna(i) = Text1.Text rnPrint #1, a(i)
VB写入excel问题
我想实现<em>写入</em>EXCEL的结果如下图。rn[img=https://img-bbs.csdn.net/upload/201412/24/1419408150_807387.jpg][/img]rn我现在的代码是[code=<em>vb</em>] Row = 3rn For a = 0 To List1.ListCount - 1rn rn If List1.Selected(a) Thenrn Row = Row + 1rn .Cells(Row, 1) = List1.List(a)rn .Cells(Row, 3) = "电缆框面积"rn .Cells(Row, 5) = "电缆总面积"rn .Cells(Row, 7) = "占有率"rn b = Filter(arr3, List1.List(a), True)rn For Each g In brn Row = Row + 1rn h = Split(g, ",")rn .Cells(Row, 1) = h(0)rn .Cells(Row, 2) = h(1)rn .Cells(Row, 3) = h(2)rn .Cells(Row, 4) = h(3)rn Nextrn rn End Ifrn Next[/code]rn最终结果是如下图[img=https://img-bbs.csdn.net/upload/201412/24/1419408233_85443.jpg][/img]rnrn请教高手,怎样实现第一张图的格式,先横写,在竖写。谢谢!
VB操作EXCEL写入
' SSOService Web service object steps login = WebService(&quot;SSOService&quot;).login(XMLWarehouse(&quot;SI_Login&quot;)) 'login= replace (login,&quot;&quot;,&quot;&quot;) ResFileName=DataTable(&quot;ResFileName&quot;,dtGlobalSheet) ResSheetNa...
byte数组直接new一个excel工作簿
情况:rn 已经在server端把<em>excel</em>文件的fileStream 保存到一个byte[] bt 中了rn 现在想在client端还原这个<em>excel</em>文件,并对其进行数据填充rn (现在的办法是先写回磁盘,再<em>打开</em>,编辑,另存)rn问题:rn <em>如何</em><em>直接</em>用bt 数组 作为数据源,<em>直接</em>new一个<em>excel</em><em>工作簿</em>,然后编辑?rn
VB如何打开WORD/Excel
想在VB中用个控件显示Word/Excel的内容,只读即可.rn在网上找了一个用OLE控件和WebBrowser为容器的程序,自已试过之后才发现OLE只能<em>打开</em>第一页,而WebBrowser在IE6下是可以的,但在IE7里就不能在WebBowser中加载,而是<em>直接</em>调出Office(我的Office是2007).rn请问有什么办法<em>直接</em>在VB的控件中显示完整的WORD/EXCEL内容?rn谢谢
vb中遍历当前已打开Excel工作簿名称
Dim wbk As Excel.WorkbookrnDim wbs As New ApplicationrnPrivate Sub Command1_Click()rnFor Each wbk In wbs.Workbooksrn MsgBox wbk.NamernNextrnEnd Subrn用以上代码初次运行时候可以正常返回当前已<em>打开</em>工作薄名称.. 但是现在又不行. 求帮忙解答下哪里除问题了.
C# 直接读取 excel工作簿数据代码
<em>直接</em><em>打开</em>Excel <em>工作簿</em> ,读取Excel中的数据
EXCEL保护Excel 工作簿
-
EXCEL共享Excel工作簿
-
Vsto Excel工作簿 如何关闭当前工作簿打开指定的工作簿
在vsto Excel程序里面调用winform程序,rnWinform窗体的按钮事件rnprivate void btnhtstyle_Click(object sender, EventArgs e)rn rn string name ="C:\\合同样式.xls"; rn Globals.ThisWorkbook.Close(false, Type.Missing, Type.Missing);rn //object filename = Globals.ThisWorkbook.Name;rn //Globals.ThisWorkbook.CloseWorkBook(filename);rn Globals.ThisWorkbook.OpenWorkBook(name);这句不执行,为什么?如果不执行close 方法就会报错rn }rn[color=#FF0000]rn错误:名为“ExcelWorkbook6.xls”的文档已经<em>打开</em>。不能同时<em>打开</em>同名文件,无论它们是否在同一文件夹中。rn要<em>打开</em>第二份文档,请关闭已经<em>打开</em>的文档,或者重新命名其中的一个文档。[/color]rnrnThisWorkBook.csrn//<em>打开</em>指定<em>工作簿</em>rn public void OpenWorkBook(string fileName)rn rn this.Application.Workbooks.Open(fileName,rn missing, missing, missing, missing, missing, missing, missing,rn missing, missing, missing, missing, missing, missing, missing);rn rn //关闭指定<em>工作簿</em>rn public void CloseWorkBook(object fileName)rn rn // object fileName = "ExcelWorkbook6.xls"; rn Excel.Workbook workbook = this.Application.Workbooks.get_Item(fileName);rn workbook.Close(false, missing, missing);rn rn我在vsto里面做自定义报表, 用户将Excel报表模板设计好,点击保存按钮保存为.xls文件,我再点击<em>打开</em>按钮时关闭当前<em>工作簿</em>,重新<em>打开</em>保存的<em>工作簿</em>并开始向<em>工作簿</em>里面<em>写入</em>数据…… 可是我关闭<em>工作簿</em>以后就无法<em>打开</em>指定名称的<em>工作簿</em>,该<em>如何</em>解决,请高手指点 如果不写关闭的话,就说存在相同的ExcelWookBook程序,无法<em>打开</em>
请问Excel工作簿有几种密码
我从网上下载了一个包含宏的Excel文件(下载地址为:http://asp.6to23.com/kevinzhou/download/list.asp?id=79),该文件的作者已经将宏的<em>密码</em>在文件中公开了,可是我<em>打开</em>该<em>工作簿</em>后却无法查看文件中的宏代码,每次当我在VBA工程资源管理器中试图<em>打开</em>该文件时都提示“工程锁定”、“工程不可看”,连让我输<em>密码</em>的机会都不给。rn该文档是没有<em>打开</em>权限和修改权限<em>密码</em>的,保护<em>工作簿</em>和工作表的<em>密码</em>根据作者的提示也被我解除了。rnrn无奈之下,我用VbaKey扫描后后提示如下信息:rnrnWorkbook password: [ZWGRAJMVBJVUYRV] (no brackets) rnWorkbook sharing password: no password is setrnFile-Open password: no password is setrnCreating backup copy:rnC:\WINDOWS\Desktop\DynChart.bakrnrnrnUpdating security...rnVBA Project password: [HZ4] (no brackets) rnrn请问上边的Workbook password: [ZWGRAJMVBJVUYRV]是什么<em>密码</em>?该<em>如何</em>使用?
excel工作簿保护密码忘了怎么办?
<em>excel</em>2007中,rnrn1、执行<em>工作簿</em>保护,输入<em>密码</em>,如下图所示rnrnrnhttp://club.<em>excel</em>home.net/forum.php?mod=viewthread&tid=820082&page=1&extra=#pid5604926rnrn2、隐藏窗口,如下图:rn[img=http://club.<em>excel</em>home.net/forum.php?mod=attachment&aid=MTA4MDUyMnwwNzBjYzc2YnwxMzI3ODI1NTI5fDEyNjMxNTJ8ODIwMDgy&noupdate=yes][/img]rnrnrnrnrn执行上述操作以后,如果<em>密码</em>忘记了,用什么方法可以清除掉原来的<em>密码</em>或者是可以找回原来的<em>密码</em>呢?试了好多方法都不行,最常见的方法是使用宏函数AllInternalPasswords(),论坛中有人提过的,但是对于隐藏窗口的<em>密码</em>保护运行不了这个函数,有哪位达人有好的方法或工具软件提供一个呗,谢谢了,rn邮箱:mafeng_8@163.comrnrn
excel工作簿密码的问题!
在<em>excel</em>中 工具-》保护-》保护<em>工作簿</em>rn这样添加的<em>密码</em>怎么没有用呢?(再次<em>打开</em>文件的时候没有用到<em>密码</em>)rnrn如果这种方法是错误的,怎么才能给文件添加<em>密码</em>?rnrn另外,对于已经有<em>密码</em>的<em>excel</em>文件,在<em>vb</em>中怎样写代码才能<em>打开</em>?rnrn谢谢了!
如何引用 vsto Excel工作簿
使用VS2008建了一个Excle<em>工作簿</em>项目, 我要在另一个 Asp.Net Web 应用程序中调用这个<em>excel</em><em>工作簿</em>,但是<em>直接</em>运行bin/debug目录下的 workBook.xls 无法加载sheet1 ,该怎么引用这个<em>工作簿</em>。。做excle导出
如何得到Excel的工作簿
我用ODBC、OLEDB方式都不能枚举Excel的<em>工作簿</em>名?rn
直接打开EXCEL文档
StringWriter sw = new StringWriter();rn HtmlTextWriter htw = new HtmlTextWriter(sw);rn this.dg_Test.RenderControl(htw);rn Response.ContentType = "appliction/ms-<em>excel</em>";rn Response.AddHeader("ContentDisposition", "online;test.xls");rn Response.ContentEncoding=System.Text.Encoding.GetEncoding("utf-8");  rn Response.Write(sw.ToString());rnrnrn这样的代码,运行后还是提示下载文档。为什么不能<em>直接</em>在线<em>打开</em>?
jsp 直接打开excel
response.setContentType(&quot;application/vnd.ms-<em>excel</em>&quot;); File file =new File(&quot;D:/test.xls&quot;); FileInputStream in=new FileInputStream(file); byte[] buffer=new byte[in.available()]; in.read(buffer); response...
VB生成EXCEL报表后如何直接打开
就是将数据库记录导入到EXCEL文件后可以<em>直接</em><em>打开</em>,不用在EXCEL里面<em>打开</em>,请部这条语句<em>如何</em>写啊
vb怎样直接写入显存?
我想做个滚动字幕,要可以叠加在正在播放的视频画面上。rn怎样才可以实现呢?
请教:用ADO直接打开EXCEL的问题。
在读取某一数值类型的列时,如果第一行的该列值为空(实际应为0,但文件中以空白表示),则后面的所有该列值读出来都为空;如果把第一行的该列值补上数字,则读出的数据正确无误。请问,这是什么问题?谢谢!
直接用数据连接打开excel文件
如题,急,解决问题马上结
使用工作区一次打开多个Excel工作簿
许多人在使用Excel时,可能会同时使用多个<em>工作簿</em>进行工作。每次开机时,如果按普通的方法将这几个<em>工作簿</em>一个一个地<em>打开</em>,特别是当这些<em>工作簿</em>分散于不同的分区或不同的文件夹中时,这项工作就会比较费劲,日久天长,自然不胜其烦。   其实,使用工作区,可以实现一次性<em>打开</em>多个Excel<em>工作簿</em>,下面介绍具体的操作方法。   一、在工作区中保存<em>工作簿</em>   1、先将所有平时工作要用的工作...
Excel VBA--保存与打开启用宏的工作簿
用幽默有趣的讲课方式让初学者了解Excel VBA的强大之处,轻松学习VBA的使用,并结合工作中的案例讲解让Excel使用者学会利用VBA来简化工作,减少重复操作
菜鸟求助,vb如何写入excel指定位置
<em>vb</em><em>如何</em><em>写入</em><em>excel</em>指定位置,求个简单的代码。谢谢
关于excel打开密码
怎样通过程序创建一个<em>excel</em>文件,并设置一个<em>打开</em><em>密码</em>?rnrn谢谢!
VB将密码写入加密狗
VB6.0将<em>密码</em><em>写入</em>加密狗,一个加密与解密相关的程序,测试前请先插入加密狗,否则程序报错,有可能佳死。
excel vb access 密码
1 准备把Excel中1张表格的内容导入到一个有<em>密码</em>数据库的一张表中,求源码。rn 例如:rn 数据库名称:NICE.mdbrn 数据库<em>密码</em>:123456rn 数据库表:tbl_inforn 数据库表字段:name,age,sexrnrn <em>excel</em>文件名称:backrn 表中内容:rn 第一列 第二列 第三列rn 第一行 姓名 年龄 性别 rn 第一行 a b crn
excel 用poi设置打开密码
2019独角兽企业重金招聘Python工程师标准&gt;&gt;&gt; ...
vb打开EXCEL(vb 路径 Excel路径)
Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Private Const FileName = "\<em>vb</em><em>打开</em>EXCEL.xls" Private Sub CommandButton1_Click() Call UserForm_Initialize End Sub 'Private Sub Form_Load()
excel 写保护问题
asp.net 将数据写到<em>excel</em>表里,然后输出下载。现在碰到的问题是:在客户日常使用中经常会(不是每次 大概10-20%的概率)产生一个6kb的只读<em>excel</em>(删除的时候,提示文件正在被另一程序占用),因为同张表,我是用同一命名的 程序是先删后重新生成<em>excel</em>表的方式。在调试环境下 没这个问题,会不会是用户权限的问题啊,rn 请大侠们赐教!
SOS,如何破解EXCEL 2007工作簿密码呀?
[b][color=#FF0000][size=20px]如图,<em>密码</em>忘记了,网上找了很多方法都不行。rnrn还有解不?求高人。谢谢。[/size]rn【/color][/b]rnrn[img=https://img-bbs.csdn.net/upload/201507/11/1436596388_858607.jpg][/img]
请教关于打开带有密码的Excel文档问题...
再Visual Basic里,可以这样写,rnSet xlapp = CreateObject("Excel.Application")rnxlapp.Visible = Truernxlapp.Workbooks.Open FileName:="d:\chb.xls", password:="123456"rnrnrn到powerbuild里,该怎么样写呢?研究了好一会,搞不定呢,请大家帮个忙...rn谢谢!
用POI写入Excel
import java.io.FileOutputStream;import java.io.IOException;import java.util.Date;//  poi-bin-2.5.1-final-20040804.zip import org.apache.poi.hssf.usermodel.HSSFCell;import org.apache.
Excel 写保护方法
仅针对Excel2003格式,即***.xls 方法: 1\<em>打开</em>文件 2\工具---宏----录制新宏---输入名字如:aa 3\停止录制(这样得到一个空宏) 4\工具---宏----宏,选aa,点编辑按钮 5\删除窗口中的所有字符(只有几个),替换为下面的内容:(复制吧) 6\关闭编辑窗口 7\工具---宏-----宏,选AllInternalPasswords,运行,确定两次,
vb如何直接打开txt文件???/??
我在程序中写了Function LookFile() '参看已有记录rn On Error GoTo err:rn Dim Filename As Stringrn LookCommonDi.Filter = "txt|*.txt|所有文件|*.*"rn LookCommonDi.Action = 1rn Filename = LookCommonDi.Filenamern Exit Functionrnerr:rnEnd Functionrn想<em>直接</em><em>打开</em>txt文件来查看,可是不行,在form里面放数据有太麻烦,rn请问怎样可以象windows里面一样<em>直接</em><em>打开</em>txt文件
请问pb如何直接打开Excel文件?
请问pb<em>如何</em><em>直接</em><em>打开</em>Excel文件?rn用run("c:\file1.xls")函数或者用api函数shellexecute()rn
如何直接打开网页上的EXCEL文档
能不能不让IE询问是<em>打开</em>还是保存rn而<em>直接</em>让用户<em>打开</em>rn或者有没有什么组件,可以在ASP中调用<em>excel</em>文档显示?
如何直接让IE打开Excel文件
Response.AppendHeader("Content-Disposition", "inline;filename=" + FileName);rnResponse.ContentType = "application/vnd.ms-<em>excel</em>";rnResponse.WriteFile(FileName, StartPos, FileSize);rnrn这样做了,为什么IE还是询问是否<em>打开</em>或保存,而不是<em>直接</em><em>打开</em>文件呢?
excel 写入打开问题
Excel.Application xapp = new Excel.Application();rn string <em>excel</em>filepath = Server.MapPath("~/SysManager/template.xls");rn Excel.Workbook xbook = xapp.Workbooks._Open(<em>excel</em>filepath, Missing.Value, Missing.Value,rn Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value,rn Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);rnrn Excel.Worksheet xsheet = (Excel.Worksheet)xbook.Sheets[1];rnrn Excel.Range rng2 = xsheet.get_Range("A4", Missing.Value);rn rng2.Value2 = "10";rnrn Excel.Range rng3 = xsheet.get_Range("B4", Missing.Value);rn rng3.Value2 = "20";rnrn xbook.SaveAs(Server.MapPath("~/SysManager/template.xls"), Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value,rn Excel.XlSaveAsAccessMode.xlNoChange, Missing.Value, Missing.Value, Missing.Value, Missing.Value, Missing.Value);rnrnrnrnrn Excel.Application <em>excel</em> = new Excel.Application(); //引用Excel对象 rn Excel.Workbook book = <em>excel</em>.Application.Workbooks.Add(Server.MapPath("~/SysManager/template.xls"));rn //引用Excel<em>工作簿</em> rn <em>excel</em>.Visible = true; //使Excel可视 rnrnrnrn为什么saveas会报<em>excel</em>只读文件呢?rn
在VB操作Excel时,如何遍历工作簿中的工作表?
在VB操作Excel时,<em>如何</em>遍历<em>工作簿</em>中的工作表,并将每张工作表的名字显示出来?rnrn[code=<em>vb</em>]rnrn Set xlAppFilter = CreateObject("Excel.Application") '创建EXCEL应用类rn Set xlBookFilter = xlAppFilter.Workbooks.Open(strFileNameForFilter)rn xlBookFilter.Activatern Dim i, Count As Integerrn Count = xlBookFilter.Sheets.Countrn rn For i = 1 To Countrn‘以下这句是错的,应该怎样写才是对的呢?rn xlSheetsFilter = xlBookFilter.Sheets.Select(i)rn msgbox xlSheetsFilter.Namern r = r + 1rn rn Nextrn rn xlBookFilter.Close (True)rn Set xlSheetFilter = Nothingrn Set xlBookFilter = Nothingrn xlAppFilter.Quit '关闭EXCEL应用类rn Set xlAppFilter = Nothing '释放EXCEL应用类rn[/code]rn
vb打开excel的问题
Public DataExcelFile As Excel.ApplicationrnPublic DataWorkBook As Excel.WorkbookrnPublic DataBaseSheet As Excel.WorksheetrnPublic DataInputSheet As Excel.WorksheetrnPublic DataOutput1Sheet As Excel.WorksheetrnPublic DataOutput2Sheet As Excel.WorksheetrnPublic DataOutput3Sheet As Excel.WorksheetrnPublic DataOutput4Sheet As Excel.Worksheetrn。。。。。rnrn很长的代码 前几行是这样的 一运行就提示说“用户定义类型未定义” 我确定已经引用了“Microsoft Office 12.0 Object Library” 为什么还出现这种情况啊rnwin7+VB6.0+OFFICE 07
怎样用vb打开Excel
怎样用<em>vb</em><em>打开</em>Excel 用EXCEL对象读取EXCEL文件中数据.然后通过ADODB连接SQL进和导入 下面是EXCEL对象的详解
VB打开EXCEL的方法
★VB<em>打开</em>EXCEL的方法 一楼的没有指明 Dim xlBook As Excel.WorkBook Set xlBook = App.Workbooks.Open("文件名") 这种语法同样要求<em>excel</em>已经存在才能操作。 Public xlApp As Excel.Application Public xlBook As Excel.Workbook Public xlChar
VB打开Excel的问题!
请问我想用VB<em>打开</em>做好的EXCEL时,我想<em>打开</em>的是sheet2用VB怎么做!rn 还有就是用SQL语句怎么写返回一个数据库的所有表名!rn 谢谢大家了!!!
vb打开excel
Dim objExcel As Excel.Application rnDim objWorkBook As Excel.Worksheet rnrnSet objExcel = CreateObject("<em>excel</em>.application") rnSet objWorkBook = objExcel.Workbooks.Open("d:\1.xls") rnobjExcel.Visible = True rnrn'设置活动工作表 rnDim objSheet As Excel.Worksheet rnSet objSheet = objExcel.Worksheets("sheet1") rnrn为什么这一句Set objWorkBook = objExcel.Workbooks.Open("d:\1.xls") rn总是提示类型不匹配 rn我想<em>打开</em>已经存在的<em>excel</em>
VB6如何控制当前打开的EXCEL的工作簿间的切换?
VB6<em>如何</em>控制当前<em>打开</em>的EXCEL的<em>工作簿</em>间的切换?rnEXCEL文件一直<em>打开</em>着,我现在想实现这样的功能:每隔10秒把当前页面在Sheet1和Sheet2之间切换,请问能用VB6做到吗?
vb读取写入导出excel
test()   '从"工程"菜单中选择"引用"栏;选择Microsoft Excel 9.0 Object Library(EXCEL2000)   Dim xlApp As Excel.Application   Dim xlBook As Excel.Workbook   Dim xlSheet As Excel.Worksheet      '-----------------
vb调用存储过程写入excel!!!!!
如果使用存储过程,我怎末写sql调用语句?使用存储过程时,在窗体里怎末调用这样的结果集?rnrnrn还有,要是用特别长的sql查询语句,或是用了declare @sdate datetimerndeclare @edate datetimerndeclare @n datetimernrnset @n=getdate()rnrnwhile datename(weekday,@n)!='Wednesday'rnbeginrn set @n=dateadd(day,-1,@n)等等这样的语句,,还能用一般的rs.exute(sql)这样的方法吗?
vb读取access数据库写入excel
情况说明:rn 1、ACCESS数据库(user.mdb):表名:newuser 字段名:姓名 电话 联系地址rn 2、已经定义好格式的<em>excel</em>表格(即<em>excel</em>模版,文件名model.xls)rn需要实现的功能:点击VB的导出按钮,需要user.mdb中表newuser中字段“姓名”“电话”“联系地址”的值<em>写入</em>model.<em>excel</em>的range("C3")、range("C4")range("C4")中,并存到指定的路径下。rn 请高手指点。谢谢
vb打开加密的excel文件????
Private Sub Command1_Click()rnSet ex = CreateObject("Excel.Application")rn Set exwbook = Nothingrn Set exwbook = ex.Workbooks.Open(Trim("e:\book1.xls"))rnend subrnrn这样可以<em>打开</em>book1.xls,但是还得输入他的<em>密码</em>(比如是"123")后才能进入,rn<em>如何</em>让它自动<em>打开</em>啊????
大家知道用vb如何直接调用excel预览吗 ?
我用<em>vb</em>制作了个报表输出,是用<em>excel</em>输出的,我想<em>直接</em>调用<em>excel</em>预览界面,即使关闭<em>excel</em>预览界面也不出现<em>excel</em>主界面,能实现吗?
vb打开word,能不能不用open,而直接写入文件流
我现在遇到一个问题rn<em>vb</em><em>打开</em>一个word程序,再<em>打开</em>doc文件是没有问题rn可是我的这个文件是从服务器获取的,而且获取的数据需要在本地解密才行rn解密后的内容 就是word文档的内容rnrn能不能把 这个解密后的内容 以流的形式 <em>直接</em> 加载到<em>打开</em>的word程序呢?(为保密,不能生成本地文件,需要在内存中完成操作)rn
多个excel工作簿合并到一个工作簿
现在有一个<em>excel</em>的需求,需要把各个<em>工作簿</em>中的表复制到一个<em>工作簿</em>中,使用的<em>vb</em>a脚本rn[code=<em>vb</em>]rnSub MergeWorkbooks() rn Dim FileSet rn Dim i As Integer rn rn On Error GoTo 0 rn Application.ScreenUpdating = False rn rn FileSet = Application.GetOpenFilename(FileFilter:="Excel 2003(*.xls),*.xls,Excel 2007(*.xlsx),*.xlsx", _ rn MultiSelect:=True, Title:="选择要合并的文件") rn rn If TypeName(FileSet) = "Boolean" Then rn GoTo ExitSub rn End If rn rn For Each Filename In FileSet rn Workbooks.Open Filename rn Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count) rn Next rn rnExitSub: rn Application.ScreenUpdating = True rn rnEnd Subrn[/code]rn现在有一个问题是,它把<em>工作簿</em>中的所有表都复制到了一个文件中,怎么只复制各<em>工作簿</em>中的第一个工作表。该怎么改良<em>vb</em>a脚本
如何快速的合并多个 Excel 工作簿成为一个工作簿
1、新建一个工作薄,将其命名为你合并后的名字。 2、<em>打开</em>此工作薄。 3、在其下任一个工作表标签上点击右键,选择“查看代码”。 4、在<em>打开</em>的VBA编辑窗口中粘贴以下代码: Sub 工作薄间工作表合并() Dim FileOpen Dim X As Integer Application.ScreenUpdating = False FileOpen = Application.GetOp...
请问是用OLEDB打开EXCEL,如何设置密码
private string GetConnectionString(string fileName)rn rn //xls文件的连接字符串rn string connectString =rn @"Provider=Microsoft.Jet.OLEDB.4.0;" +rn @"Data Source=" + fileName + ";" +rn @"Extended Properties=" + Convert.ToChar(34).ToString() +rn @"Excel 8.0;" + Convert.ToChar(34).ToString();rn rn return connectString;rnrn rnrn请问<em>如何</em>在连接串设置<em>密码</em>?
vb如何连接有设有密码excel
<em>vb</em><em>如何</em>连接有设有<em>密码</em>的<em>excel</em>
规则引擎--Excel工作簿
在实际的业务场景中,很多地方可能都需要把各个地方的数据经过处理后导出到Excel文件中作为报表等供部门和领导来对数据进行分析        复制导出excle文件     1:在规则工程下面创建规则包   并将其命名为“Excel工作薄”,显示如下:   将“Excel工作薄”规则包点开,点击对象库,选择菜单项“添加Excel工作薄”如下图:     在弹出的对话框中点击...
创建新的excel工作簿
通过创建一个按钮来建立一个新的<em>excel</em><em>工作簿</em>的小程序,共初学者入门使用
数字信号处理题解 胡广书 matlab程序下载
其中,子目录《数字信号处理题解及电子课件》_MATLAB程序包含了完成该书的习题参考答案时所用到的MATLAB程序,直接运行这些程序可给出相应习题参考解答的结果。用MATLAB编写的程序的名称由“ex”开头,接下来是所在的章、习题序号及该习题中MATLAB程序的序号,如ex_01_06_1,指的是第1章第6题的第1个程序。 相关下载链接:[url=//download.csdn.net/download/jiaoyang822/2332695?utm_source=bbsseo]//download.csdn.net/download/jiaoyang822/2332695?utm_source=bbsseo[/url]
java计算器代码下载
java计算器代码java计算器代码java计算器代码java计算器代码java计算器代码java计算器代码java计算器代码java计算器代码java计算器代码 相关下载链接:[url=//download.csdn.net/download/wander_100/3263718?utm_source=bbsseo]//download.csdn.net/download/wander_100/3263718?utm_source=bbsseo[/url]
LCD实例,可以仿真下载
LCD12864液晶驱动显示 51单片机 Proteus仿真 相关下载链接:[url=//download.csdn.net/download/wanghf888/4673671?utm_source=bbsseo]//download.csdn.net/download/wanghf888/4673671?utm_source=bbsseo[/url]
我们是很有底线的