Oprettet man. d. 15. marts 2010 kl. 09:40:59

karina_n
karina_n (3.910 point. Point ude: 60)

Excel: automatisk indsættelse at tekst i arknavnet

Jeg har et regneark med 30-31 ark i bunden - 1 for hver dato.

Jeg har skrevet datoerne fra 1.-31. i et andet ark og vil gerne have, at den automatisk indsætter disse datoer på hvert ark.

Jeg har prøvet med: ActiveSheet.Name = "01-01-2010". Men så skal teksten skrives i makroen, hvor jeg hellere vil have at den henter fra de celler, jeg har lavet - så det er nemmere at ændre.

Skrevet man. d. 15. marts 2010 kl. 10:23:45| #1

supertekst
supertekst (95.044 point)
supertekst-it.dk
Anbringes under ark1 (hvor datoer er opført)

Sub navngivArkFaner()
Dim ræk As Byte
    For ræk = 1 To 31
        If Cells(ræk, 1) <> "" Then
            ActiveWorkbook.Sheets(ræk + 1).Name = CStr(Cells(ræk, 1))
        End If
    Next ræk
End Sub

PS: I princippet kunne man nøjes med at indtaste den første dato -det ville så kræve lidt mere kode.

Skriv et indlæg




Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] [img]link til billede[/img]
Web- og emailadresser omdannes automatisk til links

Log ind

   

   

Seneste spørgsmål

insert user rating fra nettet... fx IMDb.com

Oprettet den 30. juli 2010 kl. 22.41
c_skytte giver 150 point for svar | Giv et svar »

Point til supertekst

Oprettet den 30. juli 2010 kl. 15.49
gammer giver 40 point for svar | Giv et svar »

Trække fil navn ud af variabel (makro)

Oprettet den 30. juli 2010 kl. 13.46
gammer giver 60 point for svar | Giv et svar »

Seneste guides

100% højde med CSS i alle browsere
XML
Autocad / 3D Max / Revit til Salg.





Tips & Tricks fra PC World

Teaser billede

Sådan får du mest ud af batteriet på din bærbare

Batterierne i den bærbare lever sjældent op til forventningerne, men det er ikke altid batteriernes skyld. Se her hvordan du får mest muligt ud af dine batterier.


Anmeldelser fra PC World

Teaser billede

GTX460: Grafikkort med fin ydelse til rimelige penge

De store grafikkort løber med opmærksomheden, men det er i mellemklassen at de gode køb findes. Et af dem er det helt nye Nvidia GTX460. Se kortets resultater her.


Seneste blogindlæg

Teaser billede

Nu kan du slettes

Det sker af og til at en bruger ønsker at slette sin profil her på Eksperten. Det har vi haft svært ved, men nu kan du gøre det nemt og enkelt. Alt du skal gøre er at logge ind, gå ind på...


Nyheder fra PC World

Teaser billede

Test: Stream nye spil til gamle computere

Det er slut med at investere tusindvis af kroner i dyr hardware for at kunne spille de nyeste spil - amerikansk firma lader stor serverfarm klare arbejdet og streamer spillene til dig via nettet....


Nyheder fra Computerworld

Teaser billede

Test din viden med Computerworlds store sommerquiz

4. del: Brug agurketiden til at få opdateret din viden om it-branchen, og test for sjov om kollegerne på ferie eller derhjemme er lige så skarpe. Computerworld quizzer hver uge hele sommeren.



Kurser
Samarbejdspartnere

Udgiver · © 2010 IDG Danmark A/S · Hørkær 18 · 2730 Herlev · Tlf.: 77 300 300 · Fax: 77 300 301