Get the address of cell from a for each element

[Pochly]

I'm very new to using VBA. I keep receiving a run-time error when I try to get the address of the cell.

Sub Supervisor()


SuperRange = Range("D3:D4")

For Each cell In SuperRange
    If cell Like "*.*" Then
    MsgBox cell.Address

    Else

    MsgBox "nope."
        
End If
Next
End Sub

 

[Fluff]

Hi & welcome to MrExcel.
This demonstrates why it's best to declare you variables.
Try it like

Sub Supervisor()
Dim SuperRange As Range, Cell As Range

Set SuperRange = Range("D3:D4")

For Each Cell In SuperRange
    If Cell Like "*.*" Then
    MsgBox Cell.Address

    Else

    MsgBox "nope."
        
End If
Next
End Sub