Fare clic su "Start ", "Microsoft Visual Basic, Applications Edition "
2
Inserisci il seguente codice nella finestra aperta : .
Sub Macro1 ( ) per
' Macro1 Macro
Dim chtTemp Come Grafico
Dim objTemp As Object
chtTemp = ActiveSheet.ChartObjects (1). tabella < br
Set> objTemp = chtTemp.Shapes.AddTextbox
( msoTextOrientationHorizontal , 1 , 1 , 150 , 20 ) per
objTemp.Select
Selection.Formula = " = ' " & chtTemp.Parent.Parent.Name &" ' ! A1 "
ActiveCell.Select
End Sub
3
Fare clic su" File , " " Salva "per aggiungere lo script VBA per il vostro foglio di calcolo.
Programmazione © www.354353.com