Macros y programación VBA
Temas sobre la automatización de Excel utilizando macros y VBA. Errores de VBA. ¿No consigues que tus macros hagan lo que necesitas?
8686 temas en este foro
-
Estimados amigos: Vuelvo a abusar de los conocimientos de este foro para ver si alguien puede echarme una mano con una macro que me permita importar los datos de un archivo TXT tabulado a una hoja de Excel, pero con desplazamiento de referencias. Es decir, los datos importados no se copiarán en celdas contiguas, sino que lo harán en filas y columnas distintas (aunque con un patrón determinado). Adjunto un archivo que espero aclare lo que necesito. Agradezco de antemano cualquier ayuda que puedan prestarme. Cordialmente. Macro TXT2XLS.zip
-
0
Reacciones de usuarios
- 0 respuestas
- 1k visitas
-
-
Estimados srs, quisiera añadir filas a una factura excel y que baje la suma total, incluso si es necesario pase a otra pagina, pero por mas que lo intento no hay manera, soy principiente, muy novato. gracias de antemano. la contraseña de la protección es 111 Factura-automatizada6.xlsm
-
0
Reacciones de usuarios
- 1 respuesta
- 1k visitas
-
-
Buenas tardes, espero poder contar con su ayuda. Estoy trabajando con dos libros, mi objetivo es pasar un rango de datos a otro libro sin abrirlo. Estoy usando esta MACRO, que me ha generado cierto error, y quisiera saber si ustedes me pueden ayudar a resolver. Sub CopiarCeldas() 'Se definen objetos a utilizar Dim wbDestino As Workbook, _ wsOrigen As Excel.Worksheet, _ wsDestino As Excel.Worksheet, _ rngOrigen As Excel.Range, _ rngDestino As Excel.Range 'Libro Excel destino Set wbDestino = Workbooks.Open("ruta del libro destino") 'Activarlo ThisWorkbook.Activate 'Se indican las hojas de origen y destino Set wsOrigen = Workshee…
-
Buenas tardes a todos, trato de aplicar dos filtros discriminatorios de datos procedentes de dos hojas distintas de un libro de excell, de tal forma que al seleccionar el primer filtro solo aparezca en el segundo filtro los campos que contenga el primero. Adjunto un ejemplo y lo explico mejor. Gracias. Ejemplo 2.xlsb
-
1
Reacciones de usuarios
- 3 respuestas
- 1k visitas
- 2 seguidores
-
-
Estimados(as) Junto con saludar y esperando estén todos bien, paso a exponer mi duda: como puedo copiar un rango de celdas, que conozco numericamente su fila y columna en otra hoja donde conozco el destino lo conozco tambien en forma numerica tambien Intento hacer esto ------>>>> worksheets(3).range(cells(valor1,valor2), cells(valor3,valor4)).Copy Destination:=Worksheets(2).range(valorx,valory) ?????? gracias
-
0
Reacciones de usuarios
- 3 respuestas
- 1k visitas
-
-
Buenas noches, quisiera que me puedan ayudar tengo que hacer un excel en donde una celda tenga múltiples opciones seleccionables y que al elegirlas se muestren concatenadas en la misma celda, aca dejo un ejemplo Multiseleccion EXPEDIENTES.xls Desde ya les agradezco
-
0
Reacciones de usuarios
- 3 respuestas
- 1k visitas
-
-
-
Hola, Tengo que hacer una tabla dinámica muy sencilla pero no he logrado hacerla. Dada una tabla en una hoja (Base), debo crear una nueva hoja (Dinámica vacíos) con una tabla dinámica en la que ponga la variable "Observacion" en las filas y la suma de la variable "Eliminar". En alguna ocasión utilicé un código y me sirvió, que en esta ocasión intenté adaptar, según muestro en el adjunto. Vale aclarar que no conozco la 'teoría' de VBA, por lo que seguro tengo errores simples, pero les agradecería me ayuden. El error que me aparece, al ejecutar la línea del PivotCache.CreatePivotTable() es: Se ha producido el error '1004' en tiempo de ejecución. El nombre del campo de t…
-
0
Reacciones de usuarios
- 1 respuesta
- 1k visitas
-
-
Buenas tardes!!! Estoy trabajando en un proyecto, casi esta finalizado pero me gustaría me ayudaran, LA MACRO SE UTILIZA PARA EL REGISTRO DE MALLAS (PRODUCTO) POR DÍA Y POR ÁREA PRODUCTIVA DE UNA EMPRESA DE FLORES. Al ingresar el primer registro todo perfecto, pero al ingresar el segundo registro la información se sobrescribe en las mismas celdas , necesito que se, almacene en las celdas continuas y conservar todos los registros. también les pido su ayuda para que vinculen la información a un concentrado final de todas las variedades, POR FECHA EL TOTAL DE FREEDOM PRODUCIDA 04/04/2014 Agradezco su atención mallas.zip
-
0
Reacciones de usuarios
- 8 respuestas
- 1k visitas
-
-
Buenas noche amigos de Excel Ayuda quisiera que me ayuden completando mi amplicación con la ayuda de ustedes e creado una aplicación que ingresa datos para analizar en varios perìodos, los datos estan en un hoja BBDD, mi objetivo es que al analizar los productos cada periodo y culminarlos quiero pintarlos de acuerdo a dos criteros "suspendido" o "culminado" utilizando el buscador yo digito el "Lote" y doy clik en la lupa y busca el producto pero quiero que al ubicar el "Producto1, Produco2 etc" al selecionar uno de los dos botones de opción "verde o rojo" se pinten automaticamente en la base de datos BBDD todas las filas que buscó. Les agradezco por darme un tiempo e…
-
0
Reacciones de usuarios
- 4 respuestas
- 1k visitas
-
-
buen día compañeros, en el excel adjunto, necesito que por cada nombre me filtre solo lo de ese nombre y me lo ponga en otro archivo a parte con dicho nombre. Es decir, si en el listado se encuentra Eliana, me haga filtro con ella, me copie solo la información de ella, me lo pegue en otro archivo y me lo guarde con el nombre Ejemplo.xlsx
-
0
Reacciones de usuarios
- 2 respuestas
- 1k visitas
- 1 seguidor
-
-
Deseo ayuda para resolver un gran problema. Evaluar los valores (-) de una columna que sumados a otro valor pero (+) de la misma columna igualen a cero. HOJA1 A B C D 1 1/10/2013 A1 5 XXX 2 1/10/2013 S2 -2 X1X 3 1/10/2013 A1 -2 XXX 4 1/10/2013 A1 -3 XXX HOJA2 A B C D 1 1/10/2013 A1 5 XXX 2 1/10/2013 A1 -2 XXX 3 1/10/2013 A1…
-
0
Reacciones de usuarios
- 7 respuestas
- 1k visitas
-
-
Hola, Tengo una tabla Dinamica de la cual obtengo datos para presentar un reporte al cual le coloque una lista desplegable para REGION y otra para TERRITORIO, el problema es ejem: cuando selecciono una region (supongamos )SUR y el territorio VILLAHERMOSA si devuelve el valor correcto, pero al querer cambiar la region ya no me devuelve el valor real, se queda como grabado el valor de la posicion que tenía el territorio.como puedo hacer para que al seleccional otra region el territorio vuelva al valor todas y asi me de el valor real de la nueva region seleccionada.Mil Gracias.No pude adjuntar mi file, dice que tamaño mayor al permitido.
-
0
Reacciones de usuarios
- 1 respuesta
- 1k visitas
-
-
Buenas noches muchachos, ando un poco "mosca" por que resulta que una sencilla macro solamente me funciona "a veces", explico; tengo un menu contextual creado en el que una de las opciones es "pegar" (si el pegar de toda la vida) con la unica salvedad de que únicamente pega los valores (que previamente he copiado), me sale el típico "error 1004 en tiempo de ejecución" no sé que se me está pasando. Esta es la mini macro: Sub Pegar() Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False End Sub[/CODE] Gracias por estar siempre al quite, un saludo.
-
Buenos días, Necesito una macro que me busque en toda la columna K el valor 0, y si las celdas de abajo estan vacias lo rellene con el mismo valor, o sea 0. Tengo esta macro que no funciona bien, porque me copia en todas las celdas el valor 0, sobreescribiendo en celdas que tienen otro valor distinto a cero y admás da un error. Sub prueba() Dim Celda As Range Dim Primeradir As String Set Celda = Range("K:K").Find(what:=Range(0).Value, _ After:=Range("K1"), _ Lookat:=xlWhole) If Not Celda Is Nothing Then Primer…
-
0
Reacciones de usuarios
- 9 respuestas
- 1k visitas
- 1 seguidor
-
-
Hola que tal, Tengo el siguiente código que me ayuda a exportar una columna cada 100 filas y guardar lo en una carpeta en formato .txt pero cada vez que exporto al final de la línea 100 se agrega un espacio en blanco, me pueden ayudar a quitarlo y que solo queden las 100 líneas que necesito. Adjunto código: Sub ExportarTXT() Dim mPath$, iniCell$, i&, LR&, Vec, j%, iniTime!, R% iniCell = "$G$2" iniTime = Timer mPath = ThisWorkbook.Path & "\Txt\" With CreateObject("Scripting.FileSystemObject") On Error Resume Next: .GetFolder(mPath).Delete True: On Error GoTo 0 .GetFolder(ThisWorkbook.Path).subFolders.Add "Txt" End With LR = Cells(Rows.Count, R…
-
0
Reacciones de usuarios
- 5 respuestas
- 1k visitas
- 2 seguidores
-
-
Hola, tengo un problema y me gustaría mucho que me puedan ayudar. En el archivo adjunto tenemos una planilla en la Hoja llamada 'OT BANCO BATERIAS', en esa hoja tenemos una ficha que se irá llenando con los campos que existen en la misma. Esos datos que se llenan en esa ficha tienen que guardarse o archivarse en una hoja llamada 'BASE DATOS' tal como está en el archivo adjunto. Ahora bien, en esa base de datos se debe realizar una busqueda de los datos que se han ido llenando anteriormente, esta busqueda se la debe realizar por los campos "Fecha" y ''Subestacion", esto es se debe realizar una pequena ventana que me pida ingresar o seleccionar la Subestacion y fecha desea…
-
0
Reacciones de usuarios
- 0 respuestas
- 1k visitas
-
-
Buenas tardes, Hola amigos del foro, gracias al aporte de tierra_pampa en este foro estoy intentando aplicar el siguiente código con formula a mi archivo, en la hoja llamada BD, la formula la he logrado aplicar acorde a su evaluación pero no consigo que evalúe las celdas restantes hacia abajo para las columnas E, G e I a partir de la celda# 4 de cada columna, adjunto el código: Sub convertir2() 'V11/03/2016 - macro para jose-bn.80149 Hoja1.Activate ufila = Cells(Rows.Count, 1).End(xlUp).Row With Hoja1.Range("E4:E" & ufila) .FormulaR1C1 = "=IF(RC4="""","""",(IF(RC4<=RC14,1,0)))" End With With Hoja1.Range("G4:G" & ufila) .FormulaR1C1 = "=IF(RC6=…
-
0
Reacciones de usuarios
- 1 respuesta
- 1k visitas
-
-
Hola a todos; -Llevo un rato a vueltas con la macro que adjunto y no logro avanzar. Consta de un formulario principal y un formulario diríamos auxiliar. En el principal tengo dos textBox con dos botones que a pulsar abren dicho form secundario. En este secundario hago unas operaciones de suma y resta y por medio de un botón me devuelve a los textbox el resultado, pero a los dos. Lo que quiero conseguir es que el resultado vaya para el textbox con el que haya pulsado el botón. Adjunto macro. Saludos a todos y buen finde. MacroS.xlsm
-
0
Reacciones de usuarios
- 6 respuestas
- 1k visitas
-
-
Buenas noches, Como vereis, entre otros, utilizo dos UserForm: uno, para la entrada de datos (UserForm1); y, el otro, (UserForm2), para modificarlos. El problema me surge en la modificación de registros (utilizando el UserForm2); ya que, cuando el registro a modificar se encuentra duplicado, aunque con fechas distintas (supongamos uno con fecha de 2013 y el otro del 2014), todos sus registros se duplican. En cambio, si el registro es único, se modifica sin problema. Ejemplo: En la Hoja "INICIO", ejecutamos “Modificación de Informes”, en el formulario que se abre, ejecutamos “Modificación de Datos”, y en en el ComboBox “Número de Registro”, desplegamos y elegimos e…
-
0
Reacciones de usuarios
- 3 respuestas
- 1k visitas
-
-
volveré a redactar el mensaje turnos_word[1].rar
-
0
Reacciones de usuarios
- 0 respuestas
- 1k visitas
-
-
Buenos Dias , me podriais pasar una macro la cual su funcion sea borrar datos de otras hojas del mismo libro con cierto datos que me interesan eliminar? Muchas gracias a todos espero que podais echarme un cable.
-
0
Reacciones de usuarios
- 1 respuesta
- 1k visitas
-
-
hola gente, estoy intentando crear un archivo el cual básicamente estaría compuesto por tres hojas : ( hoja de carga; hoja base de datos y la ultima la de una ficha os datos del trabajador. me estaría faltando que los datos de la base se cargaran en la hoja tres (ficha) y que me generara un archivo nuevo el cual yo pueda guardar de forma independiente en el lugar deseado. espero puedan ayudarme, desde ya muchas gracias . BASE DE DATOS OPERARIOS.rar
-
0
Reacciones de usuarios
- 0 respuestas
- 1k visitas
-
-
Tengo un código VBA que abre una web y hace búsquedas y abre la ventana de guardar la web como PDF no tengo idea como hacer que el nombre del archivo a guardar sea el mismo que el usado para búsqueda (uso los datos de la columna A).
-
0
Reacciones de usuarios
- 1 respuesta
- 1k visitas
-
-
Hola, tendo dos dudas, la primera es como puedo hacer para que cuando le doy al boton guardar me deje el textbox1 y textbox2 con los datos que tengan puestos y que me borre combobox1, combobox2 y textbox3 centrando el foco en combobox1, ahora mismo lo tengo como esta porque no consigo mi proposito. Y la segunda duda es como puedo pasar los datos del formulario a la Hoja2 en las posicones que pongo como ejemplo en dicha hoja y de forma ilimitada y quiero decir de forma ilimitada que no se limite a las ocho posiciones que tengo en el ejemplo. Libro1.rar
-
0
Reacciones de usuarios
- 4 respuestas
- 1k visitas
-
Información básica de protección de datos
- Responsable: Sergio Andrés Celemín
- Finalidad: Moderar y responder comentarios de usuarios. Recuerda que la información que facilites es pública, y los datos que incluyas los leerá cualquier visitante de esta web, así como el avatar que poseas.
- Legitimación: Consentimiento del interesado.
- Destinatarios : Hetzner Online GmbH.
- Duración: Mientras se conserve este post o hilo en la comunidad, o decidas eliminar el comentario.
- Derechos: Puedes ejercitar en cualquier momento tus derechos de acceso, rectificación, supresión, oposición y demás derechos legalmente establecidos a través del email sergio@ayudaexcel.com
Información adicional: Encontrarás más información en la política de privacidad.