2. To create macros

In the "Project" window, select the chart where the workbook, and then the implementation of the menu command "Insert> module", open the "Module 1" window, in the window, enter the following four lines of code, as shown in Figure 3.

Sub SaveChartAsGIF ()
Fname = ThisWorkbook.Path & "\" & ActiveChart.Name & ".gif"
ActiveChart.Export FileName:=Fname, FilterName:="GIF"
End Sub

 Figure 3

Code input is completed, do not forget save.  Save and close Visual Basic Editor.