MS Excel

zkus tam napsat tohle - nezkoušel jsem, ale mělo by to fakat = =KDYŽ(B1=2;DNES();"")citovat

Do listu, ktorého sa to týka, vlož kód:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" And IsNumeric(Range("A1")) Then _
If Range("A1") = WorksheetFunction.Round(Range("A1"), 0) And Range("A1") > 0 Then _
Range("C1") = Format(WorksheetFunction.RoundDown(Now, 0), "DD.MM.YY")
End Sub
citovat

Otvor si súbor, do ktorého potrebuješ dostať ten kód. Otvor si editor VBA (Alt+F11). V okne projektov (Ctrl+R) si v "pavúkovi" nájdi súbor, do ktorého chceš dostať kód. Klikni dvojklikom na list, ktorého sa to týka. Zobrazí sa Ti prázdne okno. Doňho nakopíruj ten kód, ktorý som uvádzal. Ulož (Ctrl+S). Malo by to fungovať...citovat

Tipujem, že asi chceš, aby sa Ti dopísalo dátum do toho riadku, v ktorom zapisuješ hodnotu v stĺpci A, nie vždy do riadku jedna. V takom prípade je kód tuná:
Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
Dim Oblast As Range, Isect As Range
Set Oblast = Range("A1:A999")
Set Isect = Application.Intersect(Target, Oblast)
If Isect Is Nothing Then
ElseIf IsNumeric(Target) Then _
If Target = WorksheetFunction.Round(Target, 0) And Target > 0 Then _
Cells(Target.Row, 3) = Format(WorksheetFunction.RoundDown(Now, 0), "DD.MM.YY")
End If
End Sub
Pokiaľ by si predsa len chcel, aby sa vždy aktualizoval dátum iba v jednej bunke, tak stačí časť kódu
Cells(Target.Row, 3) = Format(WorksheetFunction.RoundDown(Now, 0), "DD.MM.YY")
nahradiť týmto:
Cells(1, 3) = Format(WorksheetFunction.RoundDown(Now, 0), "DD.MM.YY")
Po tom, čo kód nakopíruješ do projektu, zmaž z neho prázdne riadky (aspoň v oblastiach IF - END IF), neviem prísť na to, ako zabrániť tomu, aby sa na týchto stránkach do kódu nepridávali a robia v tom paseku, pokiaľ prázdne riadky neodmažeš, tak môže dochádzať k chybám v behu makra.citovat

Ak potrebuješ testovať zmenu buniek v nespojitej oblasti a na jej základe meniť dátum v bunke B2, tak v časti kódu
Set Oblast = Range("A1:A999")
dopň metódu Intersect (z ďalšieho riadku) metódou Union, t.j. otestuj, či prienik Target a zjednotenie oblasti buniek, oblasť ktorých chceš takto otestovať, dáva neprázdnu množinu. Zmenu vzhľadu buniek na základe zmeny nadobúdanej hodnoty rieš prostredníctvom podmieneného formátovania.
Takže odpoveď na Tvoje otázky znie: Áno, oboje je možné a pomerne jednoduché. Je ale treba presne definovať, čo potrebuješ, Tvoj popis je pomerne vágny a ja môžem len hádať, čo presne vlastne chceš. Naštuduj si metódu Union v kontextovej nápovede k VBA, malo by Ti to dať presnú odpoveď na Tvoju otázku ohľadom problému vo VBA, riešenie tej druhej otázky ohľadom podmieneného formátovania je už naozaj veľmi jednoduché.citovat