- Katılım
- 28 Nisan 2007
- Mesajlar
- 2
- Excel Vers. ve Dili
- 2003
sorunu içeren dosya ektedir.
DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [F2:F65536,H2:H65536]) Is Nothing Then Exit Sub
Target.Offset(0, -1) = Target.Offset(0, -1) + Target
End Sub