Permalänk
Medlem

Excel Visual Basic hjälp.

Hej.

Håller på med en sak där jag har ett sheet, som skall hämta data beroende på vilket alternativ jag väljer.
Båda alternativen innehåller mattematiska formler, som skall då överföras till rätt cell, och behålla funktionen.

For i = 1 To 180 For j = 1 To 25 Cells(i, j) = Sheets("Testtesttest").Cells(i, j) Next j Next i

Det fungerar klockrent MEN den kopierar bara svaret, inte den mattematiska formeln.

Tex. så står det "=D15*C66" i cellen A1 på testtest sheetet, och när jag fört över till andra sheetet blir cellens värde 0, eftersom D15 och C66 inte har något värde. Men jag vill att "=D15*C66" följer med, alltså formeln, inte svaret.

All annan text och skit som inte består av formler fungerar, men inte cellens funktioner, och har helt slut på ideér.

Tack på förhand!

Permalänk
Medlem

Testa Cells(i, j).Formula = Sheets("Testtesttest").Cells(i, j).Formula

Visa signatur

Kom-pa-TI-bilitet

Permalänk
Medlem

Tack för svaret.

Löste det med

Sheets("testtesttest").Range("A1:AS400").Copy _ Destination:=Sheets("sheetfaen").Range("A1:Z180")

Den hade förmågan att kopiera formeln också