CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede fredo Nybegynder
13. januar 2009 - 17:04 Der er 1 løsning

Makro der opretter nyt ark ud fra en skabelon

Hej.
Hvordan kan man smartest lave en knap med en tilknyttet makro der opretter et nyt ark ud fra en skabelon?

Er det desuden muligt at få en formularboks til at poppe op, når det nye ark oprettes, hvor man kan indtaste et, der dels bliver sat ind i det nye ark, dels bestemmer navnet på arket.

Det skal lige nævnes at jeg er temmelig grøn i programmering af makroer og derfor nok skal have det ind med ske for at forstå det…

/Fredo
Avatar billede fredo Nybegynder
19. januar 2009 - 10:29 #1
Jeg løste selv problemet med følgende makro:

sub nytark_generator()
    arknavn = InputBox("US no.")
    For Each ws In Worksheets
If ws.Name = arknavn Then
MsgBox "Nummer eksisterer allerede", , "Warning!"
Exit Sub
End If
    Next
   
    Sheets("skabelon").Copy Before:=Sheets("skabelon")
    ActiveSheet.Name = arknavn
    Sheets(arknavn).Range("B4") = arknavn
    Sheets(arknavn).Visible = True

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
Kategori
Excel kurser
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig
Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel Indlæg Oprettet Seneste aktivitet
Excel ark oplåsning Af FinnLauridsen i Excel 6 17/09/202515:05 17 minutter siden
Excel hjælp Af rudbech i Excel 6 12/09/202509:09 12/09/202510:52
VBA der vælger celler med værdi over 0 Af Excel Styrmanden i Excel 1 10/09/202510:07 10/09/202511:16
Hente data fra andet excelark VBA Af fajens i Excel 7 02/09/202511:29 03/09/202512:32
tæl sorteret data Af ABE15 i Excel 4 01/09/202521:04 04/09/202507:12
Se alle spørgsmål i kategorien Opret spørgsmål

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.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 21:07 Min harddisk er rød Af Jordegern i PC
I går 12:55 Oneplus bloototh Af johnnylassen i Andet netværk
17/0915:05 Excel ark oplåsning Af FinnLauridsen i Excel
17/0913:39 Postman Af OBS i Andet software
16/0911:19 Google maps - downloaded - samlet overblik? Af 1Dorte i Andet software
White papers
Flere white papers »


Premium
Teaser billede
Nyder godt af kæmpe blodbad i Broadcoms netværk af VMware-partnere
Læs mere »
Sådan har TDC Erhverv udviklet den sikre data-motorvej ind i Danmarks nye AI-supercomputer: Har taget blot tre måneder
Tidligere Ecco-CIO Ulrik Balling Hansen lander internationalt topjob
LA, SF og erhvervslivet er enige: Sådan opnår Danmark digital suverænitet
Se alle »
Computerworld
Teaser billede
I aften sker det: Din iPhone får en monumental opdatering
Læs mere »
Apples nye AirPods Pro 3 er proppet med nyt – nu er det meget mere end nogle høretelefoner
Microsoft tvangsinstallerer app i din Office 365 i næste måned: Du kan ikke slippe
Alt om Apples store opdatering til iPhone, Mac, Watch og iPad
Se alle »
CIO
Teaser billede
Til kamp mod legacy og teknisk gæld: Uffe har skrottet 200 servere og 1.000 routere og switches på 140 lokationer
Læs mere »
Microsoft opsplitter Office og Teams: Sådan fungerer opdelingen
”Det fylder helt oppe på direktionsgangene:" Danske topkonsulenter løfter sløret for det allervigtigste it-tema lige nu
Overgangen til Windows 11 kan udløse store bøder, hvis du ikke passer på
Se alle »
Job & Karriere
Teaser billede
Tryg skiller sig af med 225 it-medarbejdere: Outsourcer stor del af sin it-drift til indere
Læs mere »
Lille dansk it-virksomhed fra Vanløse lander drømmekontrakt, der rækker langt ind i stifterens pension
Her er fidusen: Sådan fastholder KMD og Twoday deres it-folk i lang tid
Novo Nordisks CIO og digitale topchef, Anders Romare, forlader selskabet
Se alle »
White paper
Teaser billede
Specialister med særlige evner: Din skjulte konkurrencefordel
Læs mere »
Udnyt Genesys Cloud CX optimalt og styrk kundeoplevelsen
Er I klar til at tage næste skridt på den digitale retailrejse?
Sådan får du succes med AI i hele organisationen
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »