Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Sub TextBoxes_Add_ToCharts() 'Add text box 'You can assign the result of the AddTextbox method to a Shape object variable and manipulate its Top, Left, 'Height and Width properties '1. Value = Left property '2. Value = Top property '3. Value = Width property '4. Value = Height property Dim chtTemp As Chart Dim objTemp As Object Dim x As Integer x = 1 Do While x <= ActiveSheet.ChartObjects.Count Set chtTemp = ActiveSheet.ChartObjects(x).Chart Set objTemp = chtTemp.Shapes.AddTextBox(msoTextOrientationHorizontal, 285, 171, 135, 20) objTemp.Select Selection.Formula = "='" & chtTemp.Parent.Parent.Name & "'!Blue_Range_TextBox_" & Format(x, "00") x = x + 1 Loop ActiveCell.Select End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.