---

Jeg er begyndt og løbe en tur på 7100 meter 3 gange om ugen

Jeg ville gerne lave sådan et lille program som regner hvor mange km i timen
jeg løber

I dag løb jeg turen på 43 min.

Hvordan laver jeg en lille funktion i vb6 som regner ud hvor mange km i
timen jeg løb


/ Jens

---

øøhhh... hvad med:

hastighed = distance / tid

hvis du har din distance i meter og din tid i minutter skal du for at få det
i km/time gange med 0,06



"Jens" <til@infojens.dk> skrev i en meddelelse
news:3d5195eb$0$72754$edfadb0f@dspool01.news.tele.dk...
>
> Jeg er begyndt og løbe en tur på 7100 meter 3 gange om ugen
>
> Jeg ville gerne lave sådan et lille program som regner hvor mange km i
timen
> jeg løber
>
> I dag løb jeg turen på 43 min.
>
> Hvordan laver jeg en lille funktion i vb6 som regner ud hvor mange km i
> timen jeg løb
>
>
> / Jens
>
>

---

"Mads Chr. Olesen" <MadsChrO@Yahoo.com> wrote in message
news:ait1rq$79a$1@sunsite.dk...
> øøhhh... hvad med:
> hastighed = distance / tid
> hvis du har din distance i meter og din tid i minutter skal du for at få
det
> i km/time gange med 0,06

Kald mig bare Mads, men det forstod jeg sikke :-/

--
Mvh.... Tim Sørensen
http://www.dondata.dk/

---

"Tim Sørensen" <dondata@vip.cybercity.dk> escribió

> Kald mig bare Mads, men det forstod jeg sikke :-/

Eksempel:

Jens løber 7100 meter på 43 minutter (han er da i god form ham jens)

Hastighed= 7100meter/43minutter =
165 meter/minut =
165/1000 Km/minut =
0,165 Km/minut =
0,165*60 km/time =
9,9 km/timen

(der er afrundet lidt her og der)

Med venlig hilsen
Lars Hoffmann

---

165 meter/minut =
165/1000 Km/minut =
0,165 Km/minut =
0,165*60 km/time =

Og disse 4 erstattes af * 0.06

"Lars Hoffmann" <lars@intercambiodvd.com> skrev i en meddelelse
news:aitprs$t4u$1@newsreader.mailgate.org...
>
> "Tim Sørensen" <dondata@vip.cybercity.dk> escribió
>
> > Kald mig bare Mads, men det forstod jeg sikke :-/
>
> Eksempel:
>
> Jens løber 7100 meter på 43 minutter (han er da i god form ham jens)
>
> Hastighed= 7100meter/43minutter =
> 165 meter/minut =
> 165/1000 Km/minut =
> 0,165 Km/minut =
> 0,165*60 km/time =
> 9,9 km/timen
>
> (der er afrundet lidt her og der)
>
> Med venlig hilsen
> Lars Hoffmann
>
>

---

Jeg har kommet til en løsning i Excel...

hvis nogle skulle være nysgerrig blev min kode sådan her

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)

Dim s As String
Dim temp As Single

s = Replace(Target.Address, "$", "")

If Left(s, 1) = "A" Then
s = Right(s, Len(s) - 1)
If ActiveSheet.Range("a" & s).Value = "" Then Exit Sub
temp = 7100 / ActiveSheet.Range("a" & s).Value * 60
temp = temp / 1000
ActiveSheet.Range("b" & s).Value = Format(temp, "##,##0.00") & " km/t"
End If

End Sub

Men her er der altså kun tale om minutterne


/ Jens

"Lars Hoffmann" <lars@intercambiodvd.com> skrev i en meddelelse
news:aitprs$t4u$1@newsreader.mailgate.org...
>
> "Tim Sørensen" <dondata@vip.cybercity.dk> escribió
>
> > Kald mig bare Mads, men det forstod jeg sikke :-/
>
> Eksempel:
>
> Jens løber 7100 meter på 43 minutter (han er da i god form ham jens)
>
> Hastighed= 7100meter/43minutter =
> 165 meter/minut =
> 165/1000 Km/minut =
> 0,165 Km/minut =
> 0,165*60 km/time =
> 9,9 km/timen
>
> (der er afrundet lidt her og der)
>
> Med venlig hilsen
> Lars Hoffmann
>
>

---

Jens skrev:
> Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As
Range)
....
> End Sub
>
> Men her er der altså kun tale om minutterne

Ja, jeg ved godt at det ikke har meget med VB at gøre, men hvorfor
bruger du ikke blot en formel direkte i Excel?

Eksempelvis kan denne formel vise hastigheden som kilometer pr. time,
hvis A1 indholder afstanden i meter og B1 indeholder tiden angivet på
formen HH:MM:SS (kræver at man først sætter cellens format til
"Klokkeslet":

=A1/1000/(TIME(B1)+MINUT(B1)/60+SEKUND(B1)/3600)

Bemærk: Undskyld funktionsnavnene, men jeg havde kun en dansk Excel
lige ved hånden.

-------
Tomas

---

> Eksempel:
>
> Jens løber 7100 meter på 43 minutter (han er da i god form ham jens)

Mener du seriøst at man er i god form, hvis man løber 7,1 km på 43 minutter?

---

test test skrev:
> Mener du seriøst at man er i god form, hvis man løber 7,1 km på 43
minutter?

Mener du seriøt at du hedder "test test"?

-------
Tomas

---

Juhuuu - jeg har fået ændret mit navn!

---

Henrik skrev:
> Juhuuu - jeg har fået ændret mit navn!

Det ka' vi li' at se!

-------
Tomas