Excel всавка актуальной даты.

  • Есть таблица в которой используется код для Visual Basic


    Исходный код
    Sub Kontrollkästchen9_Klicken()
    Dim D As Date
    D = Now
            Dim FormatString As String
            MsgBox (Format(D, "DD-MM-YYYY HH:mm"))
    End Sub


    как заменить MsgBox на заданную ячейку.


    в кратце: в таблице при вводе галочки, должно в определенной ячейки отобразиться актуальная дата. нашел кусок кода когда при вводе отображается дата в отдельном окне "MsgBox" как реализовать отображение в заданной ячейки

  • aus dem Kopf ohne zu prüfen


    austauschen:
    MsgBox (Format(D, "DD-MM-YYYY HH:mm"))


    in Tabelle:
    me.cells(1,1).value = Format(D, "DD-MM-YYYY HH:mm") 'aktuelle tabelle celle a1, (zeile,spalte)
    oder
    me.range("A1").value = Format(D, "DD-MM-YYYY HH:mm")


    im Modul muss die Tabelle benannt werden:
    Tabelle1.range("A1").value = Format(D, "DD-MM-YYYY HH:mm")
    Shets("NameDerTabelle").range("A1").value = Format(D, "DD-MM-YYYY HH:mm")