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

Thảo luận trong 'Excel và Các Biểu Đồ' bắt đầu bởi vuthithuytrang, 26 Tháng hai 2010.

  1. vuthithuytrang

    vuthithuytrang New Member

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

    "#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 ạ.
     
  2. ptm0412

    ptm0412 Excel Ordinary Member

    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.
     

    Các file đính kèm:

  3. vuthithuytrang

    vuthithuytrang New Member

    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 ạ​
     
    Last edited by a moderator: 28 Tháng hai 2010
  4. ptm0412

    ptm0412 Excel Ordinary Member

    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.
     

    Các file đính kèm:

    Last edited: 28 Tháng hai 2010
  5. vuthithuytrang

    vuthithuytrang New Member

    Ôi tuyệt vi, 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 ạ.
     
  6. ngocmaipretty

    ngocmaipretty New Member

    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.
     

    Các file đính kèm:

  7. pipopig

    pipopig New Member

    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.

     
  8. ptm0412

    ptm0412 Excel Ordinary Member

    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.
     

    Các file đính kèm:

  9. pipopig

    pipopig New Member

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


     

Chia sẻ trang này