向各位大侠求救啊!小弟正在做一个毕业设计,以前没有接触过VB,要实现的功能是这样的
现有一个Excel文件,需要用VB将IP地址192.168.0.1至192.168.0.48写入到excel的第二列里
这对于各位懂VB的大侠来说是很简单的事啦,无限感激啊!!
现有一个Excel文件,需要用VB将IP地址192.168.0.1至192.168.0.48写入到excel的第二列里
这对于各位懂VB的大侠来说是很简单的事啦,无限感激啊!!
解决方案 »
- SQL无法检查语法错误问题
- 这是什么类型
- VBScript中如何调用ASP中写的方法?
- 一个关于 ListView 的问题, 我怎么通过列名得到 Index 值?
- 是我的错还是微软?------> Loading…。。。 --------在线等待中!
- 谁帮我看看这组数怎么调整?愁死了!!!等毕社答辩!
- 老生常谈,如何给网页中的activeX传参数?
- 问一个很菜的问题,关于TEXT控件的使用。(在线等待)
- 关于VB打包的问题
- 请问如何保存CSDN的网页,如“http://www.csdn.net/expert/topic/526/XXXX.xml”
- 总是说变量模块或with模块未定义。是为什么啊?急急急
- 如何指定某段文字颜色
http://download.csdn.net/source/2341786
Dim xlsApp As Excel.Application
Dim xlsBook As Excel.Workbook
Dim xlsSheet As Excel.Worksheet
Private Sub Command1_Click()
Set xlsApp = New Excel.Application
Set xlsBook = xlsApp.Workbooks.Open("c:\table1.xls")
Set xlsSheet = xlsBook.Worksheets(1)
xlssheet.cells(3,1)=“你好”
xlsApp.Visible = True
End Sub
但是如何添加IP呢,这就是关键问题了!请各位兄弟帮帮忙吧,时间不多了!跪谢!
dim ip as string,i as long
ip="192.168.0."
for i=1 to 48
xlssheet.cells(i,2)= ip & cstr(i)
next