Trinn for trinn: Gi nytt navn til Excel-ark med celleinnhold ved hjelp av Makro

2024-06-06
Gjelder for: Excel for Microsoft 365, Excel 2019, Excel 2016, Excel 2013, Excel 2010, Excel 2007, Excel 2003

Denne artikkelen er skrevet av Raddini Rahayu, Microsoft MVP.

Tilfelle

Her er ukentlige salgsaktivitetsrapporter. Det er for eksempel 15 personer i dette tilfellet. Nancy, administratorrapportene, tilordnes sammendrag av hver salgsdata i én fil der alle salgene er atskilt på hvert ark. For enkelt å ordne data, gav hvert ark Nancy navnet samsvarer med salgsnavnet på det arket. I begynnelsen føler Nancy seg komfortabel med dette, men etter hvert som mer data og krever rask behandling, ble Nancy så overveldet. For å løse dette vil Nancy endre navnearkene automatisk i henhold til salgsnavnet på hvert ark uten å gi det nytt navn manuelt.

Skjermbilde av de ukentlige salgsaktivitetsrapportene.

Løsninger

De beste løsningene for å løse Problemet med Nancy er å bruke makro. Denne makroen er utformet for hvert ark i filen uavhengig av antall ark. Navnet på hvert ark endres i henhold til salgsnavnet som er bestemt på samme sted på hvert ark.

Slik kjører du

Første trinn

Utforme rapportformater og angi celleplasseringen der salgsnavnet skal plasseres. I dette tilfellet er plasseringen på celle J2. Dette rapportformatet må være det samme på hvert ark.
Behold arknavnene på standardnavnet (Ark1, Ark2, Ark3 osv.).

Siste trinn

Trinn for makrokoding

Når vi vet hvilken celleplassering salgsnavnet skal plasseres i, kan vi nå fortsette neste trinn, makrokoding.

Velg Visual Basic i kodekategorien på Utvikler-fanen, eller trykk tastekombinasjonen ALT+F11 på tastaturet, slik at Visual Basic-vinduet vises.

Klikk (Arbeidsboknavn) i prosjektoppgaveruten, velg Modul på Sett inn-menyen, og skriv følgende skript:

Sub RenameSheet()

Dim rs As Worksheet

For Each rs In Sheets
rs.Name = rs.Range("B5")
Next rs

End Sub

Skjermbilde som viser trinnene for å skrive skriptet i arbeidsboken Report.xlsx salg.

Trykk F5-tasten på tastaturet, hvis det ikke finnes noen feilsøking, lukker du Visual Basic-vinduet og går tilbake til Excel. Hvis det er feilsøkt, kan du sjekke tilbake skriptet.
Gå tilbake til Excel og se hva som skjer, hvis kodene er riktige, nå er navnet på hvert ark endret i henhold til det eksisterende salgsnavnet på hvert ark.

Det var det hele. Forhåpentligvis nyttig.

Ansvarsfraskrivelse for informasjon fra tredjeparter

Tredjepartsproduktene som er omtalt i denne artikkelen, produseres av selskaper som er uavhengige av Microsoft. Microsoft gir ingen garantier, implisitt eller på annen måte, om disse produktenes ytelse eller pålitelighet.

Del via