2015年2月6日 星期五

VBA EXCEL 取得 最後一列 & 最後一行

如果用迴圈,中間有空白列就會有問題

但用下面的方法即可

最後一列 ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row
最後一行 ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Column

2015年2月4日 星期三

103年11月、12月 統一發票 中獎號碼

103年9月、10月 統一發票 中獎號碼

獎別中獎號碼獎金金額
特別獎335165381000萬元
特獎18290129200萬元
頭獎4377205820萬元
44517895
45226602
二獎同期統一發票收執聯末7位數號碼與頭獎中獎號碼末7位相同者4萬元
三獎同期統一發票收執聯末6位數號碼與頭獎中獎號碼末6位相同者1萬元
四獎同期統一發票收執聯末5位數號碼與頭獎中獎號碼末5位相同者4千元
五獎同期統一發票收執聯末4位數號碼與頭獎中獎號碼末4位相同者1千元
六獎同期統一發票收執聯末3位數號碼與頭獎中獎號碼末3位相同者2百元
增開六獎901
659
034
955
2百元
同期統一發票收執聯末3位數號碼與上列號碼相同者
領獎期間自104年2月6日起至104年5月5日止

無實體電子發票專屬獎中獎號碼 PDF檔 (已排序)

統一發票 其他月份 中獎號碼

2014年12月17日 星期三

2014年11月27日 星期四

103年9月、10月 統一發票 中獎號碼

103年9月、10月 統一發票 中獎號碼

獎別中獎號碼獎金金額
特別獎222671271000萬元
特獎31075480200萬元
頭獎3539680420萬元
15352117
54709991
二獎同期統一發票收執聯末7位數號碼與頭獎中獎號碼末7位相同者4萬元
三獎同期統一發票收執聯末6位數號碼與頭獎中獎號碼末6位相同者1萬元
四獎同期統一發票收執聯末5位數號碼與頭獎中獎號碼末5位相同者4千元
五獎同期統一發票收執聯末4位數號碼與頭獎中獎號碼末4位相同者1千元
六獎同期統一發票收執聯末3位數號碼與頭獎中獎號碼末3位相同者2百元
增開六獎114
068
476
970
2百元
同期統一發票收執聯末3位數號碼與上列號碼相同者
領獎期間自103年12月6日起至104年3月5日止

無實體電子發票專屬獎中獎號碼 PDF檔 (已排序)

統一發票 其他月份 中獎號碼

2014年10月9日 星期四

103年7月、8月 統一發票 中獎號碼

103年7月、8月 統一發票 中獎號碼

獎別中獎號碼獎金金額
特別獎162568201000萬元
特獎33378146200萬元
頭獎9204088120萬元
99971012
70124883
二獎同期統一發票收執聯末7位數號碼與頭獎中獎號碼末7位相同者4萬元
三獎同期統一發票收執聯末6位數號碼與頭獎中獎號碼末6位相同者1萬元
四獎同期統一發票收執聯末5位數號碼與頭獎中獎號碼末5位相同者4千元
五獎同期統一發票收執聯末4位數號碼與頭獎中獎號碼末4位相同者1千元
六獎同期統一發票收執聯末3位數號碼與頭獎中獎號碼末3位相同者2百元
增開六獎998
741
833
732
2百元
同期統一發票收執聯末3位數號碼與上列號碼相同者
領獎期間自103年10月6日起至104年1月5日止

無實體電子發票專屬獎中獎號碼 PDF檔 (已排序)

統一發票 其他月份 中獎號碼