Find number difference 0 instead of number 1

[ninhmoon]

Dear everyone!
I want to find all number difference 0 number in the table sheet to replace by one number 1
Please help me what is the formula for that.
example I attach file:

[JeteMc]

I am going to make some assumptions. First that you are wanting to change only the zeros highlighted. Second that the values were all manually input, so that there is no formula to change. Therefore my solution would be to select the range L2:AH35, on the Home tab choose Find&Select then Replace. In the box next to "Find what:" input the number 0, and in the box next to "Replace with:" input the number 1 and select "Replace All". If this is a part of a larger sheet then simply change the dimensions of the range.

[ninhmoon]

I am going to make some assumptions. First that you are wanting to change only the zeros highlighted. Second that the values were all manually input, so that there is no formula to change. Therefore my solution would be to select the range L2:AH35, on the Home tab choose Find&Select then Replace. In the box next to "Find what:" input the number 0, and in the box next to "Replace with:" input the number 1 and select "Replace All". If this is a part of a larger sheet then simply change the dimensions of the range.

No, you don't understand me.
I want to replace 1 for other number difference 0 (excepted 0 number)
example: 2 into 1; 3,5 into 1....

[FDibbins]

show some sample answers please, and explain how you arrived at them please

[ninhmoon]

show some sample answers please, and explain how you arrived at them please

my result many value >0 I want to change into 1 in the table.
Maybe use code or not. It is Ok.

[JeteMc]

I want to replace 1 for other number difference 0 (excepted 0 number)
example: 2 into 1; 3,5 into 1....

Then use the same process as I outlined above but in "Find what:" input 2 then select "Replace All", next change the input for "Find what:" to 3 and so on until all of the numbers, except the zeroes, used in the spreadsheet are changed to 1. OR select the entire range of cells, use conditional formatting, select "Format only cells that contain", "Cell value", "Greater than", "0". For the format select the "Number" tab, select "custom" and for "type:" input 1. press "OK", "OK", and "OK".

Hope this gets the results you are looking for.

[ninhmoon]

Then use the same process as I outlined above but in "Find what:" input 2 then select "Replace All", next change the input for "Find what:" to 3 and so on until all of the numbers, except the zeroes, used in the spreadsheet are changed to 1.

I don't understand.
When i use the find what with condition >0 to replace range("D10:AH80") example. but I can not find the my result
when i use the code:

Public Sub GPE()
Dim Cll As Range
For Each Cll In Selection
If Cll.Value > 0 Then Cll.Value = 1
Next Cll
End Sub
but I have trouble when I want to change the all sheets on the file.
I dont know How should I do?

[FDibbins]

Provide some sample answers in your workbook, and show how you got them. That way, we dont have to guess what you want

[ninhmoon]

Provide some sample answers in your workbook, and show how you got them. That way, we dont have to guess what you want

My result for my workbook.

[FDibbins]

Create a 2nd table, identical to the 1 you have (I started in column AL). Put this in AL9, and copy down and across the entire table.

You can now either use that new table, or copy/paste values back over the 1st table, then delete the 2nd table

[ninhmoon]

Provide some sample answers in your workbook, and show how you got them. That way, we dont have to guess what you want

Create a 2nd table, identical to the 1 you have (I started in column AL). Put this in AL9, and copy down and across the entire table.

You can now either use that new table, or copy/paste values back over the 1st table, then delete the 2nd table

it waste a long time.
I think so.
If you use the code below I think it is better than your result.
Because you know I must to make 22 sheets for one moth.
So I can't create 2 table and copy and paste value after that I delete old table.

[FDibbins]

OK well perhaps other members will have better ideas for you

[ninhmoon]

OK well perhaps other members will have better ideas for you

I think your idea is very better when I work with one sheet.
thank very much. (Maybe I can not understand all idea you say because my English is not good )