Word - aus Notes Textfield ersetzen

[Puthy]

Einen wunderschönen guten Morgen *gäääähn* 

Weiß jemand so rein zufällig ob ich in Word aus Notes heraus Textfelder mit anderen Werten überschreiben kann? So rein Denktechnisch würde ich sagen ja aber jeder Versuch scheiterte. Irgendwie werden die einfach nicht gefunden - ich mein die Textfelder. Einfachen Text zu ersetzen klappt wohl ganz gut.

Ich füg mal noch etwas Quelltext an. Vielleicht könnt ihr mir den gleich um die Ohren schmeissen

Code

		m_oWord.Selection.Find.ClearFormatting
		m_oWord.Selection.Find.Replacement.ClearFormatting
		With m_oWord.Selection.Find
			.Text = "Telefon"
			.Replacement.Text = "tee"
		End With		
		m_oWord.Selection.Find.Execute

[m3]

Äh, was Du da zeigst, ist Code, um im Word einen markierten Text zu ersetzten.
Du willst Dir in der Notes Designer-Hilfe die Kapitel zu notesDocument.ReplaceItemValue() und/oder notesRichTextRange.FindAndReplace() ansehen.

[Puthy]

Hab ich mich ungeschickt ausgdrückt? Dann versuch ich es mal anders. Ich will aus Notes heraus mit Daten aus Notes ein Textfeld(dessen Inhalt) von  MS Word überschreiben.

[koehlerbv]

Hab ich mich ungeschickt ausgdrückt?

Nein - Martin hat nur noch nicht seine erforderliche Kaffee-Dosis 

Du solltest aber mal die Suche hier bemühen - das Thema war schon öfters dran.

[m3]

DANKE!

Sorry Puthy, mir hat noch mein Kaffee gefehlt, um die Satzstellung korrekt auszuwerten.

Um ein Word Textfeld mit VBA auszufüllen meint Google:

Code

ActiveDocument.FormFields("text3").TextInput.Clear
ActiveDocument.FormFields("text3").Result

[Puthy]

Hey,

ich hab mir doch einmal Google vorgenommen udn siehe da es funzt.
Hey m3 - dein Kaffee  immernoch nicht da?

Es ist wichtig in Word einmal Textfelder und Textformularfelder zu unterscheiden. Das Beispiel von  m3 bezieht sich auf Textformularfelder und folgendes auf Textfelder:

Code

m_oWdDoc.Shapes(2).TextFrame.TextRange = "Ich will Kaffee"