Hola buen día! Mi problema es el siguiente: Tengo un userform que contiene un textbox y un combobox cuya finalidad es mostrar varios items y cuando el usuario elige uno, automaticamente se pasa la información al textbox. La lista que despliegua este Combobox es extensa y para faciliar la cosas al usuario, coloque un botón de búsqueda el cual al ser accionado se carga un userform nuevo que muestra un textbox y tres botones de comando (busqueda, siguiente y aceptar) el textbox esta para que el usuario accesa la palabra a buscar y cuando se elija aceptar, deseo que esa información se cargue al combobox contenido en el userform inicial. ¿Como puedo hacer eso?. Les agrade…

Hola a todos: Estoy intentando manejarme con las macros.. y bueno he conseguido por ahí algún código semejante a lo que quiero hacer pero con el problema de no entenderlo en su totalidad, a la hora de buscar información me cuesta mucho, eso si lo consigo (puede que sea por torpeza) averiguar qué significa el código y quería preguntar si existe en algún sitio alguna especie de guía o referencia para los distintos objetos, métodos, etc.. donde quede reflejado su uso y significado de sus parámetros. Pongo un ejemplo de lo que no he sido capaz de encontrar en el siguiente código: With ActiveSheet.QueryTables.Add( _ Connection:="TEXT;" & sPath, _ …

Buenas noches; Estando en la cama, se me ha ocurrido algo que me vendría muy bien pero ni idea de como hacerlo, haber si alguien me puede ayudar. necesito que se ponga automáticamente en la columna A (la fecha) y en la columna B (la hora), de cuando se ponga un dato en la columna C. se podría hacer??. muchísimas gracias de antemano Fecha.xls

Hola a todos Estoy tratando de hacer una macro que imprima varias hojas de un solo documento, ademas que me guarde el archivo con el mismo nombre, pero con el consecutivo que sigue. ejemplo yo quiero imprimir 50 hojas, entonces que el consecutivo sea 1,2,3,4,5...48,49,50. Que me guarde el archivo, pero que la próxima vez que utilice el archivo comience en 51 y poder imprimir de nuevo # cantidad de hojas de la misma forma. Ya he intentado varias formas pero sin lograr conseguir lo que busco, se que en este foro hay personas expertas y me pueden ayudar con este tema Adjunto la hoja que deseo imprimir en forma consecutiva el # a ser tratado se encuentre en la celda AX5 …

Hola, es mi primer pregunta en este sitio web, pero he leído muchas respuestas que me han ayudado a aprender mucho. Tengo un formulario que almacena datos de unos usuarios, y necesito que se mediante un botón se pueda tomar una foto (donde una web cam y también de otros dispositivos) y la guarde en el disco. Estoy trabajando en un formulario creado en excel y uso vba para la programación. Muchas gracias por adelantado.

Hola buenos días! Primero que nada quiero agradecer por la ayuda que he recibido en este foro, me ha sido muy útil, y me ha hecho llegar a un archivo de ordenes de compra que me ha servido mucho en el trabajo. Mi problema es el siguiente, anteriormente solo había una persona en el área de compras, pero ahora van a ser dos, y necesito que el archivo que adjunto pueda ser modificado por las dos personas (si es posible al mismo tiempo), y que se guarden los datos que las dos generen. Básicamente en mi archivo hay una hoja donde se captura la orden de compra, a la hora de generarla, le asigna automáticamente el número de orden, checándolo en otra hoja llamada índice donde …

Hola: Queria saber si es posible generar una macro que me ajuste los altos de fila según esta necesidad: a. autoajuste b. si el alto que resulta de lo anterior es menor a 50 autoajustar a 30 Bueno eso seria Gracias

Buenas a ver si me podéis ayudar a solucionar este problema, resulta que he pasado de win 7 64 bits a win 10 64 bits y ahora el modulo que usaba para que en un textbox al darle con el botón derecho se me abría un mini menu para cortar pegar texto ahora este no se ejecuta, y no se cual puede ser la razón del problema. Libro1.xlsb

Buenos días amigos Escribo nuevamente a petición de una consulta o ayuda, manejo una base de datos la cual es usada por varios usuarios novatos en la empresa, a esta base le quiero adaptar una macro que guarde una copia del mismo archivo al momento de aperturar y al momento de cerrarlo, debe tener dos condiciones como indique al momento de su apertura este guarde una copia con su "nombre original, el dia y la escritura de apertura", y lo mismo al momento de cerrar. estos en una ruta especifica, esto por si algun cambio guardado debo reversar saber cual archivo usar. Private Sub Workbook_Open() ThisWorkbook.SaveCopyAs "Z:\Relacion laboral\GUARDERIA\copia-apertu…

Estimados: Tengo un formulario por proyecto (pestaña) del cual tengo que sacar la mayoría de los campos. Estos campos se ordenan en una sola linea de datos en el Excel en forma horizontal por formulario (estos son muchos 564). Me dice: "procedimiento demasiado largo" , pero no sé que hacer para resolverlo, ya que tienen que estar los registros hacia el lado. Parte del codigo: [Public Sub Grabar_datos() Application.ScreenUpdating = False Sheets("Resumen").Select Range("A1").Select Do While Not IsEmpty(ActiveCell) ActiveCell.Offset(1, 0).Select Loop For i = 1 To 6 If Len(i) = 1 Then i = "0" & i Ac…

Hola Expertos. Mi idea es esta: En la hoja 1, tengo en las celdas A2:C2 informacion ya sea en numeros o no. la idea es que cuando toque un boton en la hoja 1, este haga lo siguiente: 1-Borre las celdas A2:C:2 en la Hoja1 (Con el Fin de Volver a Crear en estas filas otro registro) 2-Que lo copiado de las celdas de la Hoja1, se peguen en la hoja2 al final de la lista ya existente, sin borrarme lo que tengo en ella, o sobre escribir en cima de la celda. Ejemplo: --- Hoja1--- (A) ( © (1) # Det Det (2) 8 I R --- 1:Borra la lista y suma un 1= Dejando un 9---- (Boton) ---0: Al precionar--- ---Hoja2--- (A) ( © …

AYUDA: Tengo una base de datos donde necesito crear reportes por cliente, desde 1 libro maestro ("ANALISIS") que contiene diversos # de hojas...la hoja desde donde tengo el formato y la captura de los datos es ("REPORTE"), mi pregunta es la siguiente: 1.-Ocupo una MACRO que desde el libro "ANALISIS" hoja "REPORTE" haga una copia de los valores del reporte del rango ("A1:H79") y que haga un pegado especial como "formato de origen" en un nuevo libro con el nombre del cliente, ubicado en una celda ("J1"). y el nombre de la hoja donde se genere el pegado, tenga el nombre del numero de reporte ("G6"), al momento de seguir agregando reportes, coloque las nuevas hojas en forma…

Al ejecutar esta macro sobre los datos de la hoja1 funciona perfectamente, sinembargo requiero modificar la coneccion o asignacion de variables deforma que al convertir los datos de la Hoja1 en una Tabla Ver Hoja"TABLA" a la que denomino por el administrador de nombres "TDatos" sea posible ejecutar la misma consulta. anexo la consulta inicial sobre los datos de la hoja1 que entrega el resultado en la hoja2 " Sub ConectarExcel()" y abajo la correspondiente sobre los datos en la hojaTabla en la que el mensaje es que no encuentra el objeto "TDatos". el archivo es Xls dado que no pude subir el xlsm Gracias Sub ConectarExcel() Dim Conexión As Object, rs As Object Set Conex…

Hola, estoy realizando el traspaso de una tabla de excel a word, con un formato establecido y que contenga todos los valores de la hoja.. sin embargo he tenido problemas con poder guardarla donde deseo ya que solo me expulsa finaliza la macro pero no lo guarda donde se necesita y ahora ultimo me lanza el "error 4602": No se puede activar la aplicación, en la fila: .Activate ' Leí por ahí que hay que habilitar referencias, tengo windows10 y la verdad mi conocimiento de vba es básico, ya que he aprendido por mi cuenta estos últimos meses.. si alguien me pudiera ayudar con que referencias habilitar o deshabilitar se lo agradecería mucho. Por otro lado si …

Hola a todos. Tras buscar en el foro no he sabido encontrar algo que me resuleva el problema que tengo. Partimos del hecho que mi conocimiento es muy justito y lo poco que se lo voy sacando de los foros que tan amablemente me ayudan. No incluyo archivo pues la cuestion es muy simple y probablemente se soluciona con 4 lineas de código. Problema: Necesito encontrar un archivo dentro de un directorio que contiene cierto texto (en este caso el archivo comienza con este texto). Ejemplo. 14022 PCP 1548P.xlsm 14022 PCP 2503P.xlsm 14022 PCP 4432P.xlsm 24136 PCP ABP.xlsm 24136 PCP scx.xlsm etc de forma que sólo quiero buscar los que empiecen por 14022 (este valor lo sa…

Buen día, Solicito su colaboración con lo siguiente: Tengo que traer una información de una base de datos con clientes para ajustar un informe con las ejecutivas manejan cada cliente. Yo tengo la información que que cliente mueve cada ejecutiva. Estaba extrayendo ya de la información pegada, con una macro los clientes de la ejecutiva "A" por medio de un filtro avanzado con los datos que tengo previamente de que clientes maneja esta ejecutiva "A" en el rango de selección del filtro avanzado. Hasta ahí no hay problema. Los datos que debe traer para este ejemplo son: Cliente de la ejecutiva "A", Semana del año "2015-8", Fecha de paz y salvo "0000-00-00" Tipo "Liq".…

Hola a todos: Tengo duda en si se puede hacer que un libro de excel se guarde periodicamente en pdf. esto es: Que el dia 15 y 30 de cada mes se guarde una copia en una carpeta asiganda. Muchas gracias

Buenas tardes, Estoy haciendo un formulario para ingresar los datos del personal nuevo en una empresa. pero a partir del punto 3 es donde tengo problemas. Tengo una base de datos como se muestra en la imagen adjunta y de esta base tengo que jalar alguno campos. Ejm: Llega un trabajador nuevo Henry Guerra para el puesto de Asistente de Marketing, entonces al ejecutar el formulario: 1ro. Escribir el NOMBRE del personal Henry Guerra 2do. En GERENCIA, desplegar la lista y seleccionar Gerencia Comercial (hasta aqui la tengo clara) 3ro. En AREA, desplegar la Lista y solo aparezca las areas respectivas a Gerencia Comercial, tales como Gerencia Comercial, Marketing, Imagen…

Buenas tardes estimados Tengo un problema con un listbox que uso para modificar datos en una hoja. Cuando modifico el valor de una celda que forma parte del listbox a través de la propiedad RowSource, se disparan los eventos click y change del listbox. Necesito por favor una manera de detener esos eventos mientras terminar de modificar los datos de la fila selccionada en cada una de las columnas y luego que se active nuevamente los dos eventos antes mencionados. Gracias de antemano.

Buenos días a todos; No me deja adjuntar la macro y por eso os pongo un enlace de un video. La macro consta de dos formularios con el siguiente código para el ComandButton1 del Form1. Private Sub CommandButton1_Click() UserForm2.Show UserForm2.CommandButton2.Visible = True End Sub Al ComadButton2 en el Form2 tiene la propiedad visible como false. Como se ve en el video cuando ejecuto la macro la primera vez no me muestra el botón "Mostrar" en cambio si la vuelvo a ejecutar si lo hace. ¿No se porqué? Siento no poder subir la macro para mayor entendimiento. Un cordial saludo. Video

Que tal a todos. Yo soy nuevo en esto de la programación en VBA, llevo 2 semanas programando y me aventure por un problema que tiene mi papa de estar buscando archivo por archivo y cada uno copiarlo manualmente de una carpeta a otra... Lo que hice fue crear un programa en donde te manda un Msgbox en donde te pide la carpeta origen de los archivos y la carpeta destino de los archivos, los graba en A1 y B1 para después usar esos valores. Luego en columna C, en forma decendente, se ponen los nombres de los archivos que tiene que buscar y copiar de carpeta a carpeta.... Mi petición sería ver como hacerlo mas eficiente el programa porque a veces se cicla el programi…

Buenas. Vereis quiero realizar una macro que, cuando el usuario clickee el botón de guardar como aparezca en el diálogo un nombre de archivo, a modo de sugerencia, distinto al que posee el propio archivo. He intentado lo siguiente: Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Application.Dialogs(xlDialogSaveAs).show ("Nombre sugerido.xlsx") End Sub [/CODE] pero lo que obtengo es que, una vez guardado el archivo, me pide volverlo a guardar y me gustaría evitar eso. También había pensado en, por medio de la macro, guardar el archivo en alguna parte (windows/temp por ejemplo) con el nombre que yo sugiero y luego hacer aparecer …

Hola amigos! Me encuentro una vez mas por este foro, requiriendo su ayuda generosa.... me encuentro con la siguiente dificultad: Necesito agregar a una planilla en formato "Hoja de cálculo habilitada para macros de Microsoft Office Excel (.xlsm)" un correlativo que al abrir el archivo se actualice automáticamente y que ademas al guardar el archivo me arroje por defecto un formato predeterminado... buscando por este foro me encontré con el siguiente código: Private Sub Workbook_Open() Range("I1") = Range("I1") + 1 'Anota en la celda I1 el numero de archivo a guardar Application.Workbooks("Sat").Save ' Salva el archivo para poder asignar numeros consecutivos Ruta = "C…

Saludos estimados Master tenha la gentileza de ayudarme con esta macro: tengo tres rangos A5:A20 C5:C20 E5:E20 lo que deseo es que al dar doble clic en el A5:A20 empiece la numeracion en cualquier celda empezando desde el numero 11 hasta llegar al 19 y luego no me permita mas, de la misma manera para el rango C5:C20 con la numeracion desde 21 hasta el 30 y para E5:E20 con la numeracion desde 31 al 40. finalmente si quiero eliminar algun numero puedo hacer clic derecho y borrar el numero de la celda, y cuando sigo con cl clic este numero se debe restaurar actualizado el conteo. Gracias DOBLE CLIC RANGOS NUMERADOR AUTOMATICO.xls

Con mucha pena tengo que decirles que conozco muy poco de macros y es por ello que respuosamente les formulo esta pregunta. Siempre que copio una macho y al ejecutarla me sale el siguiene mensaje:" Error de Compilacion se esperava un End Sub" y me rasalda el Nombre de la Macro. Mis sistema Operativo es Windows 7 El Oficce es 2007 El Error se repite con todas las macros que copio El procedimiento que utilizo para copiar la macro es el siguiene: 1ª Abro un libro de excel 2ª Visual Basic 3ª Herramientas 4ª Macros 5ª Nombre de la Macro 6ª Crear 7ª Copio la Macro "Esta es una macro copiada" Sub MACRO7() Private Sub Worksheet_Change(ByVal Target As Range) If Ta…