1. vb怎么读取excel中的数据
首先需要知道你要引用的数据在Excel中的位置,然后在VB里面引用Excel,
然后打开Excel文件读数据
Dim scxls As Excel.Application
Dim scbook As Excel.Workbook
Dim scsheet As Excel.Worksheet
‘Set scxls = CreateObject("excel.application")
‘Set scbook = scxls.Workbooks.Add
Set scbook = scxls.Workbooks.open("c:\1.xls")
Set scsheet = scbook.Worksheets(1)
‘scsheet.Cells(1, 2) = "1111" ’写入数据
a=scsheet.Cells(1, 2) '读取数据
Set scbook = Nothing
Set scxls = Nothing
‘scxls.Visible = True ’显示Excle
数据较多,且有规律可循时,请使用循环语句
2. vb 获取excel单元格数据
首先需要知道你要引用的数据在Excel中的位置,然后在VB里面引用Excel,然后打开Excel文件读数据Dim scxls As Excel.ApplicationDim scbook As Excel.WorkbookDim scsheet As Excel.Worksheet‘Set scxls = CreateObject("excel.application")‘Set scbook = scxls.Workbooks.AddSet scbook = scxls.Workbooks.open("c:\1.xls"
)Set scsheet = scbook.Worksheets(1)‘scsheet.Cells(1, 2) = "1111" ’写入数据a=scsheet.Cells(1, 2) '读取数据Set scbook = NothingSet scxls = Nothing‘scxls.Visible = True ’显示Excle数据较多,且有规律可循时,请使用循环语句
3. vb从文件中读取数据
把下面的代码放在模块里,改下文件夹名称,另外要把工作簿与文件夹放在同一目录里,然后运行
Sub 提取文件名作目录()
Dim myPath As String
Dim n As Integer
Dim myFile As String
‘把工作簿与文件夹放在同一目录里
myPath = ThisWorkbook.Path & “\” & “文件夹名称”
n = 1
myFile = Dir(myPath & "\*.*")
Do While myFile <> ""
Cells(n, 1) = myFile
myFile = Dir '找寻下一个文件
n = n + 1
Loop
End Sub
4. vb中读取excel中的数据
具体设置参数如下:sub dayin()Application.ActiveSheet.PrintOut copies:=1end sub这是打印当前的工作表 打印一份如果是打印当前工作薄中的工作表Excel.ActiveWorkBook.PrintOut(1,Excel.WorkSheets.count,1,.T.) 带参数的打印参数说明:共四个参数参数1-数值:当前工作簿中进行打印的起始工作表号(默认1)参数2-数值:当前工作簿中进行打印的结束工作表号(默认最末)参数3-数值:打印份数(默认1)参数4-逻辑值:是预览打印还是直接打印:.T.-预览打印,.F.-直接打印(默认.F.)Excel.ActiveSheet.PrintOut() 参数说明:共八个参数 参数1-数值:起始页号,省略则默认为开始位置参数2-数值:终止页号,省略则默认为最后一页参数3-数值:打印份数,省略则默认为1份参数4-逻辑值:是否预览,省略则默认为直接打印(.F.)参数5-字符值:设置活动打印机名称,省略则为默认打印机参数6-逻辑值:是否输出到文件,省略则默认为否(.F.),若选.T.且参数8为空,则Excel提示输入要输出的文件名参数7-逻辑值:输出类型,省略则默认为(.T.)逐份打印,否则逐页打印参数8-字符值:当参数6为.T.时,设置要打印到的文件名Excel.ActiveSheet.PrintOut(1,3,6,.F.,"MyPrinter",.F.,.T.,,) 从1页打印到3页,打印6份,通过MyPrinter打印机来打印,并且,要逐份打印。
5. vb向excel写入数据
我知道两个方法。
1、如果EXCEL数据不多可以用这个方法。workbooks.open(“路径")打开EXCEL,再逐个的用INSERT语句导入到ACCESS里面。
2、就是EXCEL本身也是一个数据库,第一行是字段,用连接数据库的方式连接EXCEL直接一条SQL导入到SQL。这对格式有点要求,就是第一行必须是字段,数据比较整齐。
6. vb对excel数据进行提取 运用
将单元格所选单元格的行号和列号,分别用VBA显示在下面的两个单元格
按下Alt+F11,打开VBA编辑界面,选择当前工作表编写代码
下面代码是得到当前单元格的行号并放到当前单元格下一个单元格中
下面代码是得到当前单元格的列号并放到当前单元格下面第二个单元格中
代码编写完成,点击运行子过程按钮(或按下F5)
返回Excel中,就可以看到得到了当前单元格的行号和列号
7. vb6读取excel中内容
一般的编程语言,比如C和VB都可以做彩票程序。C语言上手比较难,但开发出来的程序一般运行速度比较快;VB6上手简单,开发的程序经过优化后也可以达到C程序的速度。都支持excel和读取网站数据。
8. vb6.0读取excel
Excel里的VBA是Visual Basic的一种宏语言。VBA是微软开发出来在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。主要能用来扩展Windows的应用程序功能,特别是Microsoft Office软件。也可说是一种应用程式视觉化的Basic 脚本。
掌握了VBA,可以发挥以下作用:
1.规范用户的操作,控制用户的操作行为;
2.操作界面人性化,方便用户的操作;
3.多个步骤的手工操作通过执行VBA代码可以迅速的实现;
4.实现一些VB无法实现的功能。
5.用VBA制做EXCEL登录系统。
6.利用VBA可以Excel内轻松开发出功能强大的自动化程序。
扩展资料:
宏语言VBA 适用于在Office 2000 中的所有应用程序,包括Word 、 Excel、PowerPoint、Access、Outlook 以及Project。在Office 97 的各应用程序中,新增了Visual Basic 编辑器。这样,用户无论是在Excel 中,还是在Word 中以至是在Access 中建立和管理VBA 都具有统一的方法和标准。
VBA可以访问许多操作系统函数并支持文档打开时自动执行宏。这使得用这种语言写计算机病毒成为可能。1990年代中后期,宏病毒成为了最流行的计算机病毒类型之一。其它的包括宏语言的项目,如OpenOffice.org,故意从其宏语言中排除了一些功能(如:自动执行)以避免破坏程序。然而,这一特性在很多事务中受到欢迎。
VBA 是基于Visual Basic 发展而来的,它们具有相似的语言结构。Visual Basic 是Microsoft 的主要图形界面开发工具,VBA 5.0 (亦即VBA 97)则是Visual Basic 5.0 的子集。Visual Basic 是由Basic 发展而来的第四代语言。Visual Basic 作为一套独立的 Windows 系统开发工具,可用于开发Windows 环境下的各类应用程序,是一种可视化的、面向对象的、采用事件驱动方式的结构化高级程序设计语言。它具有高效率、简单易学及功能强大的特点
- 相关评论
- 我要评论
-