VBA markere sidste kolonne dynamisk
Jeg har et faneblad for hver uge, samt et faneblad (data) som laver opsamling via indirekte formler.Da jeg skal overdrage opgaven har jeg skabt en VBA som min arvtager ikke laver fejl i opdateringen.
Sidste skridt er nu at yderste kolonne i data fanebladet (som i praksis f.eks. er uge 22 skal kopieres til næste kolonne (så der bliver en uge 23 i fanebladet). Grunden til at jeg ikke kan have dem fra start er at filen bliver meget langsom hvis der er indirekte henvisninger til faneblade der ikke eksisterer endnu (og jeg kan ikke oprette dem på forhånd).
Jeg optog hvad jeg gør i makroen her:
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.AutoFill Destination:=Range("C1:Y125"), type:=xlFillDefault
Range("C1:Y125").Select
Problemet er naturligvis at det skal gøres dynamisk.
Jeg planlagde at gå den tunge vej og finde adressen på øverste celle i sidste kolonne i data fanen, for så at markere og kopiere (nederste række er konstant), men tænkte nogle af jer måske havde en bedre ide?
