Hola a todos, este es mi primer post en esta comunidad, y seguro no va a ser el último. Mi consulta es la sisuiente: Tengo una HOJA en donde cada FILA son los datos de personas, y lo que necesito hacer un fichero con cada persona, o sea quiero saber como hay que hacer para que me imprima a cada persona en una ficha (miden 9cm X 15cm). Excel deberia tomar los datos de cada persona y enviarlos al buffer de la impresora y nada mas... nose si me expresé bien. saludos a todos y gracias!:stung:

Buenas tardes Encontre en el foro esta macro para un calendario automático Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range): On Error GoTo Sal Unload Calendario If UCase(Sh.Cells(5, Target.Row)) Like "*FECHA*" And _ Target.Row > 1 And _ Target.Cells.Count = 1 And _ IsEmpty(Target.Offset(-1, 0)) = False Then Calendario.Top = ActiveCell.Top + 160 Calendario.Left = ActiveCell.Left + 18 Calendario.Show End If Sal: End Sub Necesito modificarla para que solo se aplica ciertas celdas y filas Por ej en la columna C y fila 4 Y en mi planilla l…

buenas tardes, tengo una pequeña aplicacion para boletas de retiro de dinero ("fichas" ya que es un casino) lo que necesito es que cada vez que se digite una boleta de retiro de dinero se le envie un mensaje a otra computadora de la red (computadora de monitoreo), estuve leyendo y me parece que lo indicado es msg.exe o net.exe solo que no tengo idea del codigo que tenga que utilizar para que lo envie a la hora de digitar cada boleta, las computadoras tienen instalado windows xp y office 2010 muchas gracias!

después de un cordial saludo, me dirijo a ustedes para ver si dentro de lo posible me brindan una ayuda, debido a que no tengo experiencia, programando en vba, y necesito agregar un formulario a una base de datos que estoy estructurando, me gustaría sobre todo poder a prender a introducir un formulario y que funcione perfecta mente, les doy las gracias de ante mano por su atención. esto es lo que quiero realizar si esta dentro de lo posible. 1- que se pueda entrar a la base de datos mediante usuarios y claves. 2- hacer un formulario para poder introducir, los nombres de los empleado, donde yo pueda ponerle las ausencia, permiso, y que cuando haga la consulta mediante a…

Hola tengo este formulario que les dejo anexo, para las dos primeras columnas diseñe una macro que me carga un formulario para seleccionar la fecha ---- al final de la hoja en la ultima columna hay otra macro que al introducir la palabra "si" me bloquea la fila que acabo de editar y me lanza a la primera celda de la misma fila ---- al hacer esta acción hace que de nuevo se me cargue el formulario de fecha puesto que esa celda queda activa y hay una macro en ella para que muestre ese formulario cuando se selecciona (cuando esta activa) ----- entonces me toca cerrarlo y ahora si queda bloqueada la fila que acabo de editar, ... esto es un gran problema, puesto que al ca…

Lo que pasa es que tengo un boton de buscar un dato en especifico y me muestra los datos duplicados de los retirados de una empresa en un listbox lo unico que los diferencia es el tomo en el que estan registrados, lo que intento lograr es que cuando seleccione en el listbox uno de los datos si por ejemplo son dos, al seleccionar el primero este se ponga en la celda activa correspondiente para que a la vez se me llene los textbox el formulario que he realizado con su respectivos datos. de antemano les doy las gracias si me pueden colaborar. adjunto archivo del aplicativo que estoy trabajando.

Buenos días Foro, Necesito vuestra ayuda y conocimiento para un error con VBA. Hace un mes que lleva dándome problema una línea de código (no había pasado en más de un año) y tras mirar en mil páginas no encuentro solución, por si pudierais echarme una mano. Os adjunto la línea de código: El error se encuentra en el "end if" del final. No sabéis lo importante que me es solucionarlo y no encuentro la solución... Mil gracias Sub ImportarModelos() Dim strSource As String Dim dbs As DAO.Database Dim rst As DAO.Recordset Dim consulta As String Dim archivoAbrir As Excel.Workbook Dim RUTAExcel As String Dim strRespu…

Buenas Foro. En un rango de celdas variable en columna A tengo rutas y nombres de archivos para adjuntar a un correo. Con .Attachments.Add adjunto un archivo y mi pregunta es como podria adjuntar los que tengo en el rango A con algun bucle o algo?

