Klistra in värde - VBA - Forum Excel, VBA, VSTO, Exceltips, Excelhjälp

Sök Forumets startsida

2012-12-06 09:03

Lolly

Medlem sedan: 2012-10-30

3 inlägg

Klistra in värde

Hej,

Jag har en cellhänvisning i cell A2 som anger vart i excelarket ett visst värde ska klistras in (detta ä föränderligt beroende på antal rader som nyttjas). För närvarande står det Y532 i cell A2. Jag har byggt ett macro som kopierar ett antal värden i kolumn M och som ska klistra in den på den plats som anges i A2, i detta fall Y532. Men uppenbarligen så är det inte tillräckligt att göra så som jag gjort nedan. Vad gör jag för fel?

Range("M9").Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    Range("A2").Value.Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False

Tack på förhand!

2012-12-07 09:25

Kihlman

Medlem sedan: 2012-04-20

283 inlägg

Re: Klistra in värde

Hej!

Jag vet inte riktigt hur ditt ark ser ut, men jag tror att felet finns på den rad som är fetmarkerad i din kod: Range("A2").... Du har skrivit value där men det är till cellen du gör en paste och inte till värdet.

I exemplet nedan har jag en räcka namn som börjar i E5 och vill få fram det nedersta namnet och lägga det i A2:

Public Sub Test()
    Blad1.Cells(5, 5).Select
    Selection.End(xlDown).Select
    Selection.Copy
    Blad1.Cells(1.2).Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks :=False, Transpose:=False
End Sub

Kihlman

Excelforum drivs av Excelspecialisten som bedriver utveckling av program, utbildning samt support och hjälp i Excel och VBA.

www.excelspecialisten.se

Sida 1 av 1