Avatar billede Michael B. Bom Juniormester
29. september 2016 - 10:48 Der er 1 kommentar og
1 løsning

Finde dags dato i en kolonne - via VBA

Jeg skal finde dags dato, så regnearket åbner på aktuel dato (uge)

Datoer er f.eks. i rk 2
Ugenr. er i rk 1

Jeg kan godt få det til at virke når datoer står i en kolonne, men ikke når det står i en række (1 kalenderår + 1 uge)

Jeg kan godt få det til at virke når det er i en kolonne, men nu har jeg brug for det i en række
Avatar billede jkrons Professor
29. september 2016 - 11:57 #1
Prøv med noget i denne stil

    For Each c In Range("a2:al2").Cells
        If c.Value = Date Then
            c.Activate
            Exit Sub
        End
Next
Avatar billede Michael B. Bom Juniormester
16. oktober 2016 - 17:06 #2
Hej,

Løsningen blev:

Private Sub Workbook_Open()

 
  ' Vælger det rigtge ark
  Worksheets("Projekter").Activate
 
  ActiveSheet.Range("G5").Select

  While ActiveCell.Value < Date
 
    ActiveCell.Offset(0, 1).Select
  Wend
 
  ActiveCell.Offset(-1, 0).Select
 

End Sub
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

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