Biểu đồ nhịp sinh học

[vuthithuytrang]

Thưa các thầy các huynh, hướng dẫn Trang cách sử dụng công thức vẽ nhịp sinh học trong bài báo sau với ạ

"#19 - trả lời: Khám phá nhịp sinh học
ngày đăng: 17/03/2007 11:19:00 PM bởi admin
Dưới đây là công thức cơ bản mà chúng tôi đã sử dụng:
Private Function Bio_Count(ByVal x As Decimal, ByVal scale As Decimal, ByVal height As Integer) As Integer
Return (height - (Sin((Math.PI / ((scale - 0) / 2)) * x) * height))
End Function

trong đó: x là số ngày từ khi sinh ra cho đến ngày hiện tại, scale là chu kỳ (ngày): 23,28..., height= 100 tính theo tỉ lệ 100%

Tất cả mọi người có thể sử dụng công thức này nhưng hãy ghi rõ nguồn xemngay.com khi sử dụng.
Xin cảm ơn các bạn đã quan tâm"
Theo : http://www.xemngay.com/webLog.aspx?blog=wld&postid=19 "
Trang xin được cám ơn ạ.

 

[ptm0412]

Hàm trong cái link đó không phải VBA, và sai.
Tôi đã sửa lại và vẽ 6 đường luôn.
Thay ngày sinh và ngày bắt đầu xem.

 

[vuthithuytrang]

Cám ơn thầy

Ôi thầy ơii, thầy làm việc khuya vậy ta, một hai giờ lúc í Trang đang ngủ khì lâu rùi.
Trang tò mò đọc trong : (Ðề tài: Nhật ký ngắn!!!) ạ
Còn chủ đề vẽ nhịp sinh học Trang nghĩ mình phải từ từ mới lĩnh hội được.
Trang đang đánh vật với tập tin (BieudoSinhhoc.xls),chưa biết phải nhập hàm thế nào, lại còn đang báo lỗi (#NAME)

nên không biết phải bắt đầu từđâu ạ, lại thấy trong các Cells góc trái trên đều có hình tam giác nhỏ
Cám ơn thầy đã quan tâm đến chủ đề này ạ​

 

[ptm0412]

Cải tiến, dùng 1 scroll bar để có thể dịch chuyển khoảng thời gian xem, có thể xem bắt đầu từ 01/01/2010 đến ngày bắt đầu là 01/01/2011
Ngoài ra có thể có chọn lựa xem trong khoảng từ 10 ngày đến 60 ngày bằng 1 scroll bar thứ 2.
Chỉ cần điền ngày sinh và dịch chuyển 2 scroll bar

Lỗi #Name? là do không enable macro, trong file có 1 hàm tính toán (function) viết bằng VBA. Phải set security medium, đóng excel lại, mở lên và nhấn nút enable macro.

 

[vuthithuytrang]

Ôi tuyệt vời, biểu đồ đẹp qúa. Trang thật biết ơn thầy.
Trang đang học bài : (Biểu đồ với số liệu các series có khoảng cách lớn) mà chưa tiến bộ mấy.
Mà thầy ơi, khi nào thong thả thầy giải nghĩa câu :"Thánh tắc ngô bất năng, ngô học bất yếm nhi giáo bất quyện dã " ở mục nào nhé
Em chào thầy ạ.

 

[ngocmaipretty]

Ôi tuyệt vời, biểu đồ đẹp quá.

Căn cứ vào biểu dồ sinh học, lấy ngày sinh của huynh chết tiệt để test, thì ngày hôm qua và hôm nay là ngày đường "Thẩm mỹ" của huynh ấy xuống thấp nhất, nên vẽ biểu đồ xấu tệ. Được cái, đường "Tình củm" lại gần đạt đến cực đại. Thùy Trang hên ghê ta.

Để Ngocmai vẽ lại xem có đẹp hơn tí hông nha. Với lại, cái hàm VBA đó khỏi xài, Ngocmai xài hàm Excel cho dễ hiểu.

Mí lị thêm 1 serie đánh dấu ngày today để tiện theo dõi.

 

[pipopig]

ngocmaiprettty xem giúp tại sao khi mình enter ngày sinh 04/16/1977 và xem từ ngày 7/20/2011 thì biểu đồ không hiển thị (trong biểu đồ, ngày bắt đầu vẫn là 2/10/2010 và kết thúc là 3/26/2010)...many thanks.

Căn cứ vào biểu dồ sinh học, lấy ngày sinh của huynh chết tiệt để test, thì ngày hôm qua và hôm nay là ngày đường "Thẩm mỹ" của huynh ấy xuống thấp nhất, nên vẽ biểu đồ xấu tệ. Được cái, đường "Tình củm" lại gần đạt đến cực đại. Thùy Trang hên ghê ta.

Để Ngocmai vẽ lại xem có đẹp hơn tí hông nha. Với lại, cái hàm VBA đó khỏi xài, Ngocmai xài hàm Excel cho dễ hiểu.

Mí lị thêm 1 serie đánh dấu ngày today để tiện theo dõi.

 

[ptm0412]

Bạn xem file mới dưới đây, thay min và max là ngày bắt đầu và ngày cuối mà bạn muốn xem vào 2 ô E2 và E3.
Thí dụ bạn muốn xem trong 2 năm 2011 và 2012, gõ E2 = 01/01/2011 và E3 = 31/12/2012

Nhớ enable macro, vì vẫn còn code cũ cộng thêm code mới.

 

[pipopig]

hề..hề...cảm ơn bạn ptm0412 đã giúp đỡ rất nhanh
công thức này chạy ngon rồi.

Bạn xem file mới dưới đây, thay min và max là ngày bắt đầu và ngày cuối mà bạn muốn xem vào 2 ô E2 và E3.
Thí dụ bạn muốn xem trong 2 năm 2011 và 2012, gõ E2 = 01/01/2011 và E3 = 31/12/2012

Nhớ enable macro, vì vẫn còn code cũ cộng thêm code mới.