StartDownloadsServiceBeispieleWorkshopsKontakt DeutschEnglish
 
Beispiele
Allgemein
Outlook®
 
Awarded by
Microsoft since 2005:
mvp logo
VBOffice Info
Besucher1392345
Aufrufe5100571
Links
Impressum
Datenschutz
Kontakt
E-Mail: Cursor setzen
Autor: Michael BauerHomepage
Datum: 24.03.2011Zugriffe: 5578
  
Beschreibung

Outlooks eigenes Objektmodell kennt keine Möglichkeit, den Cursor im Nachrichtentext einer E-Mail an eine bestimmte Position zu setzen. Das geht aber, wenn Word als E-Mail-Editor verwendet wird.

Bis Outlook 2003 war Word optional, seit Outlook 2007 wird Word immer verwendet (nicht mehr nur für E-Mails, sondern für alle Elemente).

Das Beispiel zeigt, wie der Cursor ans Ende des Nachrichtentextfelds gesetzt werden kann.

Public Sub SetCursor()
  Dim Ins As Outlook.Inspector
  Dim Doc As Word.Document
  Dim Range As Word.Range
  Dim Pos As Long

  Set Ins = Application.ActiveInspector
  Set Doc = Ins.WordEditor
  If Not Doc Is Nothing Then
    Pos = Doc.Range.End - 1
    Set Range = Doc.Range(Pos, Pos)
    Range.Select
  End If
End Sub
 
 

ReplyAll warnt Sie, bevor Sie unbeabsichtigt allen Empfängern einer E-Mail antworten oder wenn Sie ein vertraulicher BCC-Empfänger der E-Mail ... [weiter]

 

Blitzschneller Zugriff auf die Hauptkategorienliste, gemeinsame Kategorien im Netzwerk, eine Erinnerungsfunktion ... [weiter]

 

SAM legt automatisch Absender, Signatur und Speicherort für gesendete Mails fest, z.B. anhand der ... [weiter]

 

OLKeeper verhindert zuverlässig, dass Mitarbeiter Outlook schließen und dadurch Termine oder E-Mails ... [weiter]

So entgeht Ihnen kein Auftrag mehr:
Telefonservice und Sekretariatsservice