Hola buen día a todos los que hacen de este espacio una gran comunidad. Actualmente estoy trabajando con con excel y access (Set dataread = CreateObject("ADODB.Recordset")), para realizar extracciones de datos. Pero la base debe pasar por un proceso de limpieza y formato, y mi duda va encaminado a eso: ¿Es posible eliminar columnas usando un proceso similar? ¿Se puede separar texto en columnas identificando un caracter? y si fuera posible ¿Como podría hacerlo?, supongo que debe haber otras formas con otras herramientas, pero me encantaría seguir este proceso. De antemano muchas gracias por interes y el tiempo dedicado a la consulta.

Buenos dias, expertos recurro asus conocimientos para perdirles una ayuda, tengo un formulario llamado "FormHorarioMañana" para asignar horario y consultarlo los datos de la hoja llamado "VoluntarioRelacion", estando en el formulario debo desplegar el combobox y me lista los nombres y cuando seleccione una de ellas me debe mostrar en los recuadros del textbox el nombre del area dependiendo del dia y la hora, por favor me ayuden gracias por su tiempo por anticipado. Ajunto el archivo. Horario.xlsm

Buen dia! Por favor solicito urgente ayuda en varias macros que tengo para una misma hoja. la primera que presento se refiere a una macro de busqueda en multiples hojas es vital para la actividad que realizo. El detalle es este: Option Explicit Private Sub Worksheet_Activate() End Sub Private Sub Worksheet_Change(ByVal Target As Range) If Intersect([Codigo], Target) Is Nothing Then Exit Sub If Not [bAuto] Then Exit Sub Buscar End Sub La segunda que quiero incorporar es una que me asocie una base de datos a selecionar la celda. Cuando la aplico sola responde perfecto pero al intertar incorporarla me da un error . este es su codigo Private Sub Wo…

Problema que tengo ahora es que solo me permite cargar 2 archivos cuando trato de cargar más de 2 se revienta y sale el error "se ha producido error 1004 en tiempo de ejecución" le doy en depurar y me resalta esta línea Hoja.Copy after:=Workbooks(A).Sheets(Workbooks(A).Sheets.Count) Adjunto el archivo XLSM y un zip con los archivos que se van a cargar al tiempo Gracias por su ayuda Macro_Masivo.xlsm Archivos.zip

buenas tardes compañero la pregunta es si haba la posibilidad de actualizar el control Dtpiker al Excel 2013 de 64 bits, ya intente varias formas y no puedo como descargar y registrar mscomct2.ocx, instalar un office anterior y actualizarlo al 2013 y no aparece, desde ya saludos

Esimados amigos de Ayudaexcel, un gran abrazo. Tengo el sgte problema en excel y me está volviendo loco: Tengo un archivo de excel que tiene una data de produccion de aproximadamente 50000 registros (filas) en unas 50 columnas. En el hay varias tablas dinámicas (5) y varias macros para automatizar procesos como formatos de hojas por ejemplo. Cuando el archivo se ha creado nuevo abre en pocos segundos (maximo 3 seg) y se graba en los mismos 3 segundos. En este reporte de tablas dinamicas uso con frecuencia la utilidad de doble click sobre la tabla para que me despliegue los datos. Pero a medida que pasa el tiempo, dia tras dia, el archivo se va volviendo lento y cada vez …

En mi libro (cuadro de necesidades), Tengo varias hojas (Regidores, Imagen, OCI, Secret., Archivo, Partic. Ciudadana, etc, etc,), las cuales se suman o se consolidan, todas estas, en una hoja resumen llanada Consol.Mi gran problema es cuando hay la necesidad de ingresar items nuevos (Otros) en cualquiera de estas hojas, estos items nuevos tienen que agregarse en todas las hojas y también todas las hojas deben ordenar estos items alfabéticamente, para que al final salga igual mi resumen o consolidado.Necesito una macro que me simplifique esta tarea.Tener en cuenta que hay mas de 40 hojas que por razones de espacio las he recortado y tener en cuenta también que hay diferent…

Hola, Tengo el siguiente problema que no podido resolver. El inconveniente es cuando se crea una nueva hoja como copia de otra existente y al tratar de acceder a la nueva y copiar datos, esto no es posible. Los datos que intento escribir los escribe a la anterior hoja nunca en la nueva. La siguiente es una muestra del programa. Alguien me puede ayudar, muchas gracias de antemano. Sub prueba() Dim nhoja, pos As String Dim hojanueva As Worksheet Dim nfila As Integer nhoja = "prueba" Worksheets("FORMATO").Activate Worksheets("FORMATO").Copy After:=Worksheets(Sheets.Count) ' Worksheets("FORMATO").Copy After:=Worksheets(nhoja) NO funciona Set hoja…

