Textbox in a cell

  • Thread starter Thread starter Cagey
  • Start date Start date
C

Cagey

I want to put a button on the toolbar to let the user automatically create a
text box the same size and color etc everytime.
I created a macro that will do this relative to the worksheet

ActiveSheet.Shapes.AddTextbox(msoTextOrientationHorizontal, 400, 130, _
50, 70).Select

but i want it to be created in the active cell. Can i do this?
 
You can't have a TextBox "in" a cell. It's in another (?drawing?) layer.

Regrets,
Andy
 
Sure you can ,on 'top' of it, in the same size if you wish.

ActiveSheet.TextBoxes.Add(ActiveCell.Left, ActiveCell.Top, _
ActiveCell.Width, ActiveCell.Height).Select
 
Back
Top