Inlägg

Då har jag fått till så att den gör som jag vill, nästan.

Public Sub InsertVariableRows()
     
    Dim first_row As Long
    Dim last_row As Long
    Dim rows_to_add As Integer
    Dim iLoop As Long
     
    first_row = 1
    last_row = ActiveSheet.Cells.Find("*", [A1], , , xlByRows, xlPrevious).Row
     
    For iLoop = last_row To first_row Step -1
        rows_to_add = ActiveSheet.Cells(iLoop, 2)
        If rows_to_add > 1 Then
    ActiveSheet.Rows(iLoop + 1 & ":" & iLoop + rows_to_add - 1).Select
    Selection.Insert Shift:=xlDown
    Rows(iLoop & ":" & iLoop + rows_to_add - 1).Select
    Selection.FillDown
    ElseIf rows_to_add = 0 Then
    ActiveSheet.Rows(iLoop & ":" & iLoop).Delete Shift:=xlUp
End If

Next iLoop
 
End Sub

Hur får jag den att räkna upp värdena i kolumn A, dvs om det ser ut på följande vis:

KOL A	KOL B
152	5

Hur får jag den att räkna upp 152 till 156.

KOL A	KOL B
152	5
153	5
154	5
155	5
156	5

Hej,

skulle vilja ha hjälp med att göra ett makro.

Säg att jag har två kolumner - A och B. Dessa ser ut på följande vis:

KOL A	KOL B
KAN	5
VILL	7
FÅR	9
SKA	3
INTE	5
GÄRNA	4
TEST	9
GÖRA	2
SLUTA	1

Hur skulle jag då skapa ett makro som duplicerar rad1 med värdet i kolumn A lika många gånger som siffran i kolumn B visar?

Tack på förhand för hjälp!

Är inte så mycket för julöl. Den godaste som jag någonsin har smakat är faktiskt en norsk - Ringnes juleøl

http://pub.tv2.no/multimedia/na/archive/00669/ringnes_669113a.jp...

Man får ju i regel post en gång om dagen (vardagar) och då är man dessutom i de flesta fall på jobbet så jag ser inte riktigt nyttan med denna produkt.

Har aldrig någonsin sett dig. 0,0/10

The Small Faces - Sha La La La Lee.

Tycker det är tidigt, och det var framförallt för tidigt när skiten kom fram. Idag när första snön föll så känns det eventuellt lite mer aktuellt, men jag tycker att man åtminstone kunde vänta till december.

Måste för övrigt säga att pyntet på bilderna var gräsligt!

Är det en fördel att ta 8GB 1333mhz istället för 6GB 1600mhz?

http://data.fuskbugg.se/dipdip/comp3.jpg

Något sådant?

Kommer inte att spela, alls.

Kommer inte att klocka. Vill ha en dator som håller sig rapp ett tag, och att hamna under 10000 är inte negativt, ville bara ta höjd för att inte begränsa mig.

Vad bör jag ta för typ av ramminnen ? 2000mhz? Andra synpunkter.

http://data.fuskbugg.se/dipdip/comp2.jpg

Saken är att jag inte skall spela. Den skall främst fungera som arbets/nöjesdator.

Förresten, vilken del är felprioriterad? Grafik? Mobo? CPU?

/SP

Där ser man. Jag väntar så snällt.

http://data.fuskbugg.se/dipdip/_comp.jpg

Några synpunkter, förbättringsförslag? Skall ej spela utan använda den till jobb (stora excelfiler bl.a), surf, film osv. Inget speciellt krävande, men den får gärna hålla ett bra tag.

/Svarte Petter

Hej igen,

jag har ytterligare problem, såklart. Om jag har datan i en excelfil (fil X) och diagrammet i en annan separat fil (fil Y), hur får jag då diagrammet i fil Y att uppdateras när jag fyller i data i fil X.

Förstår du hur jag menar?

Nu hajar jag! Grymt. Tack så hemskt mycket för hjälpen.

Ser bra ut. Förstår dock fortfarande inte hur du har fått till det.

Sedan en annan fråga, går det att ordna så att även slutdatumet flyttar med? Alltså om jag fyller i 14e i exemplet, så försvinner värdena från 31e i diagramet. En tidsspann på 10 dagar t.ex.

Hej,

förmodligen är jag helt oduglig. Skulle du kunna föra in formeln och ladda upp filen så att jag förstår?

Tack!

/Svarte Petter

I källdatan för diagrammet får jag 'Ogiltig funktion'.