Thema Datum  Von Nutzer Rating
Antwort
Rot Variablen Text in Visio Shapes suchen
10.06.2009 11:09:33 BK
NotSolved
15.06.2009 19:35:17 BK
NotSolved

Ansicht des Beitrags:
Von:
BK
Datum:
10.06.2009 11:09:33
Views:
1364
Rating: Antwort:
  Ja
Thema:
Variablen Text in Visio Shapes suchen
Hi,

ich hoffte, dass ich in VB ein Makro schreibe (aufzeichne), womit ich einen markierten Begriff "X" aus einem Shape "S" kopiere, in die Suche einfüge und
wenn in Shape "T" gefunden, fett drucken lasse.

Nun bekomme ich aber immer wieder den Wert in "T" markiert, welchen ich markiert habe, bevor ich das Aufzeichnen mit kopieren begonnen habe, auch wenn ich nun einen Begriff "Y" in "S" markiere.

Wie könnte man dass den umsetzen, dass der aktuell in "S" markierte Wert behandelt wird.

p.s. wenn der Wert nicht gefunden wird, dann soll auch nichts "augenscheinliches" :-| passieren .

Danke, danke
BK

Aufgezeichnetes Makro:
Sub Macro1()
' Tastenkombination: Strg+p
'

Dim UndoScopeID2 As Long
UndoScopeID2 = Application.BeginUndoScope("Fett")
Dim vsoCharacters1 As Visio.Characters
Set vsoCharacters1 = Application.ActiveWindow.Page.Shapes.ItemFromID(351).Characters
vsoCharacters1.Begin = 50
vsoCharacters1.End = 61
vsoCharacters1.CharProps(visCharacterStyle) = 17#
Application.EndUndoScope UndoScopeID2, True

End Sub

Begriff markiert+kopiert-->Aufzeichnung gestartet-->Shape "T" ausgewählt-->Suchmaske geöffnet (Suche in Auswahl")-->strg-v-->Suche-->gefundenen Begriff "X" in "T" fett markiert.

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst genau und ausführlich
  • 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
  • Bitte markieren Sie Ihre Anfrage als erledigt wenn Ihnen geholfen wurde
Thema: Name: Email:

 
 

Thema Datum  Von Nutzer Rating
Antwort
Rot Variablen Text in Visio Shapes suchen
10.06.2009 11:09:33 BK
NotSolved
15.06.2009 19:35:17 BK
NotSolved