Xin hàm "gomonth()" (2 người xem)

[chibi]

Pác nào có hàm "gomonth()" cho tôi xin.
Ví dụ: A1=01/03/2007 (dd/MM/yyyy)
gomonth(A1,3)=01/06/2007; gomonth(A1,-2)=01/01/2007

 

[SA_DQ]

(ó phải cái ni không?

Pác nào có hàm "gomonth()" cho tôi xin.
Ví dụ: A1=01/03/2007 (dd/MM/yyyy)
gomonth(A1,3)=01/06/2007; gomonth(A1,-2)=01/01/2007

[b]Function GoMonth(Rng As Variant, iMonth As Integer) As Variant[/b]
       If Not IsDate(Rng) Then 
              GoMonth = "Khong Phai, Ngai Oi!"
       Else
              GoMonth = DateSerial(Year(Rng), Month(Rng) + iMonth, Day(Rng))
       End If
[b]
End Function[/b]

 

[chibi]

Cảm ơn SA_DQ. Đơn giản thế mà không nghĩ ra (DateSerial), mình cứ tạo lòng vòng mãi.

 

[OverAC]

Dùng hàm thuần tuý
=date(year(),month()+3,day())

Cho hỏi thêm trong trường hợp ngày hiện tại là ngày 31, thêm 3 tháng nữa ra thì ngày cuối tháng là ngày khác ví dụ tháng chỉ có 30 ngày thì bạn muốn cho nó hiện ra ngày nào. Hày là thông báo lỗi như bác Sa_DQ làm.

 

[chibi]

Theo tôi nghĩ, để giải quyết vấn đề mà OverAc đưa ra thì cần có hàm cho biết số ngày của một tháng (ví dụ 5/2007=31; 6/2007=30). Không biết trong Excel có không?

 

[OverAC]

Theo em cần giải quyết vấn đề luận lý trước. Tức là rơi vào những trường hợp đó thì thực tế mình xử lý nó như thế nào sau đó đưa phân tích nêu lên công thức. Việc xác định số ngày trong tháng không phải là vấn đề quan trọng lắm.