03. februar 2010 - 21:47Der er
1 kommentar og 1 løsning
Automatisk generering af Exceldokumenter og faneblade
Hejsa,
Jeg har lavet noget VBA kode som kigger i ét regneark og gemmer en række kopier på baggrund af dette. Den eneste forskel skal blot være at navnet på de mange Excel dokumenter skal være navngivet ud fra indholdet af en kolonne: Sheets(2).Range("A2:A150")
Hvordan laver jeg lige sådan en løkke, hvor jeg løber dette range igennem ?
I lang tid har samarbejdsbranchen fokuseret på at forbedre enhedsfunktioner – bedre kameraer, klarere lyd og smartere software. Men den virkelige forvandling handler ikke om funktioner.
nu er den bare "hardcoded" med ét felt som her: NewName = ThisWorkbook.Sheets(2).Range("A2")
Jeg ønsker at den skal tage A2, A3, A4 osv og løbe igennem til den møder et tomt felt.
Dette er hvad der skal være inde i løkken for hvert nyoprettet dokument: ActiveWorkbook.SaveCopyAs Sti & " " & Format(Date, ("DD-MM-YYYY")) & "\Pricelist " & NewName & ".xls"
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.