Thema Datum  Von Nutzer Rating
Antwort
Rot Einfügen von Überschriften in ListBox einschließlich der Nummerierung mit VBA
 03.09.2020 10:05:35 Benjamin
NotSolved

Ansicht des Beitrags:
Von:
Benjamin		 Datum:
03.09.2020 10:05:35		 Views:
862		 Rating:
     
Antwort:
  Ja
Thema:
Einfügen von Überschriften in ListBox einschließlich der Nummerierung mit VBA

Derzeit verwende ich VBA, um Überschriften auf einer bestimmten Ebene zu erstellen. Dazu verwende ich den folgenden Code:
 

Privater Sub-InsertButton_Click()

Titel einfügen
Mit Word.Auswahl
TypeText Text:=FeatureBox.Text & " " & "-" & " " " & ComponentBox.Text & " " " & "-" & " " " & TitleBox.Text
Schriftart.größe = 12
Name der Schriftart = "Calibri".
Schriftart.fett = Wahr
.style = wdStyleHeading3
.typ Absatz

Ende mit

Ende Sub



Ich möchte jede Überschrift auf der Ebene 3 automatisch in eine mehrspaltige ListBox einfügen. Das Kopieren des Textes der Überschrift ist weniger problematisch, aber ich möchte die automatisch generierte Überschriftsnummer ebenfalls in die ListBox einfügen. Als Zusatzfunktion möchte ich auf das in der ListBox ausgewählte Element mit einem Doppelklick zu der Überschrift im Dokument springen.

Ist das überhaupt möglich? Für Ihre Hilfe wäre ich Ihnen sehr dankbar.

Vielen Dank und beste Grüße

Ben

 

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
Rot Einfügen von Überschriften in ListBox einschließlich der Nummerierung mit VBA
 03.09.2020 10:05:35 Benjamin
NotSolved