Iniciar sesión
Crear cuenta
Crear cuentaCrear cuenta| Hay un total de 3030 Preguntas. | << >> |
| Pregunta: | 59729 - PROBLEMA AL IMPRIMIR UN USERFORM |
| Autor: | jose grillo |
| Hola a todos muchas felicidades Alguien que me pueda ayudar, En un userform he puesto un boton para imprimir y se queda bloqueado en la vista previa. El codigo es muy simple pero no se si tengo que hacer algo mas gracias: Sub imprimir() ActiveWindow.SelectedSheets.PrintOut Copies:=1, Preview:=True, Collate:= True | |
| Respuesta: | Gonzalo Quintana |
| Hola Jose Grillo: Lo que te pasa es que no le estás indicando que cierre o esconda el userform y por eso se te cuelga. Agregándole lo siguiente se te va a solucionar: 'suponiendo que te formulario se llama UserForm1 entonces utilizas lo siguiente para esconderlo y poder utilizar el preview UserForm1.Hide ActiveWindow.SelectedSheets.PrintOut Copies:=1, Preview:=True, Collate:= True Saludos, Gonzalo | |
| Pregunta: | 59730 - INMOVILIZAR UN FORMULARIO |
| Autor: | jose luis calvo fonseca |
| Estoy trabando en un formulario en visual basic for excel y quiero que cuando este se ejecute el usuario no pueda mover el formulario, es decir, que quede estático, alguien podría ayudarme diciendome como hacerlo??? Gracias | |
| Respuesta: | Al castillo |
| prueba con: Private Sub UserForm_Layout() 'para inmovilizarlo en el extremo superior izquierdo Me.Move 0, 0 End Sub | |
| Pregunta: | 59843 - VARIABLES DE TIPO TEXTO |
| Autor: | ekistu |
| Buenas, se me está presentando un problemilla programando una macro en excel. En la macro se extrae un trozo de texto desde un archivo para incluirlo en una variable. Dicho texto es alfanumerico de cinco caracteres, (dos numeros, una letra y dos numeros) Lo he probado y funciona correctamente con cualquiera que sea la letra central, peeeeeeeeeeero si la letra es una "e" no funciona. En vez de guardar el texto "02e17" guarda "2E+17" y al escribirlo en una celta aparece "200000000000000000" La forma de rellenar la variable es la siguiente: noList = Range("'" & ventana6 & "'!A" & (cnt)) ¿alguien sabria porque ocurre esto? Muchas gracias de antemano. | |
| Respuesta: | Isaac Narvaez |
| saludos, la maquina esta tomando el texto como si fuera un numero exponencial, lo que puedes hacer es declarar tu variable como string, asi no ocurrira esa confusion. | |
| Pregunta: | 59954 - SUBINDICE FUERA DE INTERVALO |
| Autor: | DARIO BARRIENTOS |
| cuando selecciono set equipos, me arroja el error "subindice fuera de intervalo" Sub Proceso() Dim Equipos As Object Dim Tecnicos As Object Dim Asignado As String Application.ScreenUpdating = False On Error GoTo Err_Proceso Set Tecnicos = Workbooks("PLANILLA HOROMETROS TECNICOS1.xls").Worksheets("009 RC") Set Equipos = Workbooks("C:CartolinaPLANILLA EQUIPOS 2007-4.XLS").Worksheets("Master Eq") Help... | |
| Respuesta: | Gustavo López |
| Calculo que el problema debe estar en como le indicas la ruta del archivo a abrir, por lo que veo te estan faltando las "". Saludos, Gustavo.- | |
| Pregunta: | 59988 - AYUDA PARA RANGO DE FECHAS EN CRYSTAL PARA 2005 |
| Autor: | be rock ... |
| Hola amigos, espero que se encuentren bien de salud. Quiero sacar un reporte de unos totales, con lo que necesito digitar un rango de fechas, pero me sale un error relacionado con CONVERT o en ocaciones que falta un ). Yo utilizo vb 2005 y el cogigo es el siguiente: fecha1 = Format(CDate(fecha1), "short date") fecha2 = Format(CDate(fecha2), "short date") crvindicador.SelectionFormula = "{tblausentismo.fechai}>=#" & fecha1 & "# and {tblausentismo.fechai}<=#" & fecha2 & "#" Agradeceria la ayuda de algúno de ustedes. Be rock... | |
| Respuesta: | josue figuero |
| mira no se con que base de datos estas trabajando pero si es con acces el formato de la fecha es: "mm/dd/yyyy" osea mes dia año no pongas "short date" pon "mm/dd/yyyy". saludos ojala te sirva | |
| Pregunta: | 60041 - COMO CONECTARME A UNA BD EN SAS DESDE VISUAL BASIC 6.0? |
| Autor: | Jorman Suárez Quintero |
| Hola a todos, quisiera saber si alguien puede ayudarme con la conexión a una base de datos en SAS desde Visual Basic 6.0. Tengo instalado SAS Enterprise Guide 4.1 en windows XP y la BD esta en un servidor remoto. Gracias por su colaboració. Jorman | |
| Respuesta: | Alberto Fernández |
| Hice lo del SAS 9.1 que te comenté,pero no consigo conectar con el servidor remoto, asi que estoy ahora intentando hacerlo con Enterprise Guide, igual que tú y encontré en este vinculo, la forma de automatizarlo: http://www.sas.com/technologies/bi/query_reporting/guide/ole.html El problema que me encuentro yo ahora es que el editor de Visual no me reconoce WSCRIPT ¿Sabes si me hará falta instalar algún complemento?¿Lograste hacerlo funcionar? Un saludo | |
| Respuesta: | Alberto Fernandez Vazquez |
| Mira este poster por si te ayuda( http://www.nesug.org/proceedings/nesug03/ps/ps013.pdf ) .Yo necesito hacer lo mismo que tú, aunque aun no he tenido tiempo de investigar más, pero creo que de aquí puedes sacar la información que necesitas. Quizá tengas que instalar el SW de SAS el 9.1 creo, pero la consulta que tengas en Enterprise te valdrá igualmente. Muchas suerte! | |
| Pregunta: | 60139 - APLICACION EN VISUAL BASIC 6.0 SOLAMENTE PARA USB |
| Autor: | Limberg Ayasta |
| Hola a todos espero que me ayuden, tengo un problema, en la universidad donde estudio me han dejado un proyecto; el proyecto se basa en desarrollar un aplicaciòn con base de datos, que solo corra en la memoria usb sin necesidad de instalarlo en la pc(solo instalarlo en la memoria usb), que solamente use recursos de la memoria usb , esposible hacer eso, si lo es como puedo programar , que codigo colocar.. La version de visual basic q uso es la 6.0 y la base de datos esta en access. Le agradeceria mucho a las personas q me pueden ayudar. | |
| Respuesta: | Gabriel Fernandez |
| La base de datos de access, esta en el USB tambien? o se encuentra en un equipo.? Conexion a la BD la haces por ODBC? Si usas ODBC, cual usas por archivo o por codigo? si la BD se encuentra en USB es un poco mas engorroso pero facil de solucionar. Si se encuentra en un equipo se dirigir el ODBC a esa direccion. Y como digo el otro compañero que contesto, Es cuestrion de crear el EXE, eso si, ten ojo con los complementos que usas. NO TODAS LAS PC'S LOS LEEN hasta los complementos mas basicos por lo que te recomiendo que todo OCX porcible que utilices, o lo dejas en la raiz donde ejecutas el EXE o creas un BAT de Registro Automatico que se ejecute cada vez que inicias el programa. Espero que te sirva Saludos | |
| Respuesta: | julian sanchez |
| solo tienes que guardarlo como un exe o ejecutable en la memoria . en el menu archivo despliegalo y en la parte de abajo te aparece algo como "guardar exe del proyecto. | |
| Pregunta: | 60156 - ABRIR UNA VENTANA DESDE EXCEL |
| Autor: | Jose A. D |
| Hola: Busco ayuda para programar una macro en excel que me abra una carpeta para ver su contenido. Gracias por la ayuda | |
| Respuesta: | Gonzalo Quintana |
| Hola Jose: Utiliza el siguiente código para lo que quieres hacer: 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 Sub Abrir_Carpeta() ShellExecute hwnd, "Open", "(Dirección p.e. "C:Escritorio"), "", "", 1 End Sub Saludos, Gonzalo | |
| Pregunta: | 60210 - ACCESO DIRECTO EN VB6 |
| Autor: | Mikel Arrasate |
| Hola a todos, Estoy intentando crear un acceso directo (*.lnk) de un archivo existente. Tengo el vb6 y no lo consigo, ¿alguien me podría ayudar? Muchísimas gracias. | |
| Respuesta: | Mikel Arrasate |
| Hola, ya he encontrado la respuesta: Funciona perfectamente, lo que no sé es si podré activar el "Windows Script Host Object Model" en una macro de Solidworks... 1) Open a new exe standard proyect 2) Add one CommandButton, and two Textboxes, called cmdMakeLNKFile, txtTarget and txtLnkName respectively 3) Add the reference to the Windows Script Host Object Model (file: wshom.ocx, located in your system directory) 4) Copy this code to the Declarations sections: Dim Shell As WshShell Dim Shortcut As WshShortcut 5) Add this code to your form Private Sub cmdMakeLNKFile_Click() 'initialize the object WshShell Set objShell = New WshShell 'initialize the object WshShortcut 'the complete name of the .lnk file, include full path plus the .LNK file extension Set objShortcut = objShell.CreateShortcut (txtLnkName.Text) 'the file to be called by the .lnk file, ej. "c:windowscalc.exe" objShortcut.TargetPath = txtTarget.Text '(optional) := any command line supported by the file indicated in txtTarget.Text 'objShortcut.Arguments = xxxx '(optional) : = a valid icon file : = To use the same icon of the target file, do not use the next line. 'objShortcut.IconLocation = xxxx 'Save the .lnk objShortcut.Save End Sub | |
| Pregunta: | 60337 - CONTROL CARRO DE IMPRESORA |
| Autor: | seba tower |
| Hola necesito su ayuda. mi pregunta es respecto a como puedo hacer para que al imprimir una factura que ocupa la mitad de una hoja tamaño carta, el carro de la impresora no pase a la proxima pagina, sino que se situe inmediatamente en la mitad en blanco de la misma pagina impresa. que rutina o manejo es necesario al respecto muchas gracias saludos | |
| Respuesta: | Fernando Fumero |
| Debes establecer el nuevo tamaño de la hoja a imprimir. Private Sub BTN_FACTURAR_Click() Dim X_TIPOPAG As Integer X_TIPOPAG = Printer.PaperSize 'Se guarda el tamaño original Printer.PaperSize = vbPRPSA5 'Se ajusta a tamaño A5, 148 x 210 mm ' ' ' Escribes aquí las líneas de la factura. ' Obvio que éstas no pueden exceder el tamaño seleccionado. ' ' Printer.NewPage 'Obliga a avanzar a la otra página Printer.PaperSize = X_TIPOPAG 'Se reestablece el tamaño original Printer.EndDoc 'Termina una operación de impresión End Sub | |
| |< << 291 292 293 294 295 296 297 298 299 300 301 >> >| |
