Office中国论坛/Access中国论坛

标题: 如何自动生成单位页码目录 [打印本页]

作者: 付谦 时间: 2010-1-24 11:59
标题: 如何自动生成单位页码目录
本帖最后由付谦于 2010-7-11 20:22 编辑

打印单位花名册后，因页数太多，为便于查找，需要编写单位页码目录，用手工编写有点麻烦，能否让它自动生成呢？如：
单位          记录号
单位一    1---52
单位二    53---59
单位三    60---96
   ------------
单位十八    888--1000
如果每页打印12条记录，如何用VBA实现单位页码目录，如
单位          起始页
单位一    1
单位二    5
单位三    7    ------------
单位十八 74

作者: ACMAIN_CHM 时间: 2010-1-24 12:36
1. 给例子的时候要仔细，给准确，否则别人只能猜了！！！
单位二 7
这个7 是怎么来的？

2. VBA中你可以直接 INT((记录号-1)/12)+1 得到该记录号所在页。

******************
* 一切皆有可能 *
******************
.
ACMAIN - Access论坛回贴准则（个人）.
.
同一贴子不回复第二次

作者: 付谦 时间: 2010-1-24 14:03
单位二是5，输错了.记录号本是随机数，原是不知道的，上面我输的具体数字仅是举例说明，既然事先不知道每个单位的第一条记录号，代码又怎写？

作者: andymark 时间: 2010-1-24 14:43
每页的行数这个是可以知道的

统计一下各单位的记录数,多少页数也就不难知道

单位一 : 3
单位二 : 6
单位三 : 4

按顺序累加:
页码分别是

单位一: 1-3
单位二: 4-9
单位三: 10-13

作者: 付谦 时间: 2010-1-24 15:41
4楼的办法是有问题的，如果单位一有52人，每页12人，按你的算法页数为5；如果单位二有3人，每页12人，页数为0，按顺序累加为6了，实为5才对，如果单位二有11人呢？。。。。

作者: 付谦 时间: 2010-1-24 21:25
不见高手指点，期待

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)