用VB来做EXCEL

就是用VB来做一些简单的  比如说在多个工作表的同一个位置添加递增的数  ；快速更改多个工作表的名称   等等  些简单的用得着用VB6.0来编缉吗   用不着的话 又应该怎么去学  谢谢了

答案：用不着VB6.0，Excel自带有VBA。你可以通过录制看一些代码，也可以直接写。你会VB，应该很容易的。
举例，在Excel里同时按Alt和F11进入VBA界面，点菜单的插入，模块，粘贴如下代码：
sub test()
dim i as integer
for i = 1 to 10
cells(i,1) = i
next i
end sub

大白话。

该名称：
sub xx()
dim i as integer
for i = 1 to sheets.count
sheets(i).name = i
next i
end sub
其实没有这个必要，就你的需要直接利用VBA实现更好。如果去用VB与Excel交互有时卡死你，效果不是很好，除非有特殊需要。
1、同时按Alt和F11进入VBA界面，开始录制宏。
http://wenku.zhaoxi.net/view/27078b29bd64783e09122ba0.html
http://wenku.zhaoxi.net/view/7b8bc748e45c3b3567ec8be2.html
'本机必须安装有office，确实excel本身就带有vba的，不过用vb操作excel也是一样的
Option Explicit
Dim xlApp As Object
Dim xlBook As Object
Dim xlSheet As Object
Private Sub Command1_Click()
    On Error GoTo msgerr
    Dim i%
    Set xlBook = xlApp.Workbooks.Open("c:\temp.xls") '保证文件存在
    Set xlSheet = xlBook.Worksheets
    For i = 1 To 100
        xlSheet(1).Cells(i, 1) = i '第一列写100递增的数字
    Next
    xlSheet(1).Name = "aaa" '该工作表名称
    xlBook.Save
    xlBook.Close
    xlApp.Quit
    MsgBox "Saved"
    Exit Sub
msgerr:
    MsgBox "文件打开错误"
End Sub
Private Sub Form_Load()
    Set xlApp = CreateObject("Excel.Application")
End Sub

上一个：求个vb聊天程序源代码
下一个：vb 中set focus是什么意思