Zavrieť

Porady

VBA Excel automatické vyplnenie dátumu pri zápise hodnoty

mám dva stlpce, A, B . Do stlpcu B zapisujem číselnú hodnotu. Potrebujem aby sa mi v stlpci A automaticky zapísal dátum v tom riadku kde je zapísana číselná.
Pravidlá a tipy
  • Každý móže napísať len 1 odpoveď. Neskor mozete svoju odpoveď vylepšiť.
  • Odpoveď má priniesť riešenie na otázku, vyvarujte sa hodnotenia otázky.
  • Odpoveď má byť viac o faktoch ako o názoroch.
Dalšie pravidla a tipy
    Ak potrebujete v otázke niečo upresniť, najskôr sa spýtajte na podrobnosti.
    Koncept slúži na uloženie rozpracovanej odpovede, koncept sa zobrazuje len Vám, až kým ho nezverejníte.
    Ak máte podobnú otázku, založte Novú otázku alebo Súvisiacu otázku.
    ❤ Buďte priateľskí ❤
    Sme súčasťou jednej komunity, ktorá si chce vzájomne pomáhať, rozdieľnosť je vítaná ak neubližuje!
    Usporiadať podľa času

    PaloPa je offline (nepripojený) PaloPa

    PaloPa
    Cez funkciu Worksheet_Change, ktorá sleduje, či sa zmenila hodnota v záujmovej oblasti (tu stĺpec B).

    Code:
    Private Sub Worksheet_Change(ByVal Target As Range)
    Dim c As Range
    On Error GoTo xErr:
        Application.EnableEvents = False
        For Each c In Target
            If Not Intersect(c, Range("B:B")) Is Nothing Then
                If c.Text <> "" And IsNumeric(c.Value) Then
                    c.Offset(0, -1).Value = Now()
                End If
            End If
        Next c
        Application.EnableEvents = True
       
        Exit Sub
       
    xErr:
         Application.EnableEvents = True
    End Sub
    Ako: ALT+F11, kód pridať nad príslušným listom zošita.

    Tip: funkcia je urobená tak, že je možné dať naraz jednu hodnotu do viacerých označených buniek (CRTL+ENTER)
    D8v1d Super, Ďakujem, presne ako som potreboval.

    Môj problém bol v tom,že moje makro mi fungovalo ale vždy zapísalo dátum o riadok nižšie, keďže som to riešil cez SELECTnutú bunku.

    VBA Excel automatické vyplnenie dátumu pri zápise hodnoty

    Porady, ktoré by vás mohli zaujímať

    Prihláste sa a sledujte len tie Porady, ktoré Vás zaujímajú.