Aplicația Excel, cu motorul macro încorporat în VBA, este cel mai potrivit pentru aceste scopuri.
Bioritmuri umane
Eu personal nu cred cu adevărat, dar ceva timp în urmă a existat o teorie populară despre cele trei, ritmuri neschimbătoare (activitate fizică, intelectuală și emoțională cu perioade de 23, 28, 33 de zile, respectiv), calculate de la data nașterii.
Ei bine, de ce nu pune acest algoritm pe VBA.
Fig.1 Bioritmuri umane
Dar, în general, atunci, că indicatorii (valorile) ale condiției umane (atât fizice, cât și emoționale și intelectuale) de schimbare a lungul timpului - este „Nu merg la o avere.“ Oricine dintre noi poate găsi cu ușurință exemple din propria noastră experiență. În anumite zile, chiar și după ce ați făcut o mulțime de muncă fizică sau intelectuală - nu există absolut nici o oboseală. Ce nu se poate spune despre alte zile (care nu au reușit pentru acest tip de activitate).
Aceasta este doar o chestiune de sinusoidal, fie că este vorba de leagăne? Și mai mult. cât de stabilă este perioada lor?
Poate să stabilească indicatori ai condiției umane este mai bine să utilizeze programul și programul de testare non-sinusoidale, la o anumită zi și, astfel, pentru a determina potențialul lor de vedere fizic, emotional si intelectual pentru ziua de azi
Cicluri fizice, emoționale, intelectuale
Componenta fizică a stării unei persoane își caracterizează energia. Prin urmare, concentrându-se pe acest indicator, puteți vorbi despre rezistență, dedicare, inițiativă, ambiție.
Componenta emoțională este o sensibilitate la percepția tuturor factorilor externi și a experiențelor interne (probleme). Prin urmare, în zilele individuale intuiția omului este izbitoare. De asemenea, cu acest indicator conectați abilitățile creative ale individului.
Componenta intelectuală se referă la posibilitățile de activitate mentală. Logica, raționalitatea, numărarea fără erori și enumerarea opțiunilor, plus, într-o oarecare măsură, prudență.
Program pentru calcularea valorilor pentru o anumită zi (sau săptămână)
Numărăm numărul de zile de la data nașterii până la ziua specificată.
SumDays = DateDiff ("d", Celule (2, 1), Data + sf)
unde
SumDays - suma zilelor
Data - o funcție care returnează data sistemului calculatorului (data de astăzi)
sf - compensare de la data de astăzi (stânga sau dreapta)
Găsim una câte una, prin operatorul Mod. restul diviziunii (modulo) de lungimea fiecărui ciclu.
Traducem acest rest în radiani, presupunând că întregul ciclu este 2π radiani Și găsim sinusul.
Aceasta va fi valoarea unuia dintre indicatorii (fizici, emoționali sau intelectuali), care variază sinusoidal de la -1 la 1 și înapoi.
"a parametrului dat pentru o anumită zi
Funcția privată Znachenie (D ca întreg, z ca întreg) Ca dublu
Znachenie = Sin (2 * Pi * D / z)
Terminați funcția
unde
D este restul modulo (sau numărul de zile din ultimul ciclu neterminat)
z este lungimea perioadei ciclului
Ieșiți într-o diagramă Excel folosind VBA
Puteți schimba schema de culori a graficului în funcție de preferințele dvs.
Citirea intervalul diagramă de date pot fi, de asemenea, modificat (de exemplu, pentru a face lunar, mai degrabă decât săptămânal, așa cum este acum), ci numai împreună cu macro, care calculează și umple fiecare celula în Excel Excel trei linii de cicluri corespunzătoare.
Mă pot consulta în legătură cu întrebările VBA pe tema dvs. Vă rugăm să ne contactați.
Cui este interesant, descărcați fișierul xls
Asta e tot! Dacă după ce faceți clic pe "Start" nu vedeți rezultatul, atunci nu aveți activat macrocomenzi.
Condiții pentru obținerea codului? Arată?
Alte exemple privind "Metodele matematice ale graficii 3D 2D"
Alte exemple în limba "Visual Basic for Application - VBA"
Dacă aveți întrebări, le puteți întreba făcând clic pe acest buton.