excel表格怎么输入vb

1.excel中怎么进入VB界面

打开Excel界面，点击最左上方的开始圆形按钮，找到Excel选项，点击进入。

进入Excel选项后，点击常用选项卡，勾选“在功能区显示“开发工具”选项卡”，点击确定。

返回Excel主界面后，选项卡处便多了一项开发工具，点击该选项卡，便可以看到与其相关的功能，之后点击Visual Basic，按钮，便进入了VBA编辑窗口啦。

其实还有一个更简单的快捷键方法，那就是同时按住键盘的“ALT+F11”，也会出现VBA编辑窗口。

2.如何将Excel嵌入到VB中

1.部件-添加-可插入对象--选择excel 表格就可以在窗体添加该表格控件

2.工程-引用-Microsoft Excel 11.0 Object Library

下面给个简单的例子

Private Sub Command1_Click()

Dim xlExcel As Excel.Application

Dim xlBook As Excel.Workbook

Dim xlSheet As Excel.Worksheet

Dim AppExcel As Object

Set xlExcel = CreateObject("Excel.Application")

xlExcel.Workbooks.Open "C:\test.xls"

Set xlBook = xlExcel.Workbooks("test.xls")

Set xlSheet = xlBook.Worksheets(1)

Text1.Text = xlSheet.Cells(1, 1).Value

Text1.Text = Text1.Text & "ADD"

xlSheet.Cells(1, 1).Value = Text1.Text

Application.DisplayAlerts = False

xlBook.Close SaveChanges:=True

Application.DisplayAlerts = True

End Sub

3.在EXCEL中怎么导入VB,在VB中EXCEL怎么应用 搜狗问问

Private Sub Form_Load()

Set XlApp = CreateObject("Excel.Application")

XlApp.Workbooks.Open App.Path & "\123.xls" '文件位置

For i = 1 To XlApp.Workbooks(1).Worksheets(1).UsedRange.Rows.Count ' 从第一行到尾行

List1.AddItem XlApp.Workbooks(1).Worksheets(1).Cells(i, 1).Text

Next

XlApp.Quit

End Sub

4.把excel中的数据导入到VB中

在VB中要想调用Excel，需要打开VB编程环境“工程”菜单中的“引用”项目，并选取项目中的“MicrosoftExcel 11.0 object library”项。由于你的Excel版本不同，所以这个选项的版本号也是不同的。

因为EXCEL是以层次结构组织对象的，其对象模型中含有许多不同的对象元素。

第一层：Application对象，即Excel本身；

第二层：workbooks对象集，指Excel的工作簿文件

第三层：worksheets对象集，表示的是Excel的一个工作表；

第四层：Cells和Range对象，指向Excel工作表中的单元格。

Dim xlapp As Excel.Application 'Excel对象

Dim xlbook As Excel.Workbook '工作簿

Dim xlsheet As Excel.Worksheet '工作表

Set xlapp = CreateObject("Excel.Application") '创建EXCEL对象

Set xlbook = xlapp.Workbooks.Open("D:\data.xls") '打开已经存在的data.xls工件簿文件

xlapp.Visible = True '设置EXCEL对象可见（或不可见）

Set xlsheet = xlbook.Worksheets(1) '设置活动工作表''

''~~~当前工作簿的第一个表，这里也可以换成“表名”比如“Sheet1”

【数组部分自行定义】

将表中某个单元格中的值赋值给一个变量，比如数组中的一个元素

arr(1,1)=xlsheet.Range("B2").Value

……

最后关闭：

xlbook.Close

xlapp.quit

然后把三个对象 Set成 nothing