:: Subscribe to our newsletter
 
Articles / Directory
06/17/2013
Latest version of TraderCode(v5.6) includes new Technical Analysis indicators, Point-and-Figure Charting and Strategy Backtesting.



06/17/2013
Latest version of NeuralCode(v1.3) for
Neural Networks Trading.



06/17/2013
ConnectCode Barcode Font Pack - enables barcodes in office applications and includes an add-in for Excel that supports mass generation of barcodes.



06/17/2013
InvestmentCode, a comprehensive suite of
Financial calculators and models for Excel is now available.



09/01/2009
Launch of
Free Investment and Financial Calculator for Excel.



02/1/2008
Release of
SparkCode Professional - add-in for creating Dashboards in Excel with sparklines



12/15/2007
Announcing
ConnectCode Duplicate Remover - a powerful add-in for finding and removing duplicates entries in Excel



09/08/2007
Launch of
TinyGraphs - open source add-in for creating sparklines and tiny charts in Excel.


Professional Stock Beta Calculator Spreadsheet


Price

USD30.00 - Purchase

License

Commercial License

Bonus System Requirements

Microsoft® Windows XP®, Microsoft® Windows Vista®, Windows 7 or Windows 8
Windows Server 2003, 2008, 2012
512 MB RAM
5 MB of Hard Disk space
Excel 2002, 2003, XP, 2007, 2010, 2013


Stock Beta

Stock Beta is the measure of the risk of an individual stock. Basically, it measures the volatility of a stock against a broader or more general market. It is a commonly used indicator by financial and investment analysts. The Capital Asset Pricing Model (CAPM) also uses the Beta by defining the relationship of the expected rate of return as a function of the risk free interest rate, the investment's Beta, and the expected market risk premium.

Capital Asset Pricing Model (CAPM)
Expected rate of return = Risk free rate + Beta * (Market Risk Premium)

To interpret and understand the numbers from the Beta is simple and straight forward. The Beta of the general and broader market portfolio is always assumed to be 1. A stock Beta is calculated to be relative to the Beta of the broader market. Thus when a stock has a Beta that is greater than 1, it is considered to be more risky and more volatile than the broader market while a stock with a Beta of less than 1 is considered to be less risky and less volatile than the broader market. Finally a stock with a Beta equal to 1 is considered neutral and as volatile as the broader market.

The following formula is used for calculating the value of Beta.

Beta = Covariance(Rate of Return of Stock, Rate of Return of Market) / Variance of Market

Covariance is a measure of how two variables change together or is related and Variance is a statistical measure of the dispersion of values from the mean. The rest of this document will illustrate on how to calculate the Beta of an individual stock against the broader S&P 500 portfolio. The interesting part is we will be downloading live data from http://finance.yahoo.com to perform the calculation.

Stock Beta Calculator Spreadsheet

This Stock Beta Calculator spreadsheet allows you to calculate Beta of U.S stocks very easily. First, it provides the formulas for calculating the Beta. Second, and more importantly, it calculates the Beta by automatically downloading stock quotes and the S&P 500 data from http://finance.yahoo.com. The spreadsheet is shown below:


Inputs

  • Stock Symbol - The Stock Symbol used by Yahoo Finance. For example, "YHOO" is the stock symbol for Yahoo. "MSFT" is the stock symbol for Microsoft. Check out http://finance.yahoo.com for the list of Stock Symbols supported.
  • Start Date - The start date in MM/DD/YYYY format.
  • End Date - The end date in MM/DD/YYYY format.

Outputs

After clicking on the Calculate button, an Excel VBA macro will be launched to download the Monthly Stock Quotes from the Start Date to the End Date of the specified Stock Symbol. The Monthly Returns in column H and column P are then tabulated in the StockBetaInternal spreadsheet. Before any calculation, please make sure you are connected to the internet.



The Stock Beta is calculated as the formula below.

Stock Beta = Beta = Covariance(Rate of Return of Stock, Rate of Return of Market) / Variance of Market

Advance Stock Beta Calculator

This spreadsheet builds on the Stock Beta Calculator described above. It adds the following capabilities.

  • The calculation of Daily, Weekly and Monthly returns. If you recall, the Stock Beta Calculator only supports Monthly returns.
  • The calculation of the Beta for up to 5 stocks. If you recall, the Stock Beta Calculator only supports the calculation of Beta for one stock at one time.


Customizing the Stock Beta Calculator

This section describes the VBA source code used to construct the Stock Beta calculator. With the understanding of the basic source code it will be easy to customize the Stock Beta calculator or reuse and expand it in other financial models. The Advance Stock Beta Calculator will not be described. However by looking at the source code, you will find that it is similar to the basic Stock Beta Calculator.

StockBetaInternal Worksheet

This worksheet is used internally by the calculator. Column A to column G contains the downloaded S&P 500 market data. The columns contain data that include Date, Open, High, Low, Close, Volume and Adj Close.



The Returns column is calculated by the VBA macro which we will describe below. It uses the latest Adj Close and the previous Adj Close to calculate the periodic rate of return. The formula used is shown below:

Returns = (Latest Adj Close - Previous Adj Close) / Previous Adj Close

