Q:

Excel VBA runtime error 5 using hyperlink function

I'm working on a programme where I use hyperlinks to call macros. Therefore I use hyperlink.add function. The function should create a hyperlink on my first spreadsheet with the information of my second spreadsheet. 
My problem is that I get a runtime error 5 using following code in my "create hyperlink sub". I don't see where the problem is. Hope you can help me.
Sub createhyperlink() 
Dim c1, r1, c2, r2 as Integer
c1=2
r1=2
c2=3
r2=3
    FirstSheet.Hyperlinks.Add Anchor:=FirstSheet.Cells(c1, r1), _
        Address:="", _
        SubAddress:=Firstsheet.Cells(c1, r1), _
        TextToDisplay:=SecondSheet.Cells(c2, r2)
End Sub

A:

You're missing the .Address and .Value   
Sub createhyperlink()
    Dim c1 As Long, r1 As Long, c2 As Long, r2 As Long
    c1 = 2
    r1 = 2
    c2 = 3
    r2 = 3
        Firstsheet.Hyperlinks.Add Anchor:=Firstsheet.Cells(c1, r1), _
            Address:="", _
            SubAddress:=Firstsheet.Cells(c1, r1).Address, _
            TextToDisplay:=Secondsheet.Cells(c2, r2).Value
    End Sub

