如何判断图书是否借出未还

hhxq001

su45 发表于 2014-8-15 15:54
可以自动添加呀！你再试试 00013

确实可以，奇怪我刚才下载的那个怎么不行，再下就可以啦？！

看看39楼的问题怎么解决

hhxq001

su45 发表于 2014-8-15 15:54
可以自动添加呀！你再试试 00013

还有个问题就是：一本书虽然在下面自动添加了一行，但没有借出日期和当前状态为借出，应该视为尚未借出。你的代码则只要是借阅表中有这本图书，并且没归还就视为借出了，不知还能改进不。

su45

39楼与42楼都没问题：

tgydslr

如图

有这个设想：当你要借书时，先在B11输入图书编号，这是看了图书编号后按号借书的，可以用数据有效性设置提示，编号为几位保证输入正确，输入完以后在C11：D11返回该书的情况，查到书有没有被借出去，
C13=IF(LEN(INDIRECT("m"&MAX(($B$4:$B10=$B11)*ROW($4:10)))),VLOOKUP($B11,书目!$B$3:$D$1692,COLUMN(B1),),"这本书借出去还没还回来")三键横拉至D11，如果没被借出去可以接着下一步，借出去的话，后面的单元格就全为空，此时换编号重新查询；
额3开始就显示书没有借出去的话余下的过程，如果数被借出去了，这里就没法输入读者编号了（用数据有效性，文本长度限制），没被借出去的话，前面C11：D11显示书架名、书名便于核对，（如果错了，重新查询再输入），核对没问题的话接着输入读者编号，（为防止输入错误，这里加入数据有效性提示），读者编号输入结束以后后面各列就自动生成了
其中F13=IF(LEN($E11),VLOOKUP($E11,INDIRECT(INDEX({"学生读者";"教师读者"},FIND(LEFT($E11),"XJ"))&"!a3:D100"),COLUMN(B1),),""),三键横拉至g13,显示读者的情况，便与验证，错了的话重新输入读者编号即可。
后面各公式
I11=IF(LEN(G11),10+(G11="教师")*10,"")
J11=IF(LEN(K11),"借出","")
K11=IF(LEN(E11),TODAY(),"")
L11=IF(LEN(K11),K11+I11,"")
M11设置数据有效性提示输入归还日期
N11=IF(M11>0,"归还","")
O11=IF(OR(AND(M11="",TODAY()>L11),M11>L11),"逾期","")
P11=IF(M11="",IF(TODAY()>L11,"超"&TODAY()-L11,L11-TODAY()),"")
以上各列公式均可以下拉，只是以一行各列为例
详见附件

hhxq001

tgydslr 发表于 2014-8-15 20:44
如图

有这个设想：当你要借书时，先在B11输入图书编号，这是看了图书编号后按号借书的，可以用数据有效性 ...

没看明白意思，附件除了逾期的处理，没见变化啊

tgydslr

hhxq001 发表于 2014-8-15 22:59
没看明白意思，附件除了逾期的处理，没见变化啊

C11=IF(LEN(INDIRECT("m"&MAX(($B$4:$B10=$B11)*ROW($4:10)))),VLOOKUP($B11,书目!$B$3:$D$1692,COLUMN(B1),),"这本书借出去还没还回来")三键，就是用来判断书有没有借出去没还的，如果换了可以继续借，填写余下的部分
是按领会错您的意思了？

su45

还有什么问题吗？

zyouong

这个不是数组公式。

旧书重读

su45 发表于 2014-8-15 14:09
35楼的还有点问题，再次修改：

这个方法是目前最省心省力的方法。真心赞一个。

su45

怎么？还给不了最佳？