Avatar billede tmaluparts Nybegynder
27. september 2007 - 13:39 Der er 2 kommentarer og
1 løsning

Finde den sidste bestemte værdi i en kolonne og så tilføje noget

Hej Eksperter

Jeg førsøger at lave en meget simpel stempelur. I første omgang kun for at registrere komme/gå tider. Brugeren vælger sit navn for derefter at vælge om han/hun vil stemple ind eller ud. Det med at stemple ind går fint men når man skal stempel ud, skal jeg jo finde den sidst registret komme-tid for den bestemte person og så tilføje gå-tiden i kolonne ved siden af. Hvad gør jeg?

I kolonne A er navn
I kolonne B er kommetid
I kolonne C skulle gå-tiden så gerne puttes ind
Avatar billede excelent Ekspert
28. september 2007 - 10:36 #1
et eks. skal jo nok tilrettes efter aktuelle forhold

Sub test()

Set sh1 = Sheets("Ark1")
rk = sh1.Cells(65500, 1).End(xlUp).Row
navn = InputBox("Navn")
udTid = Format(Now, "hh:mm:ss")

Range("C2:C" & rk).SpecialCells(xlCellTypeBlanks).Select

For Each c In Selection
If c.Offset(0, -1) <> "" And c.Offset(0, -2) = navn Then c.Value = udTid
Next
Cells(1, 1).Select

End Sub
Avatar billede tmaluparts Nybegynder
01. oktober 2007 - 09:51 #2
Det var lige det jeg manglede. Smider du et svar!
Avatar billede excelent Ekspert
01. oktober 2007 - 12:30 #3
nemli ja :-)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester