Hi Henrick,

All thats been said above works fine. But I want to point out another method, using the function Iconize, which is new since 11.3.

• While connected to internet, in a notebook, evaluate Iconize[some data from the Wolfram servers, your name of the data]. The downloaded data will then reside within the notebook.
• Save the notebook. Close Mathematica. Disconnect internet.
• Restart Mathematica. Keep internet off. Open the saved notebook. Evaluate the icon: Click, Shift+Enter. The data is shown.

Example:

Iconize[PlanetData[PlanetData[], {"Name", "Radius"}], "Radiuses of planets"]

The data saved in this way does not have to come from the web. It could also be the result from a time consuming computation within Mathematica.

Here is one way to do it.

Get stock data:

ticker = "AAPL";
dateRange = {{2020, 1, 1}, Today};
originalData = FinancialData[ticker, "OHLCV", dateRange] // Normal // QuantityMagnitude;

Create a file name:

fileName = StringJoin[ticker, "_", DateString[Today, {"Year", "Month", "Day"}]]

Put in file:

Put[originalData, fileName]

Read in and check:

newData = Get[fileName];
newData == originalData

You can gather up the code in a function to create files for all the stocks and date ranges you'd like to store.