Benytte mig af active sheet, istedet for
Hej har lidt VBA kode der driller mig lidt, koden virker fint, men i stedet for at hente fra et ark der hedder "uge" skal den tage værdien fra Active.sheet, men kan ikke få den til det.Her er kodestykket:
Dim rMatch As Range
Set rMatch = Sheets("År").Range("A7:l141").Find(Sheets("Uge").Range("A118").Value)
If Not rMatch Is Nothing Then
ActiveSheet.Range("d119:d135").Copy
rMatch.Offset(1, 0).PasteSpecial xlPasteValuesAndNumberFormats, Transpose:=False
End If
Find(Sheets("Uge").Range("A118").Value)
Er her jeg ikke vil have den skal hente fra arket Uge, men fra mit åbne ark.