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üsseDie erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen