Automatiskt flytta ned en rad - Excel - Forum Excel, VBA, VSTO, Exceltips, Excelhjälp

Sök Forumets startsida

Forum

Diskussioner

Excel

Automatiskt flytta ned en rad

Föregående

Nästa

2018-09-26 06:17

Fredde

Medlem sedan: 2018-09-26

1 inlägg

Automatiskt flytta ned en rad

Hej,

lite komplicerat men jag hoppas jag talar klart. Jag skulle vilja ha i excel att jag räknar ut en summa genom formler i sida 1 (detta är redan klart) och att svaren på dessa hamnar i ett specifikt fällt på sida 2 (detta förstår jag hur jag gör) MEN att när jag är klar med en omgång och ska göra nästa så hoppar svaret på sida 2 automatiskt ned en rad, alltså utan att jag behöver koda om. Vet någon här om det är möjligt?

2018-09-26 11:56

Ingvar

Medlem sedan: 2018-05-01

51 inlägg

Re: Automatiskt flytta ned en rad

Hej!

Utifrån din info. så borde denna lösning vara möjlig.

Du behöver i detta fall inte ha en koppling mellan sida 1 och 2.

Spela in ett macro med det du vill göra.

Kopiera den/de celler på sida 1, gå till sida 2, infoga ny rad så den kommer ovanför den förra omgången.

Klistra in värden. Klart

Nu kan jag ju tänka mig att det finns andra formler/funktioner på samma rad på sida 2 dit du överför dina värden, är detta fallet så får du även kopiera dessa och klistra in på den infogade raden i ditt macro.

Mvh Ingvar

2018-09-26 13:41

Peter

Medlem sedan: 2016-01-01

137 inlägg

Re: Automatiskt flytta ned en rad

Jag har detta kopplat till en knapp, visserligen har jag allt på samma sida men det går att modifiera, varje gång jag klickar på knappen så läggs den nya summan under den förra, OBS; den infogar ingen ny rad utan lägger summan underst hela tiden.

Sub boende()
Dim rk?llcell As Range
Dim rM?lcell As Range
Set rk?llcell = Worksheets("Konto").Range("D3")
Set rM?lcell = Worksheets("Konto").Range("AK1")
If rM?lcell.Value <> "" Then
Set rM?lcell = Worksheets("Konto").Columns("AK").Find("*", searchorder:=xlByColumns, searchdirection:=xlPrevious)
Set rM?lcell = rM?lcell.Offset(1, 0)
End If
rM?lcell.Value = rk?llcell.Value
End Sub

Men du vill visst ha det överst.

Invars betydligt enklare som sagt om du inte har annan info som ställer till det med nya rader.

2018-09-26 16:24

Peter

Medlem sedan: 2016-01-01

137 inlägg

Re: Automatiskt flytta ned en rad

Har testat Ingvars förslag och det fungerar utmärkt,
inga andra värden följer med om man väljer "infoga celler nedåt"
när man gör makrot.

Sida 1 av 1

Automatiskt flytta ned en rad