Buenas tardes... por favor necesito ayuda sobre el siguiente tema: tengo una macro que corta y transfiere datos en una hoja, sin afectar el formato de la celda de origen. En la misma hoja me funciona de maravillas, pero no puedo transferir datos A OTRAS 7 HOJAS SIMILARES, en los mismos rangos. Cuando lo intento me copia los datos en la misma hoja de origen. Les agradeceria me pudieran ayudar con esto. Sub MigrarPUB() ActiveCell.Offset(0, 0).Range("B1:GO1").Select Selection.Copy rgoOrigen = Selection.Address 'seleccionar la primer celda de destino Set rgoDestino = Application.InputBox("Haga clic en lugar de destino", Type:=8) 'me selecciona …

hola necesito saber cual es el procedimiento paraa recorrer un label y que me devuelva una palabra por ejemplo en la segunda posicion, el problema es que es dinamico el texto va cambiando segun otras operaciones, entonces necesito que me devuelva la palabra en una pocicion especifica independiente del largo de la palabra o numero de caracteres proque variara la palabra que se quiere devolver. saludos

Buenas noches, En un archivo excel tengo una columna de fechas con la función HOY(), sin embargo cuando vinculo a través de un formulario con VBA esa información a una plantilla en word me arroja la fecha con este formato 30/05/2014, y la necesito así: 30 de mayo de 2014. ¿Hay alguna opción con macro que se actualice automáticamente sin necesidad de ejecutarlo que se le pueda añadir a dicha función para lograrlo? La idea es que el excel me de la hora actual siempre que lo abra y obviamente luego pasarla al archivo word con el formato solicitado...

Debido a que tengo muchas preguntas para una sola encuesta, cree 4 formularios y en el ultimo formulario puse un boton para guardar. (La razon por la que cree 4 formularios se debio a que el formulario tiene un tamaño limite) Mi duda es que si se podrá guardar con solo un boton los datos de 4 formularios en una hoja?? Alguien lo ha intentado? Adjunto mi archivo, espero sus comentarios.. Saludos! (SOLUCIONADO) Encuesta.rar

Hola a todos soy nuevo en esto, así que espero comprendan en el caso de tener una equivocación en mi consulta. Tengo un libro de origen (estudio de mercado quito) donde al momento de hacer click en un botón (zona sur), primero quiero que me borre los datos que exista en la hoja "base" y luego me copie todos los datos de otro libro incluyendo fórmulas y gráficos estadísticos (base de estudio de mercado/sur) sin necesidad de que el mismo se encuentre abierto. La verdad es que soy nuevo en esto de las macros he intentado realizarlo con grabar macros y no he tenido éxito alguno. Espero me puedan ayudar, gracias. BASE ESTUDIO DE MERCADO QUITO 2.zip ESTUDIO DE MERCADO QUIT…

soy nuevo en esto de la programacion por excel y el vba, entonces estaba haciendo unas pruebas para ayudar ami amiga en su sus tareas, mi problema es que no puedo cambiar la hoja de calculo cada vez que acciono el boton para cambiar de formulario y escogr la hoja donde vaciar los datos y ocultar las demas, ademas copie y adapete un procedimiento para hacwer una consulta pero no funciono, quiero que cuando hacga la consulta de un vehiculo sus datos de bitacora de serv,. aparezcan en una grid, pero mi pc no me dio las grid, asi que intente en textbox, pero no se ve muy bien, alguien podria indicarme que me fallo o podrian orientarme en mi modelo? CONTROL.rar

