Excel表格网

vb导出excel报表(vb输出excel表格)

来源:www.0djx.com  时间:2022-10-13 17:10   点击:86  编辑:表格网  手机版

1. vb输出excel表格

最简单的方法:先用 Excel做报表,然后导入access(最好设置密码),利用access中的转换工具将报表转换成97版(我用的是access2003版本,没转换的话涉及到vb6.0sp6)。

然后在vb中添加一个data和一个dbgrid以及数个command和text,利用data添加报表,利用dbgrid显示报表,利用text的DataSource 属性来添加和更改报表,最后是调用excel来作报表预览和打印(唉......知识有限,我就知道这么多了)

2. vb显示excel表格内容

是不是输出时候被损坏

3. vba获取excel单元格内容

a=activecell.Row-3b=activecell.Column-2i=activecell.Row-3里面的数值2、3是根据B3指定的i跟a的含义应该是一样的吧

4. vb生成word表格

首先引用Microsoft Word 12.0 Object,具体版本根据你组的哪个office版本Dim wApp As Word.ApplicationDim wDoc As Word.DocumentSet wApp = New Word.ApplicationSet wDoc = wApp.Documents.Open(cDocName)上面是定义和打开Word文件赋值:wDoc.Shapes(i).TextFrame.TextRange.Text = Trim(Text5.Text)在那个打开的word文档中,预先加入多个文本框,上面是给其中某个文本框赋值wDoc.SaveAs tmpNamewDoc.ClosewApp.QuitSet wApp = Nothing这个是另存为和退出

5. vb格式输出

vb format函数

格式输出Format函数

Format函数用于制定字符串或数字的输出格式。

语法:x = Format (expression, fmt )

     expression是所输出的内容。fmt是指输出的格式,这是一个字符串型的变量,这一项若省略的话,那么Format函数将和Str函数的功能差不多。如:

语句

输出

Format (2, “0.00”)

2.00

Format (.7, “0%”)

70%

Format (1140, “$#,##0”)

$1,140

fmt字符的意义

字符

意义

字符

意义

0

显示一数字,若此位置没有数字则补0

.

小数点

#

显示一数字,若此位置没有数字则不显示

,

千位的分隔符

%

数字乘以100并在右边加上”%”号

- + $ ( )

这些字出现在fmt里将原样打出

Format函数对时间进行输出时的意义

fmt

输出

fmt

输出

m/d/yy

8/16/96

h:mm:ss a/p

10:41:29 p

d-mmmm-yy

16-August-96

h:mm

22:41

d-mmmm

16-August

h:mm:ss

22:41:29

mmmm-yy

august-96

m/d/yy h:mm

8/16/96 22:41

hh:mm AM/PM

10:41 PM

VB Format函数使用方法

返回 Variant (String),其中含有一个表达式,它是根据格式表达式中的指令来格式化的。

语法

Format(expression[ format[ firstdayofweek[ firstweekofyear]]])

Format 函数的语法具有下面几个部分:

部分

说明

expression

必要参数。任何有效的表达式。

format

可选参数。有效的命名表达式或用户自定义格式表达式。

firstdayofweek

可选参数。常数,表示一星期的第一天。

firstweekofyear

可选参数。常数,表示一年的第一周。

设置值

firstdayofweek 参数有下面设置:

常数

说明

vbUseSystem

0

使用 NLS API 设置。

VbSunday

1

星期日(缺省)

vbMonday

2

星期一

vbTuesday

3

星期二

vbWednesday

4

星期三

vbThursday

5

星期四

vbFriday

6

星期五

vbSaturday

7

星期六

firstweekofyear 参数有下面设置:

常数

说明

vbUseSystem

0

使用 NLS API 设置。

vbFirstJan1

1

从包含一月一日的那一周开始(缺省)。

vbFirstFourDays

2

从本年第一周开始,而此周至少有四天在本年中。

VbFirstFullWeek

3

从本年第一周开始,而此周完全在本年中。

说明

格式化

作法

数字

使用预先定义的命名数值格式或创建用户自定义数值格式。

日期和时间

使用预先定义的命名日期/时间格式或创建用户自定义日期/时间格式。

日期和时间序数

使用日期和时间格式或数值格式。

字符串

创建自定义的字符串格式。

6. vb 获取excel单元格数据

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If TypeName(Target.Value) = "String" Then

MsgBox "该单元格的值是字符串类型"

ElseIf IsNumeric(Target.Value) Then

MsgBox "该单元格的值为数字类型"

ElseIf IsDate(Target.Value) Then

MsgBox "该单元格的值为日期类型"

Else

MsgBox "该单元格的值为未知类型"

End If

End Sub

7. vb调用excel数据后,怎么使用

电脑上新建Excel文件,例如命名为“Excel 工作表”~!!!

双击“Excel 工作表”,打开excel文件~!!!

键盘上按下Alt+F11,即可弹出VB的编程界面

VB编程界面的上方就是工具栏,和一般工具栏分布一样

VB编程界面的左上方就是所有Sheet的列表

VB编程界面的左下方就是某一Sheet的详细信息

VB编程界面的正中间就是编程的主要区域

8. vb生成excel表格

测试成功,原码:DimxlappAsExcel.Application'Excel对象DimxlbookAsExcel.Workbook'工作簿DimxlsheetAsExcel.Worksheet'工作表DimxlrangeAsExcel.rangePrivateSubCommand1_Click()Setxlapp=CreateObject("excel.application")'第一层Setxlbook=xlapp.Workbooks.Addxlapp.Visible=Truexlbook.sheets(1).range("a1")="新建成功"xlbook.SaveAsApp.Path&"/测试.xls"xlbook.CloseEndSub

9. vb调用excel打印

、在工程中引用Microsoft Excel类型库:从"工程"菜单中选择"引用"栏;选择Microsoft Excel 9.0 Object Library(EXCEL2000),然后选择"确定"。表示在工程中要引用EXCEL类型库。

2、在通用对象的声明过程中定义EXCEL对象:Dim xlApp As Excel.ApplicationDim xlBook As Excel.WorkBookDim xlSheet As Excel.Worksheet3、在程序中操作EXCEL表常用命令:

Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象Set xlBook = xlApp.Workbooks.Open("文件名") '打开已经存在的EXCEL工件簿文件xlApp.Visible = True '设置EXCEL对象可见(或不可见)

Set xlSheet = xlBook.Worksheets("表名") '设置活动工作表xlSheet.Cells(row, col) =值 '给单元格(row,col)赋值xlSheet.PrintOut '打印工作表xlBook.Close (True) '关闭工作簿xlApp.Quit '结束EXCEL对象Set xlApp = Nothing '释放xlApp对象这是我收藏的,你试一下

10. vb表格录入数据

你的vb没vb5db.dll这个东西,你只要去网上搜索这个,然后把它下载下来复制到vb的文件夹目录里就ok了

11. vb操作excel文件

excle中的vb编程入门,其实就是VB语言,并无差别。您只需要学习VB即可,买一本"VB由入门到精通"的书籍,跟着书上一章一章的学习,就可以实现VB的入门了。

顶一下
(0)
0%
踩一下
(0)
0%
相关评论
我要评论
用户名: 验证码:点击我更换图片