Das Notes Forum

Sonstiges => Offtopic => Thema gestartet von: feargus am 11.01.03 - 10:38:33

Titel: Excel Sortierung mit Notes R4
Beitrag von: feargus am 11.01.03 - 10:38:33

Wie kann ich mit Notes eine Excel Tabelle Sortieren ?

xls_Sheet.activate
Set selection=xls_app.selection    

selection.sort ??????????????

hier der entsprechende VBA Ausdruck
 Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess, _
               OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
               DataOption1:=xlSortNormal

Titel: Re:Excel Sortierung mit Notes R4
Beitrag von: ata am 17.02.03 - 20:12:46

... das Selection kennt keinen .Sort
... das .Sort ist eine Methode des .Range
... zuvor muß das ActiveSheet gesetzt werden

... Excel und das Workbook sind bereits initialisiert, dann...

....
Dim vSheet As Variant
....
xl.wbk.Sheets(1).Select
vSheet = xl.wbk.ActiveSheet
Call vSheet.Range("A1:B10").Sort("B1",1,,,,,1)

... so aus dem Kopf müßte das jetzt gehen...

ata