Avatar billede Butterfly Ekspert
20. august 2020 - 11:30 Der er 2 kommentarer

Tilbage til aktuelt regneark

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
Avatar billede Juul Forsker
20. august 2020 - 11:41 #1
Dim Arbejdsark
Arbejdsark = ActiveWorkbook.Name
Windows(Arbejdsark).Activate
20. august 2020 - 11:48 #2
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
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