社区
VB基础类
帖子详情
***先来先得,发言就给分,如何控制将Excel中的某几个Cell合并为一个,还有就是如何设置Cell的颜色以及对其方式,一个菜鸟问题,***
lhh
2002-08-01 09:27:36
***先来先得,发言就给分,如何在VB中控制将Excel中的某几个Cell合并为一个并设置其对齐方式,还有就是如何设置Cell的颜色以及对其方式,一个菜鸟问题,***
...全文
110
8
打赏
收藏
***先来先得,发言就给分,如何控制将Excel中的某几个Cell合并为一个,还有就是如何设置Cell的颜色以及对其方式,一个菜鸟问题,***
***先来先得,发言就给分,如何在VB中控制将Excel中的某几个Cell合并为一个并设置其对齐方式,还有就是如何设置Cell的颜色以及对其方式,一个菜鸟问题,***
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
8 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
wurf0
2002-08-01
打赏
举报
回复
给你比较完整的办法跟源码:
Dim oExcel As Excel.Application
Dim oBook As Excel.Workbook
Dim oSheet As Excel.Worksheet
Dim oRange As Excel.Range
Set oExcel = CreateObject("Excel.Application") 'run it
Set oBook = oExcel.Workbooks.Add
Set oSheet = oBook.Worksheets(1)
Set oRange = oSheet.Range(Cells(i, j), Cells(i+2, j+2))
oRange.Borders(xlEdgeBottom).Weight = 2
oRange.Borders(xlEdgeTop).Weight = 2
oRange.Borders(xlEdgeLeft).Weight = 2
oRange.Borders(xlEdgeRight).Weight = 2
oRange.ColumnWidth = mdblcolwith
oRange.RowHeight = 8 '高度
oRange.Value="你要写的东西"
oRange.Interior.ColorIndex = 36 '颜色
oRange.HorizontalAlignment = xlRight '对齐方式
要记得多给点分哟!!!!!!!!!!!!!!!!!!!!!
zhang_pi
2002-08-01
打赏
举报
回复
Dim Exsheet As Excel.Worksheet
Exsheet.Range(arange, vrange).Merge
Jonly
2002-08-01
打赏
举报
回复
用EXCEL自带的宏录制功能,你将学到你想像到的东西,不信你试试
你不会告诉我录制宏都不会吧!
分
xybzc
2002-08-01
打赏
举报
回复
1楼正解,你 也可以对他的代码进行改写
lhh
2002-08-01
打赏
举报
回复
能不吝给出代码的高手必有高分相赠啊!
cool_man
2002-08-01
打赏
举报
回复
你可以用EXCEL自带的宏录制功能,把你的操作录下来,然 后再查看一下宏里面的代码就行了。
wurf0
2002-08-01
打赏
举报
回复
是一直不好呢,还是有时好有时不好呢?
lhh
2002-08-01
打赏
举报
回复
多谢各位的帮助,我们一般来说是不知道什么行列用A.B.C.D...来表示的,只有数字,所以用Cells(row,col)最好了,但是我用下边的句子时
Set oRange = oSheet.Range(Cells(i, j), Cells(i+2, j+2))
VB老报告错误:“实时错误1004,应用程序定义或对象定义错误”
大家快帮我呀!
POI模板导出
利用POI将数据导出到给定的
EXCEL
模板,并根据要求
合并
单元格。
将多个
excel
文件
合并
为
一个
Excel
文件
合并
Excel
文件
Java将多个
excel
文件
合并
到
一个
excel
文件
中
。
Java将多个
excel
文件
合并
到
一个
excel
文件
中
。
数据
分
析之 Python 将
excel
文件
中
的所有不同sheet页,
合并
至新
excel
文件的
一个
sheet页,且保留原单元格样式。
【代码】数据
分
析之 Python 将
excel
文件
中
的所有不同sheet页,
合并
至新
excel
文件的
一个
sheet页,且保留原单元格样式。
多个
excel
文件
合并
为
一个
excel
Python openpyxl库实现将同一目录下的
excel
文件
合并
为
一个
excel
功能(包含格式,不含宏),运行程序后,输入要生成的
excel
文件名称即可
VB基础类
7,785
社区成员
197,585
社区内容
发帖
与我相关
我的任务
VB基础类
VB 基础类
复制链接
扫一扫
分享
社区描述
VB 基础类
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章