1
					
						
						« en: Miércoles  2 de Mayo de 2012, 18:27 »
					 
					
					Buen día,
Colegas, solicito su apoyo para solucionar el siguiente código, el cual arroja inconvenientes con la palabra NEW.
Este mismo lo probé en otra base de pruebas para afinarlo y funcionó a la perfección, pero al migrarlo a la real a usar me genera problemas.
el código es:
Private Sub Comando23_Click()
Dim FileDlg As FileDialog
 Dim ValorDevuelto As String
 Set FileDlg = New FileDialog
 FileDlg.DialogType = DialogSaveAs
 FileDlg.Title = "Exportar Leidos"
 FileDlg.ButtonName = "Guardar Exportación"
 FileDlg.Filters.Add "Archivo de texto (*.txt)"
 FileDlg.InitialFileName = "C:\"
End Sub
Gracias por su apoyo y colaboración