如何将MSgrid网格里的内容导入EXCEL表里，然后打印。。。。。

	首页 \| 新闻 \| 技术 \| 论坛 \| 人才 \| 商城 \| 大本营 \|《程序员》\| 软件

2003.9.10

-我的论坛-

— 相关专题 —

— 人才招聘 —

— 热销商品 —

— 培训信息 —

— 图书信息 —

CSDN - 专家门诊 - VB VBA问题
	回复 \| 推荐 \| 收藏 \| 专题 \| 公告 \| 管理 \| 加入FAQ \| 保存 \| 回复通知 \| 关闭窗口

主　　题：		如何将MSgrid网格里的内容导入EXCEL表里，然后打印。。。。。
作　　者：		tgc99 ((小兵冲锋陷阵))
等　　级：
信誉值：		94
所属论坛：		VB VBA
问题点数：		60
回复次数：		5
发表时间：		2003-6-11 22:49:45

比如，msgrid里有三行记录，共有五个字段
我将msgrid里的数据导入了EXCEL.我想将三行记录及表头单元格加上边框，如果行数固的我可以在EXCEL里作好，但如果多了几行，如何处理呢。就是和上面几行格式一样的。

回复人： handsomge(汗衫) ( 五级(中级)

) 信誉：100

2003-6-12 13:02:06

得分:5

循环啊

Top

回复人： tgc99((小兵冲锋陷阵)) ( 三级(初级)

) 信誉：94

2003-6-12 23:49:48

得分:0

看来是有点难度

Top

回复人： xiolig(凌霄) ( 一级(初级)

) 信誉：100

2003-6-13 9:55:40

得分:15

用选择性粘贴如何？
  Rows("4:4").Copy
  Rows("5:5").PasteSpecial Paste:=xlFormats, Operation:=xlNone, _
     SkipBlanks:=False, Transpose:=False

Top

回复人： zwbhyy(博) ( 三级(初级)

) 信誉：100

2003-6-13 16:26:07

得分:40

dim i ,j as long 
excel.application.Sheets("sheet").Activate
excel.application.Sheets("sheet").Range("A1").Select

excel.application.sheets("sheet").cells(i,j)=msgrid.textmatrix(i,j)


这样可以任意的把数据添到excel表格里

Top

回复人： tgc99((小兵冲锋陷阵)) ( 三级(初级)

) 信誉：94

2003-6-13 22:03:42

得分:0

zwbhyy(博) 的方法可行，，因为我就用这个方法的。。

虽然我已知道，但你们仍然有分哟。。。

Top

该问题已经结贴，得分记录： handsomge (5)、 xiolig (15)、 zwbhyy (40)、


	管理 \| 关闭窗口

网站简介 - 广告服务 - 网站地图 - 帮助信息 - 联系方式
百联美达美公司版权所有京ICP证020026号
Copyright ? CSDN.net, Inc. All rights reserved