Makro henter fra forkert celle
Jeg har denne makro, som jeg har fået hjælp til herinde. Og den virker fint der hvor jeg startede med den.Nu er jeg så ved ved at lave en ny version af arket ”Liste”, det er stort set identisk med det gamle, enkelte felter er flyttet lidt rundt, og selve makroen til opdatering af det ark er ændret lidt. Udfordringen er, at nu henter nedenstående makro ikke fra de rigtige felter, og jeg kan simpelthen ikke gennemskue hvorfor. I stedet for G1:H1 henter den B7, og næste gang B8 etc. Jeg har også prøvet at navngive området G1:H1, det hjalp heller ik-ke. Hvad er det, der går galt?
Sub OpdaterGrafMakro()
Dim LastRow As Long
LastRow = Worksheets("Dataark_Ingen_Indtastning").Cells(65356, 1).End(xlUp).Row
If Date = Worksheets("Liste").Range("A2") And Work-sheets("Dataark_Ingen_Indtastning").Cells(LastRow, 1) <> Date Then
Worksheets("Liste").Range("G1:H1").Copy Destina-tion:=Worksheets("Dataark_Ingen_Indtastning").Cells(LastRow + 1, 2)
Worksheets("Dataark_Ingen_Indtastning").Cells(LastRow + 1, 1) = Date
End If
End Sub