设为首页收藏本站Access中国

Office中国论坛/Access中国论坛

 找回密码
 注册

QQ登录

只需一步,快速开始

12下一页
返回列表 发新帖
查看: 8659|回复: 10
打印 上一主题 下一主题

[基础应用] 求一计算累计住宿天数的公式

[复制链接]
跳转到指定楼层
1#
发表于 2008-1-27 14:31:11 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
求一累计住宿天数的公式?????跪求累计住宿天数的公式!!!!
       本人想做一个自动计算宾馆住宿房费的一个工作表,这里面涉及到一个字段即累计住宿天数如何用公式表达请教大家:
 ABCDEFG
1开房日期开房时间退房日期退房时间房价累计住宿天数住宿消费总额
2      
3       
4       


正常计算累计住宿天数F2的公式=C2-A2,但有几种情况得考虑:
一、住宿是从客人开始(每日早6:00之后)入住,既开始计费,直到第二天的中午12:00之前退房都按一天计算
二、退宿超过12:00,但到18:00之前,另外加半天计算。
三、退宿超过18:00以后,另外加收一整天的房费。
请把这几方面都考虑到,帮我做个计算F2值的公式,谢谢!!!
分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏 分享分享 分享淘帖 订阅订阅
2#
发表于 2008-1-27 17:30:22 | 只看该作者
我以前写过一个计算时差的函数,在我的博客中,应该和你说的差不多,你参看一下,看看对你有没有帮助
http://www.office-cn.net/offspace/?uid/49992
3#
发表于 2008-1-28 09:23:32 | 只看该作者
如果当天12:00开房,14:00退房,怎么说

点击这里给我发消息

4#
发表于 2008-1-28 10:57:33 | 只看该作者
笔峰侠的函数:
函数1=2*CEILING(B2-INT(A2-0.25)-0.5,0.25)-INT(CEILING(B2-INT(A2-0.25)-0.5,0.25))
函数2=CEILING(SUBSTITUTE(CEILING(B2-INT(A2-0.25)-0.5,0.25),".5",".75"),0.5)
修正版:=MAX(CEILING(SUBSTITUTE(CEILING(B13-INT(A13-0.25)-0.5,0.25),".5",".75"),0.5),1)

小爪的自定义函数:
'根据宾馆酒店业的特点:
'一、住宿是从客人开始(每日早6:00之后)入住,既开始计费,直到第二天的中午12:00之前退房都按一天计算
'二、退宿超过12:00,但到18:00之前,另外加半天计算。
'三、退宿超过18:00以后,另外加收一整天的房费。
'我编一个结算宾馆酒店业住宿天数的自定义函数
''计算酒店业住宿天数函数
''
''例:XZjdday([开始日期],[开始时间],[结束日期],[结束时间])


Public Function XZjdday(StarD As Date, StarT As Date, EndD As Date, EndT As Date) As String
Dim TFDay%
Dim TFHour%
Dim B As Single

TFDay = EndD - StarD
TFHour = Hour(EndT)
B = 0
''判断日期是否超过一天
If StarD = 0 Or EndD = 0 Or StarT = 0 Or EndT = 0 Then
XZjdday = 0: Exit Function
End If
  If TFDay > 0 Then
     If TFHour >= 12 And TFHour < 18 Then
       B = B + 0.5
     ElseIf TFHour >= 18 Then
       B = B + 1
     End If
  Else
     B = B + 1
  End If
XZjdday = TFDay + B

End Function

[ 本帖最后由 pureshadow 于 2008-1-28 12:14 编辑 ]
5#
发表于 2008-1-28 11:29:39 | 只看该作者
函数解决,看我博客把!

点击这里给我发消息

6#
发表于 2008-1-28 12:04:43 | 只看该作者
爪啊,你不把你的博址贴了来啊?
或者放在签名里啊。
我再帮你贴一次啦:http://hi.baidu.com/huanhuanxiaozhua/blog

点击这里给我发消息

7#
发表于 2008-1-28 12:07:59 | 只看该作者
另外,楼主啊,你这个题引得EXCEL两大高手笔峰侠和小爪争论了一上午诶。。。。
也许下午还要继续哟
8#
 楼主| 发表于 2008-2-2 14:26:59 | 只看该作者

回复 4# 的帖子

非常感谢你呀!以后要多与你学习
9#
发表于 2009-5-14 13:12:44 | 只看该作者
学习了
10#
发表于 2009-9-13 13:19:50 | 只看该作者
您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|站长邮箱|小黑屋|手机版|Office中国/Access中国 ( 粤ICP备10043721号-1 )  

GMT+8, 2024-11-25 18:51 , Processed in 0.087799 second(s), 34 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表