Thema Datum  Von Nutzer Rating
Antwort
06.03.2026 21:11:44 Diana
NotSolved
07.03.2026 09:51:26 Gast72430
NotSolved
07.03.2026 12:38:01 Gast18893
NotSolved
07.03.2026 13:38:30 Diana
NotSolved
08.03.2026 01:29:28 xlKing
Solved
08.03.2026 01:44:05 xlKing
NotSolved
Rot Kleine Korrektur
09.03.2026 00:44:16 xlKing
Solved
09.03.2026 19:29:28 Gast10955
NotSolved
09.03.2026 23:38:29 xlKing
NotSolved
10.03.2026 10:16:13 Gast72430
NotSolved

Ansicht des Beitrags:
Von:
xlKing
Datum:
09.03.2026 00:44:16
Views:
33
Rating: Antwort:
 Nein
Thema:
Kleine Korrektur

Hab mir jetzt nochmal das Objektmodell vom VBE angeschaut. Und was soll ich sagen? Es gibt doch eine Möglichkeit die Position der Einfügemarke abzurufen. Hab ich nur gestern übersehen.

Ersetze die Sub WriteCode wie folgt:

Sub WriteCode(Text As String)
   
   Dim zeile As Long, spalte As Long, zeile2 As Long, spalte2 As Long
   VBE.ActiveCodePane.GetSelection zeile, spalte, zeile2, spalte2
   VBE.ActiveCodePane.CodeModule.InsertLines zeile, Text
   Application.OnTime Now, "NochAktiv"
   
End Sub

Damit sollte der Code an der Einfügemarke eingefügt werden.

Gruß Mr. K.


Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
06.03.2026 21:11:44 Diana
NotSolved
07.03.2026 09:51:26 Gast72430
NotSolved
07.03.2026 12:38:01 Gast18893
NotSolved
07.03.2026 13:38:30 Diana
NotSolved
08.03.2026 01:29:28 xlKing
Solved
08.03.2026 01:44:05 xlKing
NotSolved
Rot Kleine Korrektur
09.03.2026 00:44:16 xlKing
Solved
09.03.2026 19:29:28 Gast10955
NotSolved
09.03.2026 23:38:29 xlKing
NotSolved
10.03.2026 10:16:13 Gast72430
NotSolved