Sử dụng Hàm Today

[trung_vip2]

Tôi sử dụng hàm today để làm nhật ký, nhưng mỗi ngày mở ra thì nó lại nhảy về ngày hiện tại. Xin mọi người giúp tôi làm cách nào để ngày trước phải giữ nguyên (không bị nhảy theo ngày mới)

View more random threads:

• Tách bỏ size ra khỏi mã hàng
• Lọc dữ liệu liên kết giữa các sheet khi chọn khoảng thời gian bất kì.
• Nhờ mọi người xác định font của text trên cell !
• Xin File Quản lí Kho công ty nhỏ
• Hàm Sumproduct
• Thêm chức năng cho đoạn code trong execel
• Các bạn giúp mình tính đột cơn giá với mình chưa hiểu lắm
• Tính hiệu quả đầu tư
• excel: tìm số ngày sắp tới sinh nhật
• Xin các bác chỉ giúp e định dạng về thời gian với

[hoabaybay]

Tôi sử dụng hàm today để làm nhật ký, nhưng mỗi ngày mở ra thì nó lại nhảy về ngày hiện tại. Xin mọi người giúp tôi làm cách nào để ngày trước phải giữ nguyên (không bị nhảy theo ngày mới)

Thế bạn đã hiểu chức năng của hàm Today chưa mà bạn đòi hàm đó nó giữ nguyên ngày trước cho bạn.

[huongcao]

» Giá như bạn upload tệp mẫu lên thì dễ hình dung hơn;
» Ca này chắc phải dùng VBA, chỗ (column?) sử dùng hàm TODAY() có thể kiểm tra để giữ nguyên công thức hay chuyển về giá trị khi đóng tệp lại;

[ducquangtb90]

Vậy mới phải nhờ đến các Pro có cách nào chỉ tui với.

[samsungware]

Xem có cách nào không vậy

[lebachit]

Bạn xem thử được chưa : https://drive.google.com/uc?export=d...HoyR3o1ekNsSFk
»»»»»»»»»»»»»»»»»»»»»»»»» »»»»»»»»»»»»»»»»»»»»»
» Thêm sự kiện mới sẽ ghi vào 2 cột NGÀY-GHI và CẬP-NHẬT;
» Nếu có thay đổi về sự kiện sẽ ghi vào cột CẬP-NHẬT;
» Bạn có thể vào mã VBA sửa code lại theo ý mình; tôi là tay mơ VBA nên lập trình còn khập khiễng lắm
»»»»»»»»»»»»»»»»»»»»»»»»» »»»»»»»»»»»»»»»»»»»»»

Const Cot_NgayGhi = 1               'Cot A
Const Cot_NgayCapNhat = 2           'Cot B
Const Cot_CacCongViecThucHien = 3   'Cot C
Const Cot_GhiChu = 4                'Cot D
'
'Tu dong cap nhat khi co thay doi o cot CongViecThucHien va GhiChu
'
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Row = 1 Then Exit Sub 'Bo qua dong tieu de
    If Target.Column < Cot_CacCongViecThucHien Then Exit Sub
    If Target.Column > Cot_GhiChu Then Exit Sub
    '
    Dim Dong_NhatKy As Integer
    Dong_NhatKy = Target.Row
    '
    Cells(Dong_NhatKy, Cot_NgayCapNhat).Value = Now()
    If Not (IsDate(Cells(Dong_NhatKy, Cot_NgayGhi))) Then
        Cells(Dong_NhatKy, Cot_NgayGhi).Value = Now()
    End If
End Sub

»»»»»»»»»»»»»»»»»»»»»»»»» »»»»»»»»»»»»»»»»»»»»»
Tôi không thể upload lên GPE vì bị dính lỗi :
» 2015-04-05-GPE-Nhat ky cong viec 2015-04.xlsm - Exceeds your quota by 12.6 KB
» Tổng dung lượng tập tin đính kèm của tor: 1,020.9 KB
» Tổng dung lượng đã dùng: 1,020.9 KB

[galuoi92]

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo x
lr = Range("A" & Rows.Count).End(xlUp).Row
If Target.Value <> "" And Target.Row > lr Then
Cells(Target.Row, 1).Value = Format(Now(), "dd-mm-yyyy")
End If
x:
End Sub
Bạn copy vào Sheets("Chuyen mon") và thử nhé.
Lưu ý: bạn chọn cột A rồi clearcontents đi nhé.

[duongsarah]

Tôi sử dụng hàm today để làm nhật ký, nhưng mỗi ngày mở ra thì nó lại nhảy về ngày hiện tại. Xin mọi người giúp tôi làm cách nào để ngày trước phải giữ nguyên (không bị nhảy theo ngày mới)

ko có cách nào đâu [IMG]images/smilies/B47.gif[/IMG], trừ khi bạn nhập tay hàm Today() rồi chuyển nó thành value để nó ko nhảy khi sang ngày mới nữa thôi