Halloj

Vet någon om det finns andra sätt att hämta cellinnehåll utan att
"peka" på cellen, se nedan?

Range("E2").Select
ActiveCell.FormulaR1C1 = intCnt

MS måste ju ha gjort något effektivare.


/W

cell.offset(rowOffset, colOffset)

gör att du inte behöver flytta markören utan bara tala om var
informationen finns relativt den cell du befinner dig.

/Emma

Använd inte select.

Range("E2").Value

eller

Range("E2").FormulaR1C1

Jag har inte testat, men det känns som om det går fortare med Cells

Cells(2, 5) är samma sak som Range("E2")


/Niklas Jansson

Jättetack. Emma

Skall prova ditt tips.
Misstänkte att Gates & Co borde ha byggt in något sådant....

Tänk, man sparar hälften av all rader i makrot.

ha D

/W

Oj fler tips

Tack Niklas.

Skall labba vidare och se vad som funkar "säkrast".


/W

Hej Emma!

Förstår vad du menar men skriv gärna ut exemplet korrekt. "cell" är väl här en teoretisk cellreferens, vilken som?

Om aktiv cell är A1 blir det:

ActiveCell.Offset(rows,columns) eller
Cells(1,1).Offset(rows,columns) eller
Range("A1").Offset(rows,columns)

mvh
/Michael

Michael,

Nu har jag inte följt tråden i sin helhet men i sak har du givetvis rätt.

<code>
Dim wbBok As Workbook
Dim wsBlad As Worksheet
Dim rnCell As Range

Set wbBok = ActiveWorkbook
Set wsBlad = wbBok.Worksheets("Blad1")

'Detta förutsätter att det aktiva bladet är "Blad1"
'när proceduren körs
Set rnCell = wsBlad.Range("A1")

'Om inte så så sker referering på följande sätt:
With wsBlad
Set rnCell = .Range("A1")
End With

'Här fylls celler till höger om A1 och en rad ned med värden
With rnCell
For i = 1 To 3
.Offset(1, i).Value = 1 * (2 * i)
Next i
End With

</code>

Ovanstående innebär att cellen A1 på "Blad1" inte nödvändigtvis behöver vara den aktiva cellen men att vi kan ändå arbeta med cell A1 i koden.

Detta förfaringssätt är att föredra då vi slipper instruera XL att först aktivera önskad cell och därefter utföra en beräkning e d.

Jag hoppas att du är nöjd med detta svar och att det bekräfar det du själv ar kommit fram till.

Mvh
XL-Dennis

Jag brukar sätta cell till worksheet.range("a1") som startcell om
jag inte har behov av att börja någon annanstans. Eftersom startcellen
är valfri valde jag att bara skriva cell.

/Emma