Best Practices > Diskussionen zu Best Practices

COM-Schnittstelle MS Excel

<< < (7/8) > >>

Axel:
Erstmal vielen Dank für deine Mühen. Ich werde mir das bei Gelegenheit mal genauer anschauen. Überflugmäßig sieht's ganz gut aus.

Ich hoffe, dass ich irgendwann mal die Zeit finde mal ein BP-Artikel draus zumachen.

Axel

Fedaykin:
Hallo zusammen

Wäre besser Select zu vermeiden (nur verwenden wo wirklich was angesprungen werden muss). Vorteile sind dabei es wird schneller und nerviges rumgehüpfe verschwindet.

Zum Beispiel besser so:

--- Code: ---With objSheet.Cells
   .Columns.AutoFit
   .Rows.AutoFit
End With
--- Ende Code ---

Als:

--- Code: ---objSheet.Cells.Select
Selection.Columns.AutoFit
Selection.Rows.AutoFit
--- Ende Code ---

Gruss
Remo

Performance:

die Funktion in Excel "ActiveSheet.Outline.ShowLevels RowLevels:=0, ColumnLevels:=1"
kann ich aus Notes nicht übergeben, bzw. ich habe googleweit nichts gefunden.

ich habs dann über "hide" gemacht, nicht ganz elegant aber es funktioniert
z.B:

Excel.Range("A1:E1").Select
With Excel.application.Selection
   .Columns.Group
   .Columns.Hidden = True
End With


cu

ata:
... mal kurz ins blaue - um auf Remo's Anregung einzugehen - hast du es auch ohne Selection versucht?

Also ungefähr so:

With Excel.Range("A1:E1")
   .Columns.Group
   .Columns.Hidden = True
End With

Das müsste besser sein für die Performance...

Performance:
aus dem blauen  ;D

ohne selection geht es ..... ???  , perfomance spielt hier keine Rolle, hatte in altem Code ein Paar Änderungen vorgenommen

danke für den Tip

cu

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete