If Column Contains A Number - Add Button To Another Column

I would like to loop through column "B", and for any cell in column B that contains a number. I would like to add a button to the same row, but in column "O". The code that I have so far is posted below. When I run the macro, it adds all of the buttons into cell "O4" all stacked on top of each other. I need them to add the buttons in the corresponding rows, instead of stacking them all into the same cell.

VB:
Sub Macro1()
'
' Macro1 Macro
'
'
Dim myrange As Range
Dim c As Range

[Code].....