Seite 1 von 1

Automatisierte Sortierung

Verfasst: Do, 22.03.2007 12:46
von greenhorn
Hi,

folgendes kleines Problem beschäftigt mich nun schon seit Stunden:

Ich habe eine Tabelle in ein Textdokument eingefügt und möchte diese nun mit einem Makro sortieren lassen. In Calc funktioniert das ja auch wunderbar, aber im Writer lässt er jedes Mal den Dialog vom Sortiervorgang offen. Gibt’s da irgend ne Möglichkeit den Dialog automatisch zu schließen ???

Wär für ne Lösung wirklich sehr dankbar, ansonsten muss ich doch leider wieder zu M$Word greifen.

Verfasst: Do, 22.03.2007 15:50
von manese
Hallo Greenhorn,
wie geht das in WORD?
Alles Gute
matthias

RE:

Verfasst: Fr, 23.03.2007 08:30
von greenhorn
Hallo manese, in Word sieht das Makro so aus:

Code: Alles auswählen

   Sub Makro1()
   Application.DisplayAlerts = wdAlertsNone
    Selection.Sort ExcludeHeader:=False, FieldNumber:="Absätze", SortFieldType _
      :=wdSortFieldAlphanumeric, SortOrder:=wdSortOrderAscending, FieldNumber2 _
        :="", SortFieldType2:=wdSortFieldAlphanumeric, SortOrder2:= _
        wdSortOrderAscending, FieldNumber3:="", SortFieldType3:= _
        wdSortFieldAlphanumeric, SortOrder3:=wdSortOrderAscending, Separator:= _
     wdSortSeparateByTabs, SortColumn:=False, CaseSensitive:=False, LanguageID _
        :=wdItalian
End Sub
Da sieht man dann auch nichts vom Sortier-Dialog, aber in OO hält der Code solange an, bis man auf den OK Button von diesem Dialog gedrückt hat. Selbst n Sendkeys funktioniert da nicht.