查看: 748|回复: 8|
在线时间92 小时经验46 威望0 性别保密最后登录注册时间阅读权限20UID1129168积分46帖子精华0分享0
EH初级, 积分 46, 距离下一级还需 304 积分
积分排行3000+帖子精华0微积分0
软件生成的表格，想把上下有些单元格数据对换一下，其中有些合并单元格，原图和效果图见附件，最好一次生成，几十张表一个一个改挺麻烦的，最好详细点，我是菜鸟，谢谢
该贴已经同步到
15:34 上传
下载次数: 32
6.21 KB, 下载次数: 32
在线时间2742 小时经验17780 威望9 性别保密最后登录注册时间阅读权限100UID2098376积分20530帖子精华0分享0
管理以下版块
积分排行14帖子精华0微积分0
按住 Shift ，用鼠标拖动
在线时间92 小时经验46 威望0 性别保密最后登录注册时间阅读权限20UID1129168积分46帖子精华0分享0
EH初级, 积分 46, 距离下一级还需 304 积分
积分排行3000+帖子精华0微积分0
jsxjd 发表于
按住 Shift ，用鼠标拖动
几十张表，要拖好久
在线时间2742 小时经验17780 威望9 性别保密最后登录注册时间阅读权限100UID2098376积分20530帖子精华0分享0
管理以下版块
积分排行14帖子精华0微积分0
sunkui996 发表于
几十张表，要拖好久
还不如用公式，在原表的基础上转换一下
在线时间92 小时经验46 威望0 性别保密最后登录注册时间阅读权限20UID1129168积分46帖子精华0分享0
EH初级, 积分 46, 距离下一级还需 304 积分
积分排行3000+帖子精华0微积分0
jsxjd 发表于
还不如用公式，在原表的基础上转换一下
不知道公式怎么写呀，谢谢
在线时间1538 小时经验1919 威望2 最后登录注册时间阅读权限70UID125859积分2169帖子精华0分享0
EH铁杆, 积分 2169, 距离下一级还需 1031 积分
积分排行478昵称螺旋风帖子精华0微积分0
这样可以吗？Sub duidiao()
& &
& & For i = 4 To 16
& && &&&c = 0
& && &&&For j = 1 To 7
& && && && &If Not Cells(i, j).MergeCells Then
& && && && && & cc = Cells(i, j)
& && && && && & dd = Cells(i, j).Font.Size
& && && && && & Cells(i, j) = Cells(i + 1, j)
& && && && && & Cells(i, j).Font.Size = Cells(i + 1, j).Font.Size
& && && && && & Cells(i + 1, j) = cc
& && && && && & Cells(i + 1, j).Font.Size = dd
& && && && && & c = 1
& && && && &End If
& && &&&Next
& && &&&If c = 1 Then
& && && && &i = i + 1
& && &&&End If
& & Next
End Sub复制代码
23:57 上传
下载次数: 9
10.44 KB, 下载次数: 9
共同学习，发挥EXCEL最大功能！
在线时间92 小时经验46 威望0 性别保密最后登录注册时间阅读权限20UID1129168积分46帖子精华0分享0
EH初级, 积分 46, 距离下一级还需 304 积分
积分排行3000+帖子精华0微积分0
zxh361 发表于
这样可以吗？
在线时间92 小时经验46 威望0 性别保密最后登录注册时间阅读权限20UID1129168积分46帖子精华0分享0
EH初级, 积分 46, 距离下一级还需 304 积分
积分排行3000+帖子精华0微积分0
zxh361 发表于
这样可以吗？
不好意思，我把表格增加了行，不行了，帮我改改，谢谢
17:39 上传
下载次数: 1
20.19 KB, 下载次数: 1
17:38 上传
下载次数: 0
20.19 KB, 下载次数: 0
在线时间1538 小时经验1919 威望2 最后登录注册时间阅读权限70UID125859积分2169帖子精华0分享0
EH铁杆, 积分 2169, 距离下一级还需 1031 积分
积分排行478昵称螺旋风帖子精华0微积分0
本帖最后由 zxh361 于
08:28 编辑
sunkui996 发表于
不好意思，我把表格增加了行，不行了，帮我改改，谢谢
代码修改如下：
Sub duidiao()
& & Dim c%, i%, j%, cc, dd
& & For i = 1 To [b65536].End(xlUp).Row
& && &&&c = 0
& && &&&If Cells(i, 1) && &节数\星期& Then
& && && && &For j = 1 To 7
& && && && && & If Not Cells(i, j).MergeCells And Cells(i, j) && && Then
& && && && && && &&&cc = Cells(i, j)
& && && && && && &&&dd = Cells(i, j).Font.Size
& && && && && && &&&Cells(i, j) = Cells(i + 1, j)
& && && && && && &&&Cells(i, j).Font.Size = Cells(i + 1, j).Font.Size
& && && && && && &&&Cells(i + 1, j) = cc
& && && && && && &&&Cells(i + 1, j).Font.Size = dd
& && && && && && &&&c = 1
& && && && && & End If
& && && && &Next
& && &&&End If
& && &&&If c = 1 Then
& && && && &i = i + 1
& && &&&End If
& & Next
End Sub复制代码
08:26 上传
下载次数: 3
26.53 KB, 下载次数: 3
共同学习，发挥EXCEL最大功能！
积分≥4700即可申请
最佳管理者
最佳管理者奖章No.1
金牌优秀管理者
金牌优秀管理者勋章No.1
优秀管理者
优秀管理者勋章No.1
最佳会员奖章No.1
优秀会员奖章No.1
金牌优秀会员
金牌优秀会员奖章No.1
关注我们，与您相约微信公众平台！
Copyright 1999 - 2017 Excel Home. All Rights Reserved.本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！
Powered by
本站特聘法律顾问：徐怀玉律师 李志群律师 &&版权所有 &2008 扬搜
综合搜索引擎 网址导航 网站导航股票指标公式编写入门讲座之一_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
评价文档：
喜欢此文档的还喜欢
股票指标公式编写入门讲座之一
股​票​指​标​公​式​编​写​入​门​讲​座​之​一
阅读已结束，如果下载本文需要使用
想免费下载本文？
把文档贴到Blog、BBS或个人站等：
普通尺寸(450*500pix)
较大尺寸(630*500pix)
你可能喜欢您的位置：
→ report builder 15.01 For XE5(附序列号)
report builder15.01 For XE5(附序列号)
report builder介绍
序列号：xFvy78q4
ReportBuilder是程序员们比较爱使用的报表工具之一。我在Report builder 里面创建了一个参数，包含给定的一组值并且允许包含多值，值的范围从1-7的 String，Report Builder中的列类型包括公式列、汇总列、占位列等。只需要一次数据库读取操作，速度较快。并且由于主要的逻辑均放在CF_1那个公式列中，方便维护。ReportBuilde是一个强大的企业报表工具，使您能够迅速开发和部署先进的网络和纸报告对任何数据源（包括Oracle数据库Oracle报表开发（Oracle开发套件的一个组成部分）的报告建设的组成部分， JDBC，XML，文本文件，和Oracle OLAP）。利用最新的J2EE技术，如JSP和XML，您可以以一个可伸缩的，有效的方式发布各种格式（包括HTML，XML，PDF格式，分隔的文本，后记，PCL，和RTF）您的报告中的任何目的地（包括电子邮件，Web浏览器OracleAS Portal中，和文件系统）。report builder注意事项& 1，如果找不到TppReport类别，在接口引用单元添加ppReport单元& 2，如果找不到psPageList类别，在接口引用单元添加ppTypes单元& 3，如果找不到ppTextToPageList函数，在接口引用单元添加ppUtils单元& 4，sPageRange可以定义三种类型的页范围&&&& A：起止页：3-10//连接线分隔&&&& B：分隔页：3,5,7//逗号分隔&&&& C：单独页：7
其它相关版本
report builder相关的软件
黑龙江牡丹江黑龙江幼儿师范高等专科学校 网友 客人 发表于:
设计各种风格的报表。数据模型与布局设计界面。增加公式列、进行行数据的统计与计算。
21.4M / 万能五笔
14.0M / 同花顺炒股
5.0M / FinalData
32.7M/中文/ 5.0
6.4M/中文/ 6.6
5.5M/英文/ 8.5
16KB/中文/ 5.7
60M/中文/ 7.2
483KB/多国语言[中文]/ 2.5
945KB/中文/ 8.0
本类软件排行
207KB/中文/ 1.0
65KB/中文/ .4
461KB/中文/ 4.2
192.7M/多国语言[中文]/ 6.2
10.3M/中文/ 7.1
341KB/中文/ 6.1
732KB/中文/ 7.1
1.2M/中文/ 6.8
1.7M/中文/ 1.5
173KB/中文/ 7.1
东坡下载 & 分享互联网 Copyright(c)
All Right Reserved 网站备案/许可证号 鄂ICP备号-1}