vb输入到excel中

VB如何将内容输入excel表格，急！~

在excel表格使用求和公式：
=SUM(D3:AH3)
效果如下：

如果你是用VBA，可以录制宏，先开始录制，然后点菜单栏插入图片，再停止录制

以此为例，在Excel中调用VBA程序的操作步骤如下（Excel2007为例）：

1.选择”开发工具“选项卡，点击”Visual Basic“（或者用快捷键Alt+F11）。

2.出现VBA编辑界面，注意看左侧，选择需要运行代码的工作表，此例为Sheet1；双击进入Sheet1相关程序编辑界面。

3.在程序编辑区域，复制上上述代码。

4.点击上面的三角号，运行程序。

5.关闭VBA界面，返回工作表，就可以看到程序运行结果，如下图：

6.如果再次运行程序，可以用快捷键Alt+F8（或者步骤1中的”宏“），出现如下图界面，选择要运行的宏，点击执行即可。

dim r as long
dim xls as new excel.application
dim st as excel.sheet
st= xls.workbooks.add("你要导出的文件").add
dim s as string
do
r=r+1
s =st.cells(r,1)
if len(s)=0 then exit do
loop

st.cells(r,1).value = text1.text

直接复制、粘贴

不知所云嘿嘿~

---

临桂县17864239586： vb界面输入的数据如何到excel表中 - ？
再府多潘： Excel里按Alt+F11打开Vb编辑器,在里面可以建一个窗体,放入文本框,通过程序来赋值,如sheets(＂sheet1＂).range(＂a1＂).value =11.

临桂县17864239586： VB的数据如何导入到excel中去 - ？
再府多潘： 首先要引用Microsoft.Excel 11.0 Object Library 然后在程序里写 继承 Imports Microsoft.Office.Interop 过程中 Dim Exl As New Excel.Application Dim ExlBook As Excel.Workbook = Exl.Workbooks.Add Dim ExlSheet As Excel.Worksheet = ExlBook....

临桂县17864239586： 怎么使用vb输入输出excel数据 - ？
再府多潘： 输入Excel数据 例如 range(＂A1＂)=123 输出Excel数据 例如 msgbox range(＂A1＂) 当然方法很多,只是举个最简单的例子

临桂县17864239586： 怎么利用VB向指定的EXCEL插入数据; - ？
再府多潘： Public Sub WriteResToExcel() '写处理后的数据到新的Excel的过程 Dim xlApp As Excel.Application '定义一个Excel应用 Dim xlBook As Excel.Workbook '定义一个Excel Book Dim xlSheet As Excel.Worksheet '定义一个Excel Sheet '下面是取出打...

临桂县17864239586： 用VB如何讲数据导入到excel - ？
再府多潘： Dim adoXlsCn As Object Dim adoXlsRs As Object Set adoXlsCn = CreateObject(＂adodb.connection＂) Set adoXlsRs = CreateObject(＂adodb.recordset＂) adoXlsCn.CursorLocation = 3 adoXlsCn.Open ＂driver={Microsoft Excel Driver (*.xls)};...

临桂县17864239586： vb文本框内输入的数据怎么录入到Excel的指定单元格 - ？
再府多潘： Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Dim xlSheet As Excel.WorksheetPrivate Sub excelOpen(ExcelName As String)Set xlApp = CreateObject(＂Excel.Application＂)'xlApp.Visible = TrueSet xlBook = xlApp....

临桂县17864239586： 怎么用vb 把数据输入到xls中?且要求在xls中按行按列输出?如下图效果 - ？
再府多潘： 给你个范例 在工程中引用Microsoft Excel类型库: 从＂工程＂菜单中选择＂引用＂栏;选择Microsoft Excel 11.0 Object Library(EXCEL2003),然后选择＂确定＂.表示在工程中要引用EXCEL类型库.Dim xlApp As Excel.Application Dim xlBook ...

临桂县17864239586： VB怎样操作向excel中插入数据(求代码) - ？
再府多潘： VB本身的自动化功能就可以实现,其方法如下: 1、在工程中引用Microsoft Excel类型库: 从＂工程＂菜单中选择＂引用＂栏;选择Microsoft Excel 9.0 Object Library(EXCEL2000),然后选择＂确定＂.表示在工程中要引用EXCEL类型库. 2、在通用对象的声明过程中定义EXCEL对象: Dim xlApp As Excel.Application Dim xlBook As Excel.WorkBook Dim xlSheet As Excel.Worksheet

临桂县17864239586： 怎么把vb的text中的内容输入到excel单元格中? - ？
再府多潘： Private Sub Command1_Click()Open ＂a.xls＂ For Output As #1 '＂a.xls＂是文件名,自己改(xls是excel的后缀),注意要完整路径Print #1, Text1.TextClose #1End Sub窗体上一个commandbutton,一个textbox已测试、可以输出到excel的第一格

临桂县17864239586： 怎么使EXCEL表格中调用的VB窗体中输入的信息输入到表格中 - ？
再府多潘： 加入一个按钮,然后在按钮事件中写入赋值语句就可以了,如cells(1,1)=textbox1.text 需要保存数据时,就点击一下按钮.诸如此类吧.