Print side | Luk vindue

Rette indspillet macro

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Makro og VBA
Forum beskrivelse: Hjælp til Makroer og VBA-programmering
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=4926
Udskrevet den: 27.Nov.2024 kl. 05:11


Emne: Rette indspillet macro
Besked fra: hejstrup
Emne: Rette indspillet macro
Posteringsdato: 07.Maj.2023 kl. 09:32
Jeg har "arvet" en indspillet macro som har brug for en opfriskning. Den formaterer 7 ark (en uge), men jeg kunne godt tænke mig den blot formaterede "alle" importerede ark uden hensyn til arknavne ?
Er der en nem og hurtig løsning på det - se vedhæftede-
På forhånd tusind tak. uploads/392/Sub_Ny.docx" rel="nofollow - uploads/392/Sub_Ny.docx


-------------
vh hejstrup



Svar:
Besked fra: maxzpad
Posteringsdato: 08.Maj.2023 kl. 15:15
Hej hejstrup

Ændrer du manuelt arknavnene i makroen fra gang til gang, f.eks. fra " 0105" til " 0805" her i maj måned? Er der en særlig grund til, at der er et mellemrum foran datoen? (måske bliver de bare importeret sådan)

Og ved du, hvorfor makoen i linjen Application.Run "'t1 Indlæs nummer.xlsm'!Slet_nummer" skal køres? Hvad gør denne makro?

Makroen bør bestemt kunne forbedres, således alle ark formateres uanset deres navn, men i slutningen af makroen skal et ark med navnet "Start" vælges, jf. linjen Sheets("Start").Select. Er det rigtigt antaget, at dette ark IKKE skal være omfattet af formateringen?



Mvh Max


Besked fra: hejstrup
Posteringsdato: 08.Maj.2023 kl. 17:56
Hej. Arkene har deres navn fra den dato de downloades, mellemrummet er jeg ikke klar over betydningen af, men formentligt har det ingen.
Der returneres til arket "Start", hvilket er det eneste ark i den workbook inden data downloades, Jeg er lige ved og tro jeg har uploaded en forkert macro. Arknavne kan både optræde som datoer og/eller eks. ma, ti, on osv. uploads/392/2._forsøg.txt" rel="nofollow - uploads/392/2._forsøg.txt


-------------
vh hejstrup


Besked fra: maxzpad
Posteringsdato: 09.Maj.2023 kl. 08:26
Prøv at se om dette fungerer for dig:
uploads/1747/Ny_format.txt" rel="nofollow - uploads/1747/Ny_format.txt

Mvh Max


Besked fra: hejstrup
Posteringsdato: 09.Maj.2023 kl. 08:50
Perfekt, tak for hjælpen.
dbh hejstrup


-------------
vh hejstrup


Besked fra: maxzpad
Posteringsdato: 09.Maj.2023 kl. 09:02
Selv tak.

Hvis du er tilfreds med løsningen, vil jeg sætte pris på, at du markerer den som Accepteret Smile

Mvh Max



Print side | Luk vindue