Hello people I wrote a code
that navigates into the pageheader in microsoft word,
the script removes 6 characters then add another number,
I wrote in this code "123123"
I have used
Selection.TypeText Text:=""
how do I put a variable instead of type a number
example
myVar=666666
it adds the myVar value(666666) instead of 123123
PHP Code:
If ActiveWindow.View.SplitSpecial <> wdPaneNone Then
ActiveWindow.Panes(2).Close
End If
If ActiveWindow.ActivePane.View.Type = wdNormalView Or ActiveWindow. _
ActivePane.View.Type = wdOutlineView Then
ActiveWindow.ActivePane.View.Type = wdPrintView
End If
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
Selection.MoveRight Unit:=wdCharacter, Count:=3
Selection.MoveDown Unit:=wdLine, Count:=1
Selection.MoveRight Unit:=wdCharacter, Count:=2
Selection.MoveLeft Unit:=wdCharacter, Count:=2
Application.Run MacroName:= _
"TemplateProject.tw4winProtection.tw4winKeyBackSpace"
Application.Run MacroName:= _
"TemplateProject.tw4winProtection.tw4winKeyBackSpace"
Application.Run MacroName:= _
"TemplateProject.tw4winProtection.tw4winKeyBackSpace"
Application.Run MacroName:= _
"TemplateProject.tw4winProtection.tw4winKeyBackSpace"
Application.Run MacroName:= _
"TemplateProject.tw4winProtection.tw4winKeyBackSpace"
Application.Run MacroName:= _
"TemplateProject.tw4winProtection.tw4winKeyBackSpace"
Application.Run MacroName:= _
"TemplateProject.tw4winProtection.tw4winKeyBackSpace"
Selection.TypeText Text:="123123" 'here is the example number I want to replace with a variable
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
Thank you in advance