请帮忙解决个数据移动的问题，谢谢了！

flhy99 · 发表于 2011-3-16 22:54

我的想法是：在离职日期中预先填入离职日期，等到了那天。自动执行数据移动。
不知道如何弄，求助了。谢谢！

[ 本帖最后由 flhy99 于 2011-3-17 00:24 编辑 ]

flhy99 · 发表于 2011-3-16 23:22

没人回么？

flhy99 · 发表于 2011-3-17 00:29

郁闷中·····

flhy99 · 发表于 2011-3-17 16:02

还是没人帮解答···

flhy99 · 发表于 2011-3-17 17:13

怎么这样啊

flhy99 · 发表于 2011-3-18 00:06

我等······

sorua · 发表于 2011-3-18 00:20

=IF(AND(YEAR(NOW())=YEAR(在职!B2),MONTH(NOW())=MONTH(在职!B2),DAY(NOW())=DAY(在职!B2)),NOW(),"")

这样可以吗？如果当天年、月、日相同的话就自动等于离职日期。。。

flhy99 · 发表于 2011-3-18 00:36

谢谢楼上，可能是我没说清楚
当天日期大于离职日期的我会：=IF(B5>0,IF(DAY(B5)<=DAY(NOW()),"离职",""),"")
只是自动输入“离职”后，
不会运行代码:Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Cells.Count > 1 Then Exit Sub
If Target.Value = "离职" Then
Target.EntireRow.Copy Sheets(2).Range("A65536").End(xlUp).Offset(1, 0)
Target.EntireRow.Delete
End If
End Sub

flhy99 · 发表于 2011-3-18 02:28

······

		自动登录	找回密码
密码			免费注册

[求助] 请帮忙解决个数据移动的问题，谢谢了！

回复 1楼 flhy99 的帖子

回复 7楼 sorua 的帖子