Question

EXCEL当A1大于0时A1等于1,当A1小于等于0时A1等于0

Answer 1

1. 如果A1不包含公式：鼠标右键→设置单元格格式→“数字”选项卡→自定义→设置格式“[>=1]1;!0”，大于等于1的数字显示为1，小于1显示为0；

2. 如果A1包含公式，还可以在公式外套用其他函数来达到此效果：假设A1公式为=B1+C1，可以使用公式=TEXT(B1+C1,"[>=1]1;!0")这个函数跟设置单元格格式类似，区别是，这个公式得到的数字是文本类型的。还可以使用公式=IF(B1+C1<1,0,1)，这个就是比较常用的IF函数。
   

Answer 2

实现不了
A1中如果有公式就不能有值, 有了值就不能有公式

Answer 3

右击sheet，查看代码，将下列代码复制进去，然后按f5，查看结果，如果结果正确，删除代码，然后正常保存。提醒：无法回退提前保存副本
Sub a()
Dim a%, rng As Range
a = Range("a1").End(xlDown).Row
For Each rng In Range("a1:a" & a)
If rng.Value > 0 Then
rng.Value = 1
Else
rng.Value = 0
End If
Next
End Sub