why it doesn't work?

[Demian]

Private Sub Worksheet_Change(ByVal Target As Range) '

If Target.Address = "$C$3" Then
Worksheets("another sheet").Activate
MsgBox Cells(3, 1) 'from "another sheet" sheet
--------------

Msgbox shows a cell value from "main" sheet not from "another sheet". Can
You help me, thanks in advance

[Harald Staff]

You didn.t address it, so cells(3, 1) is cell A3 in Me (the sheet containing
the code).

MsgBox Worksheets("another sheet").Cells(3, 1).Value
should do.

HTH. Best wishes Harald

"Demian" <tmietiu@poczta.onet.pl> skrev i melding
news:da30e6$r6n$1@news.onet.pl...
> Private Sub Worksheet_Change(ByVal Target As Range) '
>
> If Target.Address = "$C$3" Then
> Worksheets("another sheet").Activate
> MsgBox Cells(3, 1) 'from "another sheet" sheet
> --------------
>
> Msgbox shows a cell value from "main" sheet not from "another sheet". Can
> You help me, thanks in advance
>
>
>
>

[Roman]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$C$3" Then
Worksheets("sheet2").Activate
MsgBox ActiveSheet.Cells(3, 1) 'from "another sheet" sheet
End If
End Sub

Or without activating the other sheet:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$C$3" Then
MsgBox Worksheets("sheet2").Cells(3, 1) 'from "another sheet" sheet
End If
End Sub