To replace all non-zero values in a range with 1 in Microsoft Excel, follow these steps:

1. Select the range of cells that you want to replace the non-zero values with 1.
2. Press Ctrl + H on your keyboard to open the Find and Replace dialog box.
3. In the Find what field, type
   Formula:

   "0" 

   to find all cells that contain a zero.
4. In the Replace with field, type
   Formula:

   "1" 

   to replace all zeros with ones.
5. Click on the Options button to expand the dialog box.
6. Make sure that the Within: option is set to Sheet or Workbook, depending on your needs.
7. Make sure that the Search: option is set to By Rows or By Columns, depending on your data layout.
8. Click on the Replace All button to replace all non-zero values with 1 in the selected range.

This should replace all non-zero values with 1 in the selected range. If you have multiple ranges that you want to replace, you can repeat these steps for each range.