Imprimir Hyperlink con vB
Publicado por Ignacio (16 intervenciones) el 08/01/2013 11:47:27
Estoy intentando imprimir un link que tengo en una celda, este es el lcodigo que he usado pero me da error, no se por que, alguna otra idea? Muchas gracias
1
2
3
4
5
6
7
8
9
Sub pdf()
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const conSwNormal = 1Private Sub Command1_Click()
On Error Resume Next
ShellExecute Hwnd, "print", Cells(1, 1), vbNullString, vbNullString, conSwNormal
End Sub
Valora esta pregunta
0