菜单栏,工具,选项,重新计算,勾选迭代计算,最多迭代次数设为1次
在B1输入公式
=IF(A1="","",IF(B1="",TODAY(),B1))
就可以
A1单元格输入数据,则在B1显示输入当天的日期,有改动不改变日期
没看懂你要列排还是行排,不过方法是一样的.
在最外侧一列(行)输入=rand(),向右拉填充到整列(行),选中徐a,b列外其余的数据,排序,(不扩展区域),在选项里把排序方向选一下(行或列),然后以输入=rand()函数的那一行(列)为关键字排序就可以了.
用VBA才能实现,函数的话,日期会随着系统日期变化的.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 1 Then
Exit Sub
Else
Cells(Target.Row, 2) = Date
End If
End Sub
这个代码控制你在A列的所有操作,写入或删除,都会在B列显示操作的时间.
假设A4为需要输入内容,则在B4输入=IF(ISBLANK(A4),"",IF(B4="",NOW(),B4))
然后下拉,B列单元格格式自己定义
在B1中输入公式:=if(A1="","",now())