excel中如何编小程序

1、首先打开Excel，以制作一个抽奖小程序为例，先输一些数据。

2、首先我们在抽奖区的单元格中输入=INDEX（）。

3、然后选中数据源，也就是所有成员。

4、然后继续输入=INDEX（E:E，Randbetween()）。

5、在Randbetween()这个涵数中输入1，5，也就是数据源。

6、输入完成后，回车确认，这样一个抽奖小程序就制作好了。

7、我们只需要按f9里面的幸运儿就跟着切换了。

如果你往Excel中写入值可用函数调用，不写入值可用OLE控件调用。下面的VB连接Excel程序你可以参照。

Dim OBJEXCEL As ExcelApplication '定义Excel应用程序变量

Dim OBJXLS As ExcelWorkbook '定义工作薄变量

Private Sub Command1_Click()

Dim I, J As Integer '定义循环变量

Set OBJEXCEL = New ExcelApplication '应用程序变量赋值

OBJEXCELVisible = True '工作薄可见

Set OBJXLS = OBJEXCELWorkbooksAdd '增加工作薄

OBJXLSActivate '激活工作薄

For I = 1 To 9

For J = 1 To 9

OBJEXCELActiveCellCells(J, I)Value = I J '单元格赋值

Next J

Next I

End Sub

以上就是关于excel中如何编小程序全部的内容，包括:excel中如何编小程序、如何用vb6.0外接程序设计excel2003中直接能调用的自定义函数、等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！