Avatar billede per2edb Praktikant
04. april 2014 - 21:43 Der er 4 kommentarer og
1 løsning

datoen som string lavet om til et tal

I vba skal jeg have datoen som string lavet om til et tal f.eks

01-02-2014  til 41671,0

har i en konverterings funktion
Avatar billede jens48 Ekspert
04. april 2014 - 22:29 #1
Prøv med
Selection.NumberFormat = "General"
Avatar billede jens48 Ekspert
04. april 2014 - 23:19 #2
Jeg misforstod dig i første omgang, så du får lige en makro, der laver strengen i celle A1 om:

Sub Makro1()
Dim x As String
Dim Year As Integer
Dim Month As Integer
Dim Day As Integer
  x = Range("A1")
  Year = Right(x, 4)
  Month = Mid(x, 4, 2)
  Day = Left(x, 2)
  Range("A1") = DateSerial(Year, Month, Day)
  Range("A1").NumberFormat = "General"
End Sub
Avatar billede bvirk Guru
05. april 2014 - 09:10 #3
clng(CDate("01-02-2014"))
Avatar billede per2edb Praktikant
05. april 2014 - 11:31 #4
Bvirk det virker tak
Vil du lave det så du kan få point
Avatar billede bvirk Guru
05. april 2014 - 18:17 #5
Ja vba's konverterings funktioner til simple typer, der alle begynder med C er værd at kende. Jeg valgte 'til long' da du adspurgte et tidspunkt uden klokkesæt (en dato), havde det været med klokkesæt ville f.eks. single float passe bedre:

CSng(cdate("01-02-2014 12:00"))

Det ses at tidspunkt i vba er implementeret som en dagstæller og dets 0 punkt er format(cdate(0),"dd-mm/yyyy")
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