Hej Er det muligt at tage en kopi fra regneark "Hjælpeark" og sætte ind i B4 i et vilkårligt regneark (det er salgsark, der er navngivet efter produktet) Range("B4").Select Windows("hjælpefil.xlsx").Activate Selection.Copy Windows("Produkt xx.xlsm").Activate 'det er denne linje der skal være variabel. ActiveSheet.Paste
Der er mange metoder, her er en, som smider B4 ind i K12
Sub spm_1034317() Dim wbTarget As Workbook, wbSource As Workbook
Set wbTarget = ActiveWorkbook Set wbSource = Workbooks("Produkt xx.xlsm")
wbTarget.Worksheets("Ark1").Range("K12").Value = wbSource.Worksheets("Ark1").Range("B4").Value End Sub
Synes godt om
Ny brugerNybegynder
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.