Estimados necesito me ayuden con la siguiente inquietud: Necesito realizar una seleccion entre tres mapas (formas): 1- al momento de selccionar desde cuadro combinado (control de formulario) una de las tres opciones en este caso provincia, canton o distrito, se muestre el mapa respectivo. para ello necesito que me ayuden con una bva. acontinuacion adjunto libro excel. https://drive.google.com/open?id=0B8bjmjZrzJe1VEdFa3YzVExEY0U no pude subir el archivo, no permite. pero adjunte el link.

Hola, Esta mañana, impartiendo un curso de VBA para una empresa, alguien tenía la versión de excel 2007. Ha intentado grabar una macro con la grabadora de macros que insertaba una foto en una hoja. La grabadora no generaba ningún código referente a la inserción de la imagen pero si generaba código para otras acciones. ¿Alguien sabe por qué no genera código al insertar la imagen? ¿Hay que configurar algo? En excel 2010 y 2013 no he tenido ningún problema. Gracias de antemano por vuestras respuestas y saludos.

Hola, pretendo que en mi formulario en concepto, al ir tecleando algun articulo de la base de datos, si este no esta o me equivoco al teclear que no me de error y me deje seguir tecleando aunque en el precio1 no me marque el precio de la base de datos ya que no se encuentra en la misma por mas que lo intento no lo consigo, gracias. PRUEBA.xls

