CountIF within a for loop

[Am1]

Hi,
i need to use CountIf function inside a for loop, in VBA. I am very new to VBA, so sorry for trivial question.
Column "A" contains cells with text, with several duplicates.
For each cell in "A" column, i want to have in column "B" how many times text is present in the entire column "A"
I use code below, which is always returning "0" ...i think there is an error in how i am indexing cells in the for loop, inside COUNTIF function

For i = 2 To 100
Worksheets("Sheet1").Cells(i, 2).Formula = "=COUNTIF(A:A,cells(i,1).value)"
Next i

any ideas on where is my error?
thanks

 

[davesexcel]

"=COUNTIF(A:A,cells(i,1).value)"

"=COUNTIF(A:A," & cells(i,1).value & ")"

Checkout special cells

Range("A:A").SpecialCells(xlCellTypeConstants, 23).Offset(, 1) = "=COUNTIF(A:A,A1)"

 

[steve the fish]

You dont need a loop here. Use this:

Worksheets("Sheet1").Range("B2:B100").FormulaR1C1 = "=COUNTIF(C[-1],RC[-1])"

FWIW your code should have been like this:

Worksheets("Sheet1").Cells(i, 2).Formula = "=COUNTIF(A:A," & Worksheets("Sheet1").Cells(i, 1).Value & ")"

 

[davesexcel]

Sucks having a 10 minute limit for editing.

Range("B2:B" & Cells(Rows.Count, "A").End(xlUp).Row) = "=COUNTIF(A:A,A1)"

 

[Am1]

Thank you all, will take some time to understand and test your valuable inputs
no doubt they will all work
I was looking on google the meaning on this syntax , not able to find a clear explanation
" & cells(i,1).value & "
which is the meaning of thisn double "&"?
thanks!