sziasztok,

 

segítségre lenne szükségem:

egy excel táblában azt szeretném, hogy pl: az A oszlop egyik cellájába adatbevitelkor, az ugyanabban a sorban lévő C oszlopba írja be a bevitel dátumát, idejét és ez frissítéskor ne változzon meg.

Eljutottam odáig hogy ide célszerú VB-t használni.

A következő már majdnem jó:

 

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
        Const LNG_OSZLOP As Long = 3
        Dim lngSor As Long
        lngSor = ActiveCell.Row - 1
               If Cells(lngSor, LNG_OSZLOP) = "" Then
                        Cells(lngSor, LNG_OSZLOP) = Now()
              End If
End Sub

 

csak itt az a probléma, hogy akárhova írok a táblázatba, beteszi a dátumot/időt, holott csak az A oszlop azonos sorába íráskor kellene hogy működjön.

 

ha valaki tud segítsen pls.

 

előre is köszönöm