VBA怎样把获得的数据写到excel表中

参考代码(看不明白,不一定对):
ret = SapModel.Results.JointDispl("1", 0, NumberResults, _
Obj, Elm, LoadCase, StepType, StepNum, F1, F2, F3, M1, M2, M3)
SapResult(1) = F3(0)
ReDim SapResultString(1)
SapResultString(1) = Format(SapResult(1), "0.00000")
ReDim IndResult(1)
ReDim IndResultString(1)

怎样将F3的值填到sheets(1).[e32]?

redim在这里有什么用?
SapResult(1)括号里的数是什么意思?

将F3的值填到sheets(1).[e32] 这个很简单

sheets(1).[e32]=[F3]

redim的作用是重新定义数组的维度和大小
SapResult(1) 是指sapresult这个数组的第一个元素。(当然也有可能是第二个,这个得看这个数组的下限是从0开始还是从1开始)追问

提示方法“_Default”作用于对象‘Range’时失败

追答

加裙 叄贰伍肆零叄扒叄零 讨论吧,这个要看你具体的表格情况的。

温馨提示:内容为网友见解,仅供参考
无其他回答

如何利用VBA读取Excel中数据并输出到Excel
1、首先,在Excel表格中输入如图内容,以方便在VBA中进行读取和处理操作。2、进入VBA环境,可以按键盘上的“Alt+F11”进入。右击“Microsoft Excel对象”,从其右键菜单中选择“插入”-“用户窗体”项。3、接着向窗体中拖动一个“标签”和一个“按钮”,右击“按钮”,从其扩展菜单中选择“属性”项。...

用VBA复制文本内容到Excel工作表中?
Line Input #1, str '按行读取到变量中 k = k + 1 '累加 ReDim Preserve ar(1 To 1, 1 To k) As Variant '扩展数组 ar(1, k) = str '写入到数组中 Loop Close #1 '关闭1号文件 Kill iPt '杀列iPt文件(彻底删除,非放入回收站)'将数组的数据写入到工作表中 With Sheet1 .Range(...

怎么用VBA代码批量提取word中的特定数据到EXCEL?
1、程序遍历指定文件下的所有DOC类文档,2、打开找到的第一个文档,遍历文档中的每一个表格,3、遍历表格中的每一个格子,与关键字进行比较,找出目标,其右侧的单元格中就是你要的字符串 4、程序新建EXCEL表格(这一步可以事先进行)5、将找到的字符,输出到EXCEL表格中适当位置 6、循环直至文档未 ...

excel中如何将用vba把表一的信息录入表二
1、可以先利用宏录制来自动生成代码,然后再进行修改。操作方法如下:第一步,打开一个excel应用,新建一个白空表格,并录入数据。2、第二步,点击excel应用程序窗口状态栏中左侧的“宏录制”按钮。3、第三步,然后在表1中,选中左上角第一个有数据的单元格。4、第四步,接着按下CTRL+SHIFT键,再...

vb 执行sql语句得到的结果集怎样输出到excel单元格中?
可以,在vb窗口建个datagrid,adodc,用adodc绑定你的数据库,datagrid的DataSource选择那个adodc,这样就能把记录集中的数据显示在datagrid表格中,然后再把datagrid表格中的查询结果导入到Excel中,把datagrid导入到Excel的代码如下:Dim ex As Object Dim i As Integer Dim j As Integer Dim XlApp As ...

用vba从一个关闭着的excel表读取数据写入到当前打开的excel表
application.Workbooks(文件名).Close true或false表示是否保存 复制就是application.Workbooks("文件名").sheets("表名").range(源单元格地址).copy ActiveSheet.range(目标单元格地址)你可以用Set xlApp = CreateObject("Excel.Application")来建立一个看不到的Excel应用程序对象,然后用xlApp 来替代上面...

如何用VBA判断符合条件的数据复制粘贴到相应工作表?
首先,你需要使用Microsoft.Office.Interop.Excel类库来操作Excel文件。这个类库可以让你在C#中操作Excel文件。其次,你需要使用C#中的循环语句来遍历Excel文件中的所有数据,并且使用if语句来判断符不符合条件。第三,当符合条件时,你需要使用Excel的Range类来复制符合条件的数据,并使用Workbook和Worksheet类来...

如何用VBA判断符合条件的数据复制粘贴到相应工作表?
首先,在VBA中定义符合条件的数据,可以使用类似下面的代码:Dim targetSheet As Worksheet Dim sourceSheet As Worksheet Dim lastRow As Long Dim i As Long Set sourceSheet = Worksheets("Sheet1") ' 指定源数据所在工作表 Set targetSheet = Worksheets("Sheet2") ' 指定目标工作表 lastRow = ...

vba怎样一个文本文档中的数据按照相同的位置放入excel表格中
'一、用Print写入 '1 分行输入 Sub t1() Dim f As String f = ThisWorkbook.path & "\\a.txt" Open f For Output As #1 Print #1, "产品名称" Print #1, Date Close #1 End Sub '2 在同一行输入 Sub t2() Dim f As String f = ThisWorkbook.path ...

vba如何把word表格内容填到excel里
首先,你要知道如何用键盘来选择整个表格,然后复制,把这些操作录制下来,然后复制代码。。如果你是要从EXCEL 的VBA 入手,那么你需要在VBA引用中添加WORD Libary 11.0 如果是从WORD的VBA入手,那么就要添加EXCEL LIBARY 11.0 (OFFICE 2007 是 12.0)然后就是需要知道EXCEL中粘贴的代码,如果我记得不...

相似回答