Stránka 1 z 1

Excel 2007 statické datum

Napsal: 05 pro 2010 15:07
od KRAL
Dobrý den,

prosím o radu s úkolem, potřebuji když vyberu ve sloupci F v rozevíracím seznamu pracovníka aby na stejnem řádku ve sloupci D vyplnil datum DNES ale aby se neměnil, musí zustat zapsán čas výběru pracovníka ze seznamu viz příloha.V ostatních forech jsem našel příklady bohužel to není to co potřebuji viz.

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Cells(1, 3) = Now
End If
End Sub

Děkuji

priklad.xlsx
(8.55 KiB) Staženo 76 x

Re: Excel 2007 statické datum  Vyřešeno

Napsal: 05 pro 2010 15:30
od mike007
Klikni pravým tlačítkem myši na název záložky a z kontextového menu vyber Zobrazit kód. Do prázdného okna nakopíruj toto makro:

Kód: Vybrat vše

Private Sub Worksheet_Change(ByVal Target As Range)
If Selection.Count = 1 Then
With Target
If .Column = 6 Then
If .Value <> "" Then
If Cells(.Row, .Column - 2) = "" Then Cells(.Row, .Column - 2) = Date
End If
End If
End With
End If
End Sub


VBA zavři.