Solved: Print text box contents in a userform

[austenr]

How do you print the contents of a text box in a userform?

[Bob Phillips]

Just the textbox, or the userform?

[Bob Phillips]

Just the textbox, or the userform?

[austenr]

Hi Bob,

I got this to work ok by using

[VBA]UserForm1.PrintForm[/VBA]

My sticking point now is how do you either export or save a userform to your desktop so you can open it and read it? Maybe save it as an HTML or something? Thanks

[Bob Phillips]

Export the file, and you can open that in any text editor.

[austenr]

I found this code but could it be modified to work as you described?

[VBA]Private Sub CommandButton2_Click()
Dim filename As String
filename = Application.GetSaveAsFilename("CCPE Instructions", "Excel (*.xls),*.xls")
If filename <> "" And filename <> "False" Then
ActiveWorkbook.SaveAs filename
End If
End Sub[/VBA]

[austenr]

I found this code but could it be modified to work as you described?

[VBA]Private Sub CommandButton2_Click()
Dim filename As String
filename = Application.GetSaveAsFilename("CCPE Instructions", "Excel (*.xls),*.xls")
If filename <> "" And filename <> "False" Then
ActiveWorkbook.SaveAs filename
End If
End Sub[/VBA]

[austenr]

Sorry I posted my reply twice.

[Bob Phillips]

This is the sort of thing I meant Austen

[vba]

Workbooks("Book1").VBProject.VBComponents("Userform1").Export _
Filename:="C:\temp.frm"
[/vba]

and

[vba]

Workbooks("Book3").VBProject.VBComponents.Import _
Filename:="C:\temp.frm"
[/vba]

[austenr]

I will give it a go. Thanks Bob.