Buenas Tardes, Una consulta amigos del foro: tengo un formulario con varios proveedores y a la vez un proveedor tiene diferentes productos . cuando selecciono un producto del listbox multiselect este se conecta a una database sql 2008 y me arroja informacion en la hoja 2 activa ,y a la vez cambia el nombre de la hoja. lo que deseo hacer es lo siguiente: que se genere un libro nuevo cuando selecciono un proveedor y se generen hojas con todos los nombres de los productos de ese proveedor cada vez que activo un producto este me genera informacion diferente en la hoja2 deseo que cuando se halla generado el libro y las hojas de ese proveedor copie la hoja activa (ho…

Buena noche foristas. Quisiera solicitar su apoyo para ver si puedo solucionar el siguiente inconveniente. Estoy trabajando unas tablas que permitirán llevar un mejor control de verduras. He avanzado un poco, pero actualmente estoy parado en lo siguiente: A partir de la celdas B3:C3 enlisto las verduras de la semana, el cual es un listado variable. Para el ejemplo, tengo 4 verduras, y lo que quisiera hacer es que con una macro, se copie estas verduras que ingresaron esta semana, y por cada verdura, se incerte en la columna anexa 4 parámetros dispuestos en fila, como son: Orígen, Variedad, Peso y el Vendedor. Además, mentener un estilo de borde, el cual describ…

Hola, Necesito Ayuda, Tengo Un Programa De Reporte En Mi Trabajo La Macroos Funcionaba Por Nombre De Equipo Y Tenia Un Hipervinculo Que Me Llevaba Al Formulario De Reporte, Lo Que Necesito Es Cambiarlo, Tal Es Asi Que Cuando Yo Ingrese Un Codigo O Tag, Y Al Darle Clik En El Hipervinculo Me Lleve A La Hoja De Datos Que Quiero , En Resumen Comparar Los Textos Y Con Hipervinculo Ir A La Pagina Correcta.

tengo un proyecto amigos de filtrado Sub filtro_prueba() Range("A9").CurrentRegion.AutoFilter Field:=12, Criteria1:=Sheets("anexo").Range("b10").Value 'estatus es un texto Range("A9").CurrentRegion.AutoFilter Field:=9, Criteria1:=Sheets("anexo").Range("b12").Value 'es una fecha end sub desde la fila 9 inician mis datos los cuales tienen un encabezado , lo que pretendo hacer es filtrar dos condiciones una de estatus y la otra es de fecha solo que no me funciona ojala me puedan ayudar

Buscando y buscando en la red he visto varias formas de guardar una hoja como libro nuevo de excel pero todas son soluciones muy generales y por mi mismo tampoco he podido acertarla a lo que requiero, verán, tengo un libro y necesito : generar un libro que contemple sólo un rango de la hoja3 (A1:AC58), que el libro generado lleve por nombre el dato de la celda (X6) y que además lleve los formatos de origen (filas, columnas fuentes, tamaños, etc.), datos de encabezado pie de página. Será posible que una macro haga todo eso o estoy pidiendo demasiado? Espero que podáis ayudarme o darme luces al respecto. Un saludo.

Sub Macro2() ' Dim valor As String valor = "pedro" Set mirango = Workbooks("Libro1").Sheets("Hoja2").Range("B7:B12") For Each mirango In Selection.Cells Sheets("Hoja2").Select Range("B7:B12").Select Selection.Copy Sheets("Hoja3").Select Range("B13:B18").Select ActiveSheet.Paste Next End End Sub TENGO EN LA HOJA 2 LO SIGUIENTE EN EL RANGO B7:B12 TENGO UNA COLUMNA DE NOMBRES ASI SIN TITULO DE ENCABEZADO hoja2 hoja 3 PEDRO PEDRO MARIA JOSE PEDRO PEDRO …

Hola amigos como estan! ando con una inquietud hace días que me mire todos los videos que encontre y no logro resolver un punto importante en mi proyecto. Tengo dos Archivos excel: Datos - Abastecimientos2 y Autorizaciones., ambos archivos tienen una hoja llamada "Datos" En el archivo de Datos - Abastecimientos, en la Hoja datos, van ingresando datos a los cuales se le agrega el valor = "Prespuestado" una vez que se hice la busqueda de precios. Lo que estaba intentando con el modulo 1 es que me busque todos los datos de esa hoja y me copie solo las filas que cumplen la condicion de tener la palabra "Presupuestado". y me las pegue en la Hoja Datos…

Estimados, Tengo una macro, en donde despliega en una pestaña todos los datos según uno seleccione en el combobox, al hacer Doble Click en la columna TECNICO , despliega una hoja con datos que se deben llenar. Existen dos botones, Ver y Registrar, al apretar el btn Ver, se despliegan campos dinamicamente y al completar esos datos se selecciona btn registrar y se almacenan los datos en la misma hoja en la celda 52 con su ID correspondiente. Lo que no me resulta es una vez creado los ese ID poder asociarlo a un combobox dentro del mismo formulario(btn ver) y me cree el ID 1.1 hasta N.N. Combobox1 : Dato1 Combobox2.Dato2 B…

BUENAS TARDES!!!! El motivo de este Tema es que estoy desarrollando un proyecto, de registro de producción diaria, por variedad, por tamaño, y por empacadora y necesito sacar reportes en base a diferentes criterios, Agregue un botón Al libro Registro que gracias a un fito avanzado puedo visualizar la información en base a diferentes criterios pero el problema es cuando quiero visualizar los datos de un periodo especifico y también otros criterios , código2 28/03/2014 y 07/04/2014 no me los muestra ningún dato seria de gran ayuda si alguien me pudiera auxiliar Informes.zip

Buenas amigos genios del excel!, me podrían ayudar con este problema que se genera cuando: 1.- tengo una hoja llamada Generar CI = Código Interno 2.- Hoja de Propuestas donde se almacenan los CI De todas maneras adjunto el archivo para q me ayuden! Gracias de antemano! >_< Lo siguiente es que debo proteger la Hoja Propuestas y de la hoja de CI podré modificar sólo el nombre que ingresare el requerimiento. Al proteger me sale error!, la macro que utilizé para generar el CI y es donde me marca en amarillo es el siguiente: Sub btn_procesar() Dim rbase, cbase As Integer Dim cant As Integer Dim desc, cod, cli, jp As String Dim msg As Variant…

Hola a todos, espero me den una mano con esta macro que encontré en este foro, lo quiero adaptar a mis necesidades pero no lo logre.. La idea es que me busque los datos de la columna "E", de la "hoja27" y una vez que encuentre me posicione el cursor en la celda, esta macro la hace pero solo con nombres cortos Ej. fast, pero yo tengo de la siguiente manera Ej. Alimentación - Restaurante - FAST WAY FOODS S.R.L., lo ideal para mi es que encuentre al darle Fast o Way sin importar el orden Y cuando presiono el Botón "criterio" que me limpie el textbox, porque ahi da un error al repetir la busqueda y en el label2, que me de los valores de la celda "D".....desde y…

Buenas tardes, Tengo este fragmento de código en el libro, de manera que cada vez que introduzco un valor en una celda de la columna B, me devuelve la fecha en la celda adyacente de la columna C. Me gustaría repetir la misma operación en el mismo libro, de manera que cuando se introduce un valor en las celdas de las columnas E y H, también devuelva las fechas en las celdas adyacentes de las columnas F e I. ¿Alguien sabría indicarme cómo repetir la misma operación? Private Sub Worksheet_Change(ByVal Target As Range) tiempo = Date Set isect = Application.Intersect(Target, Range("B:B")) If Not isect Is Nothing Then If isect.Va…

Hola amigos, nuevamente solicito su ayuda con un macro que haga lo siguiente: En la columna A tengo números de teléfono (8 dígitos) lo que necesito es un macro que deje únicamente los que inician con 3,4 y 5, todos los demás que empiecen con cualquier numero que no sean los anteriormente mecionados deberan ser borrados. saludos

buen dia amigo soy nuevo en el foro pero em encantaria que alquien me pudiera ayudar con mi buscador en excel: ejem:en la hoja 1 tengo los datos asi: CODIGO.CODIGO BARRAS PRODUCTO STOK CONTEO 1468 7702434214210 CHOCOLATE X 250 30 1502 7702432468031 MANI X 250 25 en la hoja 2 tengo la busqueda asi: codigo barras:7702434214210 codigo: 1468 producto: chocolate x 250 stok:30 conteo: nota : como hago para sacar la formula para que me busque atomatico la busqueda del codigo 1468 como aparece en la hoja 2 y que al digitar el conteo de la hoja 2 salga en la hoja 1 atomatico y cuando se digite el 1502 de la busqueda al di…