Welche Eigenschaft einer Textbox im Tabellenblatt ist ist dafür Zuständig um die Textbox genau auf die Zellgröße einstellen. Die Größe sollte sich aber mit der Änderung der Zellgröße mit ändern.
Gruß
Lorenz
Sub TBaufZellgroesse()
Dim rngPlace As Excel.Range
Set rngPlace = ActiveSheet.Range("C3")
With ActiveSheet.Shapes("Textbox2")
.Top = rngPlace.Top
.Left = rngPlace.Left
.Width = .Width
.Height = rngPlace.Height
.Placement = xlMoveAndSize
End With
Set rngPlace = Nothing
End Sub
Grüsse