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.
With oExcel .Cells(21, 1).Value = accessCount .Cells(21, 2).Value = loginCount .Cells(21, 3).Value = wolCount End With Sub AddChart(oExcel) With oExcel On Error Resume Next .ActiveSheet.Range("A20:C21").Select .ActiveSheet.Shapes.AddChart.Select .ActiveChart.ChartType = xl3DPie .ActiveChart.SetSourceData Source:=Range("Sheet1!$A$20:$C$21") .ActiveChart.ApplyDataLabels .ActiveChart.SeriesCollection(1).DataLabels.ShowValue = True .ActiveChart.SeriesCollection(1).DataLabels.ShowPercentage = False .ActiveSheet.Shapes("Chart 1").Left = Sheet1.Cells(4, 1).Left .ActiveSheet.Shapes("Chart 1").Top = Sheet1.Cells(4, 1).Top .ActiveSheet.Shapes("Chart 1").Height = Sheet1.Range("A4:D17").Height .ActiveSheet.Shapes("Chart 1").Width = Sheet1.Range("A4:D17").Width End With 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.