通过VB计算EXCEL数据

来源：百度知道 编辑：UC知道 时间：2024/06/15 03:33:18
初学VB，如果我想通过VB读取 123.xls 表中 Sheet1 的 F2~F7 行，并实现计算F2+F3-1,F3+F4-2,F4+F5-3……以此类推，直至F7，然后把结果输出在G3~G7，接着循环，对F8~F13,F14~F19……重复进行相同的计算直至这一F列的结束，如最后剩下3行，无法计算则为空。因为是对多张表格进行相同的处理，所以想通过VB6.0设计一个这样功能的小程序，但是我初学VB没几天，实在想不出来，希望有人能够帮忙下，或者提供类似的例子给我参考下。多谢了。我把所有分都拿出来了~~~
很惭愧，对C#也不会，没办法改~~~尝试过下拉填充，可是得出的数据不对，还需要额外的操作才行。
我原本打算用ACCESS2000建立一个数据库123.mdb，里面两张表table1和table2，将EXCEL中的F列从第二行开始的数据写入table1中，通过VB读取table1中的数据进行计算后将得到的数据写入table2，再将table2中的数据导出至EXCEL文件中的G列。但是对于底下关于数据库连接的几个问题实在没弄懂：
1.用VB实现从EXCEL中F列的数据到ACCESS的table1
2.用VB读取table1中的数据
3.用VB将计算后的数据写入table2
4.用VB将table2的数据写入EXCEL文件中的G列
可能我想的方法比较麻烦，希望大家能够指点下，教我用比较简单的办法，不能用EXCEL中的宏，因为EXCEL文件不止一张，而且算法会不同，另外是给我老爸用的，他本来对EXCEL也不熟悉，而我有接触的就是VB，所以希望通过VB设计一个看起来比较直观的小软件给他。真的很急，所以希望大家多帮忙啊~~

给你段C#操作excel的程序把 我刚写了的 可以用的 你按照思路进行修改就是了 相信LZ这个还是会撒
string strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + Server.MapPath(ReStr) + ";Extended Properties='Excel 8.0;HDR=YES;IMEX=1';";
OleDbConnection conn = new OleDbConnection(strConn);
conn.Open();
string strExcel = "select * from [sheet1$]";
OleDbDataAdapter da = new OleDbDataAdapter(strExcel, strConn);
DataSet ds = new DataSet();
da.Fill(ds);
ArrayList strsql = new ArrayList();
for (int i = 0; i < ds.Tables[0].Rows.Count; i++)
{
object[] ws = ds.Tables[0].Rows[i].ItemArray;//将第i行的值转换成为object数组
加上你自己的操作就OK了
}

你用VBA来做会更简单的

Excel具备计算功能，g3输入公式 =F2+F3-1，下拉填充柄即可。

若是为训练VB，则另当别论。

对啊，直接用公式就可以了，如果条件不允许这样只允许用VB那就另说了。。