Avatar billede sigyn Seniormester
10. februar 2023 - 08:34 Der er 1 kommentar

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
Avatar billede Jan Hansen Ekspert
10. februar 2023 - 09:54 #1
Prøv denne makro
har brugt en del flere variable da man lettere kan teste om tingene er som de skal være med debug.print

https://www.dropbox.com/scl/fi/8n4ovaq6u8mqpl8zcldtd/Makro-henter-fra-forkert-celle.xlsm?dl=0&rlkey=a5w7gs8l8mdq3p0e8a91z5s08

Mvh Jan
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

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.

Du kan også logge ind via nedenstående tjenester