The Returns column is tabulated for use in the calculation of the Covariance and Variance output.

Column I to column O contain similar information to the S&P 500 data except that the data is for the individual stock specified in the 'Stock Beta' worksheet. Column P is also calculated using the Returns formula above.

How is the data downloaded?

The Excel spreadsheet uses the macro DownloadData to automatically populate the data in the 'StockBetaInternal' worksheet. If you goto Developer->Visual Basic and open up the Microsoft Visual Basic Editor. After that, double click on the 'VBA Project (FreeStockBetaCalculator.xls)' and open up Module->Module1. This module contains all the source code for automatically downloading the data.

GetStock subroutine

The VBA code for the GetStock subroutine is listed below. This function downloads data from http://finance.yahoo.com by specifying a Stock Symbol, Start Date and End Date. The last "desti" parameter specifies the location to place the downloaded data.

Sub GetStock(ByVal stockSymbol As String, 
ByVal StartDate As Date, 
ByVal EndDate As Date, ByVal desti As String)
    
    Dim noErrorFound As Integer
    Dim DownloadURL As String
    Dim StartMonth, StartDay, StartYear, 
EndMonth, EndDay, EndYear As String
    StartMonth = Format(Month(StartDate) - 1, "00")
    StartDay = Format(Day(StartDate), "00")
    StartYear = Format(Year(StartDate), "00")
    
    EndMonth = Format(Month(EndDate) - 1, "00")
    EndDay = Format(Day(EndDate), "00")
    EndYear = Format(Year(EndDate), "00")
DownloadURL="URL;http://table.finance.yahoo.com/table.csv?s=" 
+ stockSymbol + "&a=" + StartMonth + "&b=" + StartDay 
+ "&c=" + StartYear + "&d=" + EndMonth + "&e=" 
+ EndDay + "&f=" + EndYear + "&g=m&ignore=.csv"
    
    On Error GoTo ErrHandler:
    With ActiveSheet.QueryTables.Add(Connection:=DownloadURL, 
Destination:=Range(desti))
        .FieldNames = True
        .RowNumbers = False
        .FillAdjacentFormulas = False
        .PreserveFormatting = True
        .RefreshOnFileOpen = False
        .BackgroundQuery = True
        .RefreshStyle = xlInsertDeleteCells
        .SavePassword = False
        .SaveData = True
        .AdjustColumnWidth = True
        .RefreshPeriod = 0
        .WebSelectionType = xlSpecifiedTables
        .WebFormatting = xlWebFormattingNone
        .WebTables = "20"
        .WebPreFormattedTextToColumns = True
        .WebConsecutiveDelimitersAsOne = True
        .WebSingleBlockTextImport = False
        .WebDisableDateRecognition = False
        .WebDisableRedirections = False
        .Refresh BackgroundQuery:=False
    End With
    noErrorFound = 1
    
ErrHandler:
    If noErrorFound = 0 Then
        MsgBox ("Stock " + stockSymbol + " cannot be found.")
    End If
    Resume Next

End Sub

In the whole block of code above, the most important line is the following.

With ActiveSheet.QueryTables.Add(Connection:=DownloadURL, 
Destination:=Range(desti))
It specifies we will be downloading data from DownloadURL and placing the result into the cell specified in 'desti'. The DownloadURL is constructed based on the parameters explained below.

http://table.finance.yahoo.com/table.csv?s=YHOO&a=01&b=01&c=2007&d=08&e=05&f=2008&g=m&ignore=.csv
  • "s=YHOO" means to download the stock prices of Yahoo. YHOO is the stock symbol of Yahoo.
  • "a=01&b=01&c=2007" specifies the start date in Month, Day, Year. You may have noticed that the month is subtracted with 1, which is the format required by Yahoo.
  • "d=08&e=05&f=2008" specifies the end date in Month, Day, Year. You may have noticed that the month is subtracted with 1, which is the format required by Yahoo.
  • "g=m" specifies to download monthly data. Change the "m" to "d" for daily data and "w" for weekly data.

DownloadData subroutine

This is the subroutine that is called by the Calculate button in the 'Stock Beta' worksheet.

Calling the GetStock subroutine

The source code for the DownloadData subroutine is shown below. The sections highlighted in Red show the part where DownloadData calls the GetStock subroutine. The first subroutine call gets the S&P 500 data by passing the "^GSPC" symbol. The second call to the GetStock subroutine uses the stock symbol specified in the 'Stock Beta' worksheet to get the individual stock data.



Formatting the data

The next part of the code formats the downloaded data. The initial downloaded data will be place in one single column of the spreadsheet. The TextToColumns function split this column to multiple columns.

For example, initially the Date, Open, High, Low, Close, Volume and Adj Close will all be downloaded into a single column of Excel. The TextToColumns function will split the Date to 1 column, Open to 1 column, High to 1 column and so on.










 

Copyright (c) 2007-2014, ConnectCode Pte Ltd. All Rights Reserved.


Trademark Acknowledgements

Microsoft and Microsoft Excel are registered trademarks of Microsoft Corporation. Avery is the trademark of Avery Dennison Corporation. All other product names are trademarks, registered trademarks, or service marks of their respective owners