Brauche Hilfe bei MS Office Makros in VB
 

SO geht darum das ich mit

[b]Selection.Copy [/b]einen bestimmten Textabschnitt kopiere.

dieser soll dann in der [b]Speichern unter[/b] FileName Dialogbox eingefügt werden.

genau dafür benötige ich den passenden Code.

Hier mal das Original...

Sub Makro

Selection.MoveDown Unit:=wdLine, Count:=3
Selection.HomeKey Unit:=wdLine, Extend:=wdExtend
Selection.Copy
ActiveDocument.SaveAs FileName:="[b][color=red] wie bekomme ich hir Selection.Paste hinein [/color][/b].doc", _
FileFormat:=wdFormatDocument, LockComments:=False, Password:="", _
AddToRecentFiles:=True, WritePassword:="", ReadOnlyRecommended:=False, _
EmbedTrueTypeFonts:=False, SaveNativePictureFormat:=False, SaveFormsData _
:=False, SaveAsAOCELetter:=False
End Sub

ActiveDocument.SaveAs FileName:="<Pfad>" + selection.text +".doc", _

edit: du brauchst das nicht kopieren.

wenn du was ausgewählt hast ist es schon selectiert, dann liegts in selection.