---
title: "Excel-fråga..."
type: "forum-thread"
url: "https://www.webforum.nu/amne/kontorsprogram/54302-excel-fråga"
topic: "Kontorsprogram"
topic_url: "https://www.webforum.nu/amne/kontorsprogram"
author: "ChrOmeE"
published: "2002-09-26T06:50:13.000Z"
updated: "2002-09-26T17:13:36.000Z"
replies: 2
views: 297
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/kontorsprogram/54302-excel-fråga"
---

# Excel-fråga...

## #1 — ChrOmeE, 2002-09-26T06:50Z

Hej!
Jag sitter och håller på med en liten excel-fil som jag har fyra kollumner i: referensnr (tal), Kommentar, Datum samt vecka.
När jag har fyllt i referensnummer och kommentaren och trycker enter vill jag att datum-kollumnen skall fyllas i efter följande syntax: ÅÅÅP-MM-DD - HH:MM ex: 2002-09-26 08:41
Jag vill även att veckonummer skall fyllas i beräknat på datumet.
Skulle även vilja ha ett makro som automatiskt fixar detta när jag trycker CTRL+t
Tacksam för hjälp
/Erik

Permalänk: https://www.webforum.nu/p/54302

## #2 — Danvik, 2002-09-26T11:43Z

Sub DatumTidVeckonr()
'
' Infogar datum och tid i aktiv cell
' samt veckonummer i första cellen till
' höger om aktiv cell
'
    ActiveCell.FormulaR1C1 = "=NOW()"
    Selection.Copy
    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= \_
        False, Transpose:=False
    Application.CutCopyMode = False
    ActiveCell.Offset(0, 1).Select
    ActiveCell.FormulaR1C1 = "=VECKONR(RC\[-1\],2)"
    
End Sub

OBS! Jag är som framgår av koden ingen riktig programmerare, men detta tycks ändå fungera på det sätt som står angivet längst upp i kodsnutten.
Lycka till!

Permalänk: https://www.webforum.nu/p/797357

## #3 — XL-Dennis, 2002-09-26T17:13Z

Duget gott ;)

Permalänk: https://www.webforum.nu/p/797913

---

Tråden på webben: https://www.webforum.nu/amne/kontorsprogram/54302-excel-fråga