vbscript to copy data from excel to notepad

There are 2 objectives.
1. Creating a Tracker
2. Documentation

I have created a userform which enters the data on a excel sheet. This solves my 1st issue.

Private Sub buttonReset_Click()
' Clear the form
For Each ctl In Me.Controls
If TypeName(ctl) = "TextBox" Or TypeName(ctl) = "ComboBox" Then
ctl.Value = ""
ElseIf TypeName(ctl) = "CheckBox" Then
ctl.Value = False
End If
Next ctl
End Sub

Private Sub buttonSubmit_Click()
Dim RowCount As Long
Dim ctl As Control
' Check User Input
RowCount = Worksheets("Tracker").Range("A1").CurrentRegion.Rows.Count
With Worksheets("Tracker").Range("A1")
.Offset(RowCount, 0).Value = Format(Now, "dd/mm/yyyy hh:nn:ss")
.Offset(RowCount, 1).Value = Me.txtNetID.Value
.Offset(RowCount, 2).Value = Me.txtPhone.Value
.Offset(RowCount, 3).Value = Me.txtLocation.Value
.Offset(RowCount, 4).Value = Me.txtAccount.Value
.Offset(RowCount, 5).Value = Me.txtApplication.Value
.Offset(RowCount, 6).Value = Me.txtBriefIssue.Value
.Offset(RowCount, 7).Value = Me.txtTemplate.Value
.Offset(RowCount, 8).Value = Me.txtMoreInfo.Value

End With
For Each ctl In Me.Controls
Next ctl
End Sub

Once I click on submit it should also launch Notepad with the same data copied onto it.

How can I get this done?

Sub PrintToTextFile()

Dim FileNum As Integer, cl As Range, z As Integer, y As Integer

Dim myStr As String

FileNum = FreeFile ' next free filenumber

'Open "C:\Temp\TEXTFILE.TXT" For Output As #FileNum ' creates the new file

Open "C:\temp\TEXTFILE.TXT" For Append As #FileNum

Print #FileNum, [a1]

z = 10

For Each cl In [b10:f30]

    y = cl.Row

    If y = z Then

        myStr = myStr & "|" & cl

        'appends the input to an existing file write to the textfile

    Else: Print #FileNum, myStr

        z = cl.Row

        myStr = "": myStr = myStr & "|" & cl

    End If

Next

'appends the input to an existing file write to the textfile

Print #FileNum, myStr

Close #FileNum ' close the file

End Sub