Sette inn tekstbokser med VBA-kode i Excel

Sette inn tekstbokser med VBA-kode i Excel


Tekstboksen er element på en form som gjør at du kan skrive inn data i brukerprogrammet. Du kan bruke innspill fra tekstboksen i Visual Basic for Application (VBA) prosedyre. En Excel VBA tekstboksen er et tomt felt i et regneark som du kan fylle med teksten. VBA for Excel tekstboksen kontroll omfatter designegenskaper som gir deg muligheten til å sette skriften, fargen på bakgrunnen og type av boksen grensen.

Bruksanvisning

1 Klikk "Start", "Microsoft Visual Basic for Applications."

2 Skriv inn følgende kode i det åpne vinduet:

Sub Makro1 ()

'Makro1 Makro

Dim chtTemp Som Chart

Dim objTemp As Object

Sett chtTemp = ActiveSheet.ChartObjects (1) .Chart

Sett objTemp = chtTemp.Shapes.AddTextbox

(MsoTextOrientationHorizontal, 1, 1, 150, 20)

objTemp.Select

Selection.Formula = "= '" & chtTemp.Parent.Parent.Name & "'! A1"

ActiveCell.Select

End Sub

3 Klikk på "File", "Lagre" for å legge VBA script til regnearkprogram.