excel den web.tr ile ilgili soru

[TRABLUS]

Dünkü Alpen Bey in hazırladığı excel web.tr ile ilgili son 10 başlık sayfasında C15 hücresine öyle bir formül vermek istiyorum ki bir önce ki güncelleme ile şuandaki mevcut durum arasındaki farkı ortaya çıkarsın.Yani hangi soruda değişiklik var cevap verilmiş gibi!Böyle bir excel formülü yapılabilirmi?

 

[ALPEN]

öneri,

worksheet'in change olayı kullanılarak d sütunu (son mesaj zamanı) bir arraya atılır. bir sonraki change olayında d sütunu bu array ile karşılaştırılır. fark varsa bilgi verilir.

 

[ALPEN]

forumda kirlilik yaratmasın diye tam olarak deneyemedim,
modüle

Public before(9, 2) As String
Public after(9, 2) As String

ilgili sayfanın change olayına

Private Sub Worksheet_Change(ByVal Target As Range)

For i = 1 To 10
    after(i - 1, 0) = before(i - 1, 0)
    after(i - 1, 1) = before(i - 1, 1)
    after(i - 1, 2) = before(i - 1, 2)
Next i

For i = 1 To 10
    before(i - 1, 0) = i
    before(i - 1, 1) = Cells(i + 1, 2)
    before(i - 1, 2) = Cells(i + 1, 4)
Next i

For i = 1 To 10
    For j = 1 To 10
        If before(i - 1, 1) = after(j - 1, 1) Then
            If before(i - 1, 2) <> after(j - 1, 2) Then
                MsgBox (after(i - 1, 1) & " konusunda yeni mesaj var")
            End If
            
        End If
    Next j
Next i

For i = 1 To 10
    after(i - 1, 0) = before(i - 1, 0)
    after(i - 1, 1) = before(i - 1, 1)
    after(i - 1, 2) = before(i - 1, 2)
Next i
End Sub