Activity based intelligence (ABI) requires access to all available sources of data. Recorded Future allows analysts to observe structured data on the open, deep, and dark web.
Public Sub GenerateGIF(sheet1, range1, control1, DataRange) Sheets(sheet1).Activate Sheets(sheet1).Range(range1).Select Selection.Copy Const FName As String = [directory is here]\temp.gif" Dim pic_rng As Range Dim ShTemp As Worksheet Dim ChTemp As Chart Dim PicTemp As Picture Application.ScreenUpdating = False Set pic_rng = Worksheets(sheet1).Range(range1) Set ShTemp = Worksheets.Add Charts.Add ActiveChart.Location Where:=xlLocationAsObject, Name:=ShTemp.Name ActiveChart.ChartArea.Select ActiveSheet.Shapes("Chart 1").ScaleWidth 8, msoFalse, _ msoScaleFromBottomRight ActiveSheet.Shapes("Chart 1").ScaleHeight 2, msoFalse, _ msoScaleFromBottomRight Set ChTemp = ActiveChart pic_rng.CopyPicture Appearance:=xlScreen, Format:=xlPicture ChTemp.Paste Set PicTemp = Selection
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
15 Experts available now in Live!