overføre et tal fra et ark til et andet ark ved at trykke på tal

Nu skriver du ikke hvilken række, kun hvilken kolonne...


Nå - hvis det f.eks. er celle A3 der skal kopieres fra A " ark resultatopgørelse-balance" over i den aktive celle (der hvor makøren står) i "ark bogføringsark":

ActiveCell.Value = Sheets("ark resultatopgørelse-balance").Range("A3")

har lige et par problemer hvor skal den indsættes
så jeg kan se den under makroer
jeg har prøvet og indsætte den i mondul 3
i  ark resultatopgørelse_balance
angående dit spørsmål der kan være tal i alle celler
i kolonne A jeg håber du kan svare på det her

Hvis du har noget der hedder modul3 er det fordi du åbenbart selv har oprettet (mindst) 3 moduler selv.

Prøv at optage en macro:

1. Tools > macro > record new macro
2. Giv den navnet "KopierCelle" - eller havd du vil kalde den
3. Gør et eller andet - fx. marker en celle, og stop optagningen.

Så har du en macro der hedder noget du selv har valgt, men som ikke rigtig gør noget fornuftigt. Så den macro ændrer du:

4. Tools > macro > macros
5. Marker din macro, og tryk Edit
6. Al den kode, der står mellem Sub KopierCelle() og End Sub skifter du ud med den kode jeg har givet dig.

Jeg forstår ikek hvad du mener med at der kan være tal i alle celler i kolonne A - HVILKET tal skal kopieres???


Hvilken celle skal overføres fra ark resultatopgørelse-balance

jeg prøver at forklare det bedre

markøren står i ark "bogføringsark" i en eller anden celle i kolonne B
så gå jeg  over i ark "resultatopgørelse" og stille
markøren i en eller anden celle i kolonne A ( der kan være tal i hele kolonne A) hvor efter jeg køre makroen
så det tal der i den celle overføres til ark "bogføringsark" i den celle
markøren står i , og at jeg der efter er i ark "bogføringsark". det er altid en celle i kolonne B. den skal overføres til
Håber dette er forklaring nok.

Sheets("resultatopgørelse").Select
    Selection.Copy
    Sheets("bogføringsark").Select
    Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
    False, Transpose:=False

det virker det skal du have mange tak for
Håber du har fået dine point