28. März 2024, 16:02
VB-fun.de - Beitragsübersicht zum VB-/VBA-Forum-Archiv 0411
  W03: Aufzählungszeichen fortführen bei Bookmarkneuerstellung
 Von Probleminhaber
 Am 07. August 2008 um 15:34:03
 Frage Hallo nochmal,

in eurem Archiv habe ich schon eine Menge über das Verhalten von Bookmarks gefunden, und es klappt prima, mit einer Ausnahme:
Mit diesem Code
Private Sub CheckBox1_Click()

If ActiveDocument.CheckBox1.Value = True Then
Me.BookmarksRangeObjektDef
Else
Me.BookmarksRangeObjektEmpty
End If
End Sub

Sub BookmarksRangeObjektDef()
Dim strBMName As String
Dim rngBMRange As Range

Dim strBMText As String

strBMName = "Mark1"
strBMText = "whatever"

With ActiveDocument
Set rngBMRange = .Bookmarks(strBMName).Range

rngBMRange.Text = strBMText
.Bookmarks.Add Name:=strBMName, Range:=rngBMRange

Set rngBMRange = Nothing
End With
End Sub

Sub BookmarksRangeObjektEmpty()
Dim strBMName As String
Dim rngBMRange As Range

Dim strBMText As String

strBMName = "Mark1"
strBMText = ""

With ActiveDocument
Set rngBMRange = .Bookmarks(strBMName).Range

rngBMRange.Text = strBMText
.Bookmarks.Add Name:=strBMName, Range:=rngBMRange

Set rngBMRange = Nothing
End With
End Sub
wird über den Inhalt eines Bookmark per Anklicken der Checkbox entschieden. Nun ist der Inhalt aber ein Element (manchmal auch das letzte Element, wenn das eine Rolle spielt) einer Auflistung. Aber der Text des Bookmark wird nicht automatisch wieder in die Auflistung miteinbezogen. Kann mir da jemand helfen?

Danke im Voraus
[ VB-/VBA-Forum | Archiv 0411 | Archiv-Übersicht ]
 Antworten
W03: Aufzählungszeichen fortführen bei Bookmarkneuerstellung - Probleminhaber 07. August 2008 um 15:34:03
Re: Aufzählungszeichen fortführen bei Bookmarkneuerstellung - Probleminhaber 11. August 2008 um 10:26:16
Statt "ChrW" einfach "Chr" - Probleminhaber 12. August 2008 um 09:17:11

Zum Seitenanfang

Startseite | VB-/VBA-Tipps | Projekte | Tutorials | API-Referenz | Komponenten | Bücherecke | Gewinnspiele | VB-/VBA-Forum | DirectX | DirectX-Forum | VB.Net | VB.Net-Forum | Chat | Spielplatz | Links | Suchen | Stichwortverzeichnis | Feedback | Impressum