'Parse Https:// to a URL and auto hyperlink in Excel

From a previous post on this site I am utilizing the following macro to select entries and auto-hyperlink. I would love it if it could also check the cell for the presence of "Https://" and if not present, add it, then continue to create a hyperlink. Any and all help is much appreciated Here is the auto hyperlink I've been using:

Sub HyperAdd()

    'Converts each text hyperlink selected into a working hyperlink

    For Each xCell In Selection
        ActiveSheet.Hyperlinks.Add Anchor:=xCell, Address:=xCell.Formula
    Next xCell

End Sub


Sources

This article follows the attribution requirements of Stack Overflow and is licensed under CC BY-SA 3.0.

Source: Stack Overflow

Solution Source