Søg
Avatar billede kol Nybegynder
12. oktober 2003 - 12:26 Der er 11 kommentarer og
1 løsning

Indsætte tidspunkt "nu"

Jeg vil gerne i en celle kunne indsætte aktuel tid i formatet tt:mm. Tiden skal være fixeret, altså ikke opdateres løbende.
Jeg vil lave en makro som styres af en knap. Begge dele kan jeg selv, men aktuel tid volder problemer. Dels opdaterer den hele tide og dels består den af dato og tid med sekunder.

Hvordan er det nu lige man gør?

Hilsen KOL
Avatar billede Flemming Vadet - Smart Office DK Professor
12. oktober 2003 - 12:28 #1
Sub Demo()
    ActiveCell.Value = Format(Now(),"tt:mm")
End Sub
Avatar billede Flemming Vadet - Smart Office DK Professor
12. oktober 2003 - 12:30 #2
Det kan godt være du lige skal ændre tt til hh.......!
Sub Demo1()
    ActiveCell.Value = Format(Now(),"hh:mm")
End Sub

Skal det være en specifik celle så:

Sub Demo2()
    Worksheet("Ark1").Range("A1").Value = Format(Now(),"hh:mm")
End Sub
Avatar billede kol Nybegynder
12. oktober 2003 - 12:49 #3
Hej Flemming,

Du er lynhurtig.
Jeg ønsker muligheden i flere celler, fra B6 til O11.
Tanken er, at jeg laver en makro, som tilknyttes en knap på værktøjslinien.
Der skal ikke indsættes værdier i alle den nævnte celler, men i vilkårlige celler efter mit valg.
Jeg kan ikke få din makro til at gøre dét.

KOL
Avatar billede Flemming Vadet - Smart Office DK Professor
12. oktober 2003 - 12:56 #4
Er der nogle specielle kriterier for, hvilke celler det skal indsættes i ????

F.eks. har du markeret flere celler, så det skal indsættes i alle de markerede celler ?

Sub Demo3()
    Dim rCell As Range
    For Each rCell In Selection
        rCell.Value = Format(Now(),"hh:mm")
    Next rCell
    Set rCell = Nothing
End Sub
Avatar billede Flemming Vadet - Smart Office DK Professor
12. oktober 2003 - 12:57 #5
eller skal der aflæses et eller andet, som bestemmer hvilke celler det skal være ?
Avatar billede kol Nybegynder
12. oktober 2003 - 13:09 #6
begge.
Jeg har et regneark, hvor jeg skal regne en total tid ud baseret på tidsintervaller, som baseres på starttidspunkt og sluttidspunkt, førstnævnte trukket fra sidstnævnte.
Det er start- og sluttider, som jeg vil indsætte ved tryk på en knap.
Og, som sagt, ikke alle celler skal udfyldes, kun dem, jeg selv vælger.
Avatar billede Flemming Vadet - Smart Office DK Professor
12. oktober 2003 - 13:11 #7
Spørgsmålet er hvordan du selv vælger dem........... hvis det er INDEN (knap-tryk), så kan ovenstående bruges.......
Avatar billede kol Nybegynder
12. oktober 2003 - 13:36 #8
Jeg har et regneark, som jeg har gemt som en skabelon. Den er altså ens hver gang jeg åbner en ny.
De celler, det handler om, er B6 til 011. Kan de markeres som Range i skabelonen og dermed være parate til "knappen"?
Jeg går ud fra at det dit svar 2, som så kan virke?

KOL
Avatar billede Flemming Vadet - Smart Office DK Professor
12. oktober 2003 - 16:13 #9
Ved ikke lige hvordan din skabelon ser ud, men du kan jo ændre den til :

Sub Demo3()
    Dim rCell As Range
    For Each rCell In Worksheets("Ark1").Range("B6:O11").Cells
        rCell.Value = Format(Now(),"hh:mm")
    Next rCell
    Set rCell = Nothing
End Sub

Jeg måske ikke helt klart fattet hvad der skal ske - trin for trin....!
Avatar billede Flemming Vadet - Smart Office DK Professor
13. februar 2004 - 10:35 #10
Fik du det løst ?
Avatar billede kol Nybegynder
01. november 2004 - 17:11 #11
Det trak vist lidt ud!
Dit sidste forslag var OK, men jeg fik ikke min idé til at fungere , som jeg ville.
Tak for indsatsen Flemming.

Hilsen KOL
Avatar billede kol Nybegynder
22. februar 2005 - 17:45 #12
UPS, det var vist et hængeparti.
Pointene er vist alligevel godt fortjent af flemming.

Hilsen KOL
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
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Ændre tal i en celle Af xvid i Excel 1 04/09/202616:05 04/09/202616:54
Kan Excel selv beregne alder? Af leahcim i Excel 7 31/08/202610:24 04/09/202602:08
problem med mailbesked Af Pestilensen i Excel 3 24/08/202611:16 28/08/202612:55
Sætte billeder ind i google sheets ark ud fra elev nummer Af lurup i Excel 18 17/08/202615:14 05/09/202622:04
Gemme største værdi Af Lemming@privat.dk i Excel 2 07/08/202622:13 08/08/202609:03
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
IT-JOB

Capgemini Danmark A/S

Client Partner

Politiets Efterretningstjeneste

Centerchef til Center for Applikationer i PET

Capgemini Danmark A/S

Market Segment Lead, CPRD

Politiets Efterretningstjeneste

Bliv iOS hacker i PET og få en unik mulighed i et hemmeligt miljø

Kræftens Bekæmpelse

IT-driftsleder
Seneste spørgsmål Seneste aktivitet
18/0919:52 Libre office skriveprogram Af Frank i Office & Kontorpakker
17/0914:55 Hente WordPad til Windows 11 Af Strawberry i Andet software
17/0911:37 Persits.Upload Af bsn i ASP
16/0918:13 oprette et installationsmedie Af Malm i Windows
16/0913:11 Adapterstik stik på ladekabel til USB-C Af ErikHg i Andet software
White papers
Flere white papers »