buenos dias, tengo un problema en la gestion de vencimientos de proveedores. lo que quiero hacer es que al insertar un proveedor que ya tiene asignado un vencimiento (30 dias, 30-60-90 dias, contado,....) me lo coloque en una hoja de su banco correspondiente fraccionando dicho pago (si es un pago de 1000$ y el vencimiento es a 30-60-90 dias que ponga su fecha correcta y su cantidad (333$ en cada vencimiento) y que en dicha hoja los pagos vayan ordenados por fecha de - a +. adjunto un excel que tiene comentarios explicados para ver si me podeis echar un cable ya que toy de los nervios y para mi es imposible ya que no tengo mucha idea, tengo algo de nociones nada…

Buenos días, Buscando una solución a mi problema y no he encontrado ninguno con respuesta. Tengo 10 archivos para distintos usuarios, cada uno con su contraseña. Los archivos están vinculados entre si y lo que quiero es que cuando abra uno, no me pida las contraseñas del resto de usuarios. Estoy intentando programar la macro: Sub Abrir() Dim Libro As Workbook Set Libro = Workbooks.Open(Filename:="C:\Directorio\Libro.xls", UpdateLinks:=1, Password:="qaz", WriteResPassword:="qaz") End Sub He empezado con archivo 1 vinculado a archivo 2, para que cuando abra archivo 1 no me pida la contraseña del archivo 2 Tengo dos problemas Pero con este ejemplo, al abrir e…

Ayuda para copiar hojas de un libro a otro Hola requiero de su ayuda, tengo dos libros uno que se llama reporte qna 20, cada quincena me mandan la información para su revisión, y cree otro libro llamado qna actual, lo que hice fue una macro para que de los reportes que mandan para su revisión los pase a mi plantilla, las las tablas son similares, desde la columna A has la columna I, de allí en adelante varían las columnas y filas, la macro que hice me copia la hoja llamada RBASE a la hoja RQNACT_BASE de mi libro, son cuatro hojas que quiero se peguen, utilice un array para que me copiaran todas las hojas, solo que al momento de pegarlas se me copian con el tamaño de la …

Buenos días, expertos necesito una ayuda en mi archivo en la hoja Etiquetas_1 hay formato de rótulos ese formato quisiera que se imprima las cantidad de veces de acuerdo a numero que representa en la columna bultos, cada rotulo representa a a un numero de bultos; balga la redundancia, lo que necesito es una macro que me imprimala cantidad de veces de cada rotulo de acuerdo el numero de bultos se puede cambien de numero o en otros no se puede poner ningun numero entonce tampoco imprimiria. Muchas gracias, esperando su ayuda por favor. Adjunto el archivo Rotulos-wings.xlsm

buenas, lo que pasa es que con esta aplicacion deseo subir puntos, y el programa es una maravilla.. pero al tratar de pas ar los puntos a autocad me salta el mensaje ''error 1004'' y me dice que no encuentra la ruta de acceso... y esto es lo que me muestra el depurador Sub Macro1() ' ' Macro1 Macro ' Macro grabada el 20/11/00 por jhr ' ' MsgBox "Asegurese de que todos los puntos tienen codido, y que no hay ninguna fila en blanco. No elimine ni filas ni columnas, elimine el contenido de estas si es necesario." MsgBox "Se crearan dos archivos en el directorio raiz C:\ ;un fichero con extension 'dxf' y otro con extension 'xls', ambos con el mismo nombre que…

Hola amigos,molestando su atención en el archivo adjunto. existe un codigo vba que permite crear una tabal dinamica y graficar sin emabrgo, yo quiero mejorar ese código y por eso les escribo, quisiera hacer que ademas de hacer ello se pueda ordenar los datos (de mayor a menor) y seleccionar solamente los 10 ique como otros y a partir de ello grafique(tal como esta en la hoja Modelo. Gracias expertos por su atención desbosque1.zip

buenas tardes ... existe la posibilidad que me puedar ayudar por favor con esta inquietud ?? " en un formulario quiero multiplicar valores de un combobox1 por textbox1 con resultado en textbox3 " pero automático ...sin el boton para ejecutar

Chic@s les pido ayuda con un macro que me ayude a lo siguiente: Anexo Excel Tengo un control de números que refiere a las fechas: Quiero que al seleccionar cualquier numero el macro me lleve a la celda donde esta la fecha que refiere el numero. Pero que me de la libertad de poder navegar también manualmente. Les anexo mi archivo muchas gracias COMPARTIR.xlsm

Hola amigos hay alquien que me colabore lo que quiero es que al momento de hacer inventario nesecito incluir las fechas de vencimiento que tiene cada prodcuto pero no e podido solucionar el problema que tiene mi planilla gracias planilla de invenatrio.rar

Necesito encontrar la estación por medio de la columna auxiliar y que el valor 0 ENCONTRADO EN OFFSET Ó EL LADO QUE SEA L.C (LINEA CENTRAL) sume los valores de los lados (L.I y L.D) izquierdo y derecho Se me complica en el monento que la L.C pasa al final del orden de la estació o a su inicio Me dirán que ordene los valores en las columnas del offset y la elevación pero debido a que se tiene que llevar el registro de esta manera no debo. En la columna "E" dejo los valores supuestos de la operación Cualquier ayuda, gracias de antemano. ------------------------------FORMATO ELEVACIONES--------------------------.xls

Hola. A ver si alguien me puede ayudar. Tengo unas celdas (pongamos como ejemplo, de C4:C18) con una función SI, de forma que me devuelve un valor. En las celdas contiguas (D4:D18) pretendo lo siguiente: que si el valor de la celda C4 es del 1 al 4, que en la celda D4 me salga una lista desplegable para poner un número desde el 1 al 6; pero si el valor está entre el 5 y el 10 (ambos incluidos), que simplemente (y de forma automática) me ponga ese valor, sin necesidad de hacer nada. No sé si se puede hacer con funciones normales o hay que utilizar VBA, en cualquier caso, no sé cómo hacerlo. Agradezco de antemano a todos aquellos que tengan a bien dedicarme su tiempo.