I want to give same number to the duplicate data in excel

 A      B
apple   1
apple   1
apple   1
ball    2
bat     3
dog     4
dog     4
goat    5

Solution

Sort your column A then insert the number 1 in cell B2 and the following function in cell B3 and copy down.

in cell B2=1

function in cell B3: =if(A3=A2, B2, B2+1)

Update

enter image description here

Recognize and process quotation mark (")
Enumerate all data in Excel range, count them and sort by occurrence
Add headers to table based on values found in cells
Table Stacking using VBA
how to handle excel files using C++?
sqlite3 or CSV files
Match and list values to a dynamic list including multiple column criteria
Match and list values to a list including mutliple column criteria
Transpose Excel data for multi-Stacked bar chart
Match and list values based on values listed in another column
Use pandas to read excel files with wrong sheet state
Display x-rows below a certain position from a filtered and sorted list
Get the first and last number occuring in a (text) string in a cell
Count the program-steps
Using VSTACK to pile-up results
Excel vba Login to the site
How to get a string array in an Excel cell and use as a reference
Excel's max function returning wrong value when using vlookup
Excel list of values where data matches across multiple rows
How to save Image independently in VBA module
How to map table references in a JSON file to corresponding values in an Excel file using Python?
Move values from column to rows in Excel
Application.FileDialog vs GetOpenFilename: What is the difference?
Only display the values in a certain rank position from filtered and sorted list
Convert table to reflect column names as row values
Excel: Dynamic stacking or arrays n-number of times
Convert Excel formula to Power Query (if countifs)
Trying to hide rows in excel based on two values
Combine every unique value from column A with duplicated values into a new sheet
Import formula from variable - Excel VBA