[mikcor]

Hallo,

ich habe mir die Excel-Vorlage: NovaStyleColorizedExcel.zip runtergeladen und finde die spitze. Nur leider ist diese für mg/dl gemacht, nicht für mmol. Da ich in mmol rechne, weis nicht vieleicht kann sie jemand aktualisieren, da ich net so begabt bin in Excel. Er zeigt die Werte bei mmol nicht in der höhenabstufung an, da bei der Tabelle nur die mg/dl Werte drinn sind.

Ich würde mich total freuen.

Danke im vorraus.

Viele Grüße

mikcor

[Alf]

Hallo Mikcor,

da es eine User-Vorlage ist, will ich da nicht statt der Autorin drin rumpfuschen aber die Anpassung ist rel. einfach zu finden:
Wenn Du die Vorlagendatei öffnest (Bei der Öffnen-Sicherheitsfrage->Makro aktivieren) musst Du unter Extras->Makro->Visual Basic Editor das Makro CreateOutput öffnen (sollte standardmäßig zu sehen sein.

Einmal nach unten geblättert findest Du den folgenden Code:

        '  BZ
        If bz >= 300 Then
            bz_row = cur_start_row + 2
        ElseIf bz >= 250 Then
            bz_row = cur_start_row + 3
        ElseIf bz >= 200 Then
            bz_row = cur_start_row + 4
        ElseIf bz >= 160 Then
            bz_row = cur_start_row + 5
        ElseIf bz >= 120 Then
            bz_row = cur_start_row + 6
        ElseIf bz >= 80 Then
            bz_row = cur_start_row + 7
        Else
            bz_row = cur_start_row + 8
        End If

Und der ist glaube ich selbsterklärend?! D.h. zum Beispiel Ändern in:

        If bz >= 16.5 Then
            bz_row = cur_start_row + 2
        ElseIf bz >= 14 Then
            bz_row = cur_start_row + 3
        :
        usw.
        usw.

Speichern und das sollte es gewesen sein...

[mikcor]

Danke.

Das Problem ist es funktioniert nicht. Ich mache das, speichere es ab, aber es steht dann immer noch mg/Dl und von 80 - 300.

mikcor

[ralfulrich]

Hallo Mikcor,

den BZ-Bereich A3 bis A9 musst Du per Hand anpassen und die mmol Werte reinschreiben...

[mikcor]

OK hat funktioniert, danke an euch beide.

Viele Grüße

mikcor