Macro required for changing numbers to specific text

I have this date I have 3 Euiprments, I want to make a macro for replace numbers to eduipment name ,where cell contains value 1 till before next cell value =1 will be one equipment no
see in column G
All numbers (number of rows of any equipment will be vary time to time
Ex-
Srno
1
2
3
1
2
3
4
5
6
1
2
3

see the attachment

Attached Files

• text.xlsx‎ (10.3 KB)