[VBA] ActiveCell in online xls document

[Verwijderd]

Voor een klant heb ik een calculator gemaakt in MS Excel. (met behulp van VBA)
Nu willen ze dat Workbook online gaan zetten als een intranet applicatie.

Echter stuit ik op het volgende probleem:

De volgende code lukt prima bij een offline applicatie:

code:

ActiveCell.Offset(1, 0).Select

Maar geeft de volgende error wanneer men de xls online zet en het opent met Internet Explorer:

Run-time error '91' Object variable or With block variable not set

En dan strandt ie op de bovenstaande regel code.

Heb niet echt veel zaaks gevonden via de search en google. Een workaround is natuurlijk dat ze MS Excel eerst opstarten en dan via Open > de url erin plakken. Maar dit is uit gebruikers-standpunt niet zo handig.

[hing]

probeer iets dergelijks zoals dit eens:

Visual Basic:

Private Sub Workbook_Open()
  Application.ActiveSheet.Range("A2").Select
End Sub

de range zou je dan variabel kunnen maken oid.
hopelijk heb je er wat aan.

[ Voor 33% gewijzigd door hing op 06-08-2004 17:02 ]

[Verwijderd]

Bedankt voor je bericht.
Met range lukt het inderdaad, maar dit variabel maken is niet zo simpel, ik gebruik die regel code om een voor een de rijen af te lopen. Met die range zou ik wellicht op deze manier kunnen werken:

code:

Dim i
For i=1 to 5
Range("A" & Cstr(i)).Select
Next 'i

Wel een heel gedoe om dan alle ActiveCells te gaan vervangen

[ Voor 4% gewijzigd door Verwijderd op 06-08-2004 17:30 ]

[Bud_s]

Heb je wat meer code ?

Ik gebruik zelf altijd ongeveer zoiets :

code:

Sheetname = ActiveSheet.Name
BeginRij = 1
EindRij = Sheets(Sheetname).Range(a65535).End9xlUp.Row
Kolom = 2 
For Rij = BeginRij to EindRij
   Result = Sheets(SheetName).Cells(Rij, Kolom) 
   Gosub Whatever
Next Rij

[Verwijderd]

Thx goeie tip.

Meer code posten heeft niet echt zin, aangezien ik op die manier naar de volgende rij spring in elke functie/subroutine. Ik dacht misschien het Object ActiveCell op een of andere manier te kunnen heraanmaken?