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?
8680 temas en este foro
-
Buenas tardes comunidad, me presento, soy Luis, estoy apenas comenzando a adentrarme en el mundo de las macros VBA, y estoy varado con la siguiente situacion: Tengo un formulario en el cual voy a realizar un filtrado de productos para luego de ese filtro resultante, seleccionar un producto y llevarlo a otro formulario (facturacion), estoy usando filtro avanzado, y el criterio de filtro lo tomo de un texbox, y el resultado lo mando a copiar en una hoja de excel, no me esta funcionando me da un error. Aca las lineas de codigo y el error De antemano muchas gracias por la ayuda que puedan aportar. Saludos
-
0
Reacciones de usuarios
- 1 respuesta
- 455 visitas
-
-
Cordial saludo: por favor a quien me pueda colaborar y compartir su conocimiento, le estaré muy agradecido ... Tengo un formulario con un listview, el cual deseo que me calcule la columna " SUBTOTAL ", de acuerdo con los registros filtrados . ya poseo el mismo formulario pero con un listbox y lo deseo implementar y saber el procedimiento para adaptarlo pero con la herramienta de listview. Nota: Anexo los dos formularios para mejor comprensión de lo que requiero. Mil gracias . prueba_filtrarPorFecha_Listviewcalcular1 - copia.xlsm
-
0
Reacciones de usuarios
- 2 respuestas
- 903 visitas
- 1 seguidor
-
-
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.
-
0
Reacciones de usuarios
- 1 respuesta
- 539 visitas
- 1 seguidor
-
-
buen día foro bendiciones alguien de a qui sabe como abrir un archivo que no aparece cuando se abre, no se que le active con las combinaciones de tecla este es como parece gracias de antemano saludos a este equipo
-
0
Reacciones de usuarios
- 9 respuestas
- 496 visitas
- 1 seguidor
-
-
Jelow, Vengo con una duda muy tonta, pero que me está dando quebraderos de cabeza en el código (aunque funciona todo bien, para mi sorpresa...) Tengo una tabla, que borro fila por fila, hasta dejarla vacía y dolo dejo, la cabecera y la última fila sin borrar. El caso es, que en el bucle que hago, al darle vueltas al código, veo que esto quizás me puede dar algún error y he lanzado un debug.print para ir testeando detalles. DUDA: Si la tabla tiene CABECERA + FILA CON DATO + FILA FINAL (es decir, 3 filas)... ¿Porque el debug.print de "Tabla".rows.count me da 4? Entiendo que no puede empezar la cuenta en 0 ni en 1, porque …
-
0
Reacciones de usuarios
- 6 respuestas
- 938 visitas
- 1 seguidor
-
-
Buenas tardes Tengo un listbox donde recojo dos tiempos distintos. Uno es el tiempo estimado y el otro es el tiempo real dichos datos estan en la celda en formato [hh]:mm el problema está cuando cargo en un listbox dichos datos. Si es menor a 24h se muestra sin problemas con cdate Me.ListBox.List(Me.ListBox.ListCount - 1, 19) = CDate(HojaBase.Cells(i, "AA").Offset(0, 0)) 'TIEMPO REAL Me.ListBox.List(Me.ListBox.ListCount - 1, 20) = CDate(HojaBase.Cells(i, "AB").Offset(0, 0)) 'TIEMPO ESTIMADO pero si los valoren superan las 24h no muestra el tiempo y si una fecha (ADJUNTO IMAGEN). Que tengo que hacer para que …
-
0
Reacciones de usuarios
- 5 respuestas
- 809 visitas
-
-
Buenas tardes ¿Cómo se puede evitar el parpadeo de pantalla en cada pulsación dentro de un TextBox? Se trata de filtros (AutoFilter) que aprendí en YouTube. Se trata de una tabla (la mía) con 21 campos y más de 20.700 registros. Private Sub Txt_Obra_Change() Dim obra As String obra = "*" & Sheets("Proveed_Detalle").Txt_Obra.Value & "*" Range("A4").AutoFilter field:=18, Criteria1:=obra End Sub Private Sub Txt_Proveedor_Change() Dim proveed As String proveed = "*" & Sheets("Proveed_Detalle").Txt_Proveedor.Value & "*" Range("A4").AutoFilter field:=17, Criteria1:=proveed End Su…
-
0
Reacciones de usuarios
- 21 respuestas
- 1.9k visitas
- 3 seguidores
-
-
Hola buenas soy nuevo en esto de Excel pero me gustaría que me ayudaran a crear una macro.quiero crear una macro para borrar contenido de celdas cuando llegue a una fecha específica; gracias
-
0
Reacciones de usuarios
- 2 respuestas
- 503 visitas
- 2 seguidores
-
-
Equipo buenas noches, espero esten bien. Soy nuevo en este mundo del vba de excel. En sintesis mi proyecto es crear estados de cuenta para clientes, para ello disene en excel un estado de cuenta, ahora toca salvar en pdf, esa parte esta lista para un solo documento, pero tengo un data validation list con todos mis clientes, la idea es que se cree un loop que vaya nombre por nombre de la lista y me salve un pdf por cada cliente en una ruta previamente definida. les dejo el codigo que tengo hasta el momento para ver si me pueden ayudar: Option Explicit Sub GuardarEstado() Dim nombredearchivo As String Dim NombreHoja As String …
-
0
Reacciones de usuarios
- 2 respuestas
- 410 visitas
-
-
Buenas noches a todos espero se encuentren muy bien La presente es para solicitar amablemente su orientación con lo siguiente: Tego un libro de excel para registrar las horas laboradas en excel, los meses y el nombre del empleado cambian al usar una lista desplegable, sin embargo lo que necesito es ir guardando los datos que se ingresan manualmente en la plantilla y que corresponden a cada empleado y que a medida que cambie de nombre la hoja se ponga en blanco Para mayor comprensión adjunto el archivo Muchas gracias por su gentil colaboración INCENTIVOS LIBRO DE TRABAJO.xlsx
-
0
Reacciones de usuarios
- 1 respuesta
- 564 visitas
-
-
Saludos, quisiera saber si puedo desde una archivo de excel crear una macro que lea un archivo de texto realice la búsqueda por un o dos condiciones y si encuentra el registro me copie el código del cliente en la hoja de Excel, el archivo de texto cambia todos los días llega a pesar mas o menos 10 mb, filas 25702 y columnas 48 Adjunto archivo de texto Archivo.csv
-
0
Reacciones de usuarios
- 1 respuesta
- 836 visitas
-
-
¿Libro bueno para principiantes Macros y VBA con muchos ejemplos?
-
0
Reacciones de usuarios
- 4 respuestas
- 3.3k visitas
- 1 seguidor
-
-
Buenos días, Ante todo, gracias por adelantado y disculpad que no me haya presentado oficialmente en el foro, soy nuevo (jelow: presentación hecha (?)) Mi caso es el siguiente: Tengo dos hojas en un archivo. La primera hoja es una tabla, con imágenes y otros datos La segunda, una fórmula que devuelve una de las imágenes en la tabla, según el dato encontrado en una lista de validación de datos desplegable de una celda designada (hasta aquí, todo bien, funciona y todo) EL PROBLEMA: Cuando, en la primera hoja se hace scroll hacia abajo y vuelves a la segunda hoja, al hacer click en la celda de la lista de validación, Excel mueve la imagen qu…
-
0
Reacciones de usuarios
- 3 respuestas
- 489 visitas
- 1 seguidor
-
-
Hola a todos; -Os comparto un video y una macro donde muestr como insertar imágenes usando la propiedad Caption en nuestras Labels y ComandButton. Pinchar sobre el enlace. Video: Saludos a todos MCaptionImg.xlsm
-
0
Reacciones de usuarios
- 5 respuestas
- 588 visitas
-
-
Hola buenas tardes . Me llamo gustavo soy nuevo en este foro , gracias por aceptarme en este foro espero aprender estos conocimientos de excel . hay os dejo una problema que no puedo solucionar haber si alguien me puede echar una mano , el problema es que quiero copiar de la hoja NOTAS DE ENTREGA a una tabla que hay en la hoja NOTAS , el problema es que e echo una macro que me pega los datos pero en la hoja NOTAS tengo en la columna D y E notas que yo escribo a mano y cuando en los datos que hay en la columna C y D de la hoja NOTAS DE ENTREGA inserto algun dato cuando ejecuto la macro y copia los datos los datos que e copiado a mano en la fila D y E de la hoj…
-
0
Reacciones de usuarios
- 2 respuestas
- 529 visitas
-
-
Buenas, llevo ya un tiempo rompiendome la cabeza con este problema: Antecedentes: Creo una base de datos de las entradas de una factura, en ella hay un dato que es la fehca =hoy() copiada con .value a la columna x. La columna con sus datos tienen formato "fecha corta" . HAsta aqui todo bien. Pongo un textbox para filtrar los clientes, pero cuando quiero añadir un segundo textbox para filtrar el "AÑO" y no la fecha me resulta imposible sacar el codigo. Si lo uso con autofilter a mano me lo hace perfectamente. Saco el importe del cliente en el año 2023 (por ejemplo). Me resulta imposible hacerlo con textbox. Mi primer textbox lo tengo…
-
0
Reacciones de usuarios
- 6 respuestas
- 1.3k visitas
- 1 seguidor
-
-
Primero que todo les doy gracias por la ayda que me han brindado en otros momentos. Ahora requiere desde una tabla que me cree en automatico hojas con la información de la tabla. en el archivo adjunto se puede ver un ejemplo de lo que se requiere. En total son mas de 1000 lineas las que tiene el archivo por eso la necesidad del macro. Casos.xlsm
-
0
Reacciones de usuarios
- 2 respuestas
- 568 visitas
- 1 seguidor
-
-
Sub FORMATO() ' ' TEXTO_COLUMNAS Macro ' Sheets("A-S1-001").Select Range("J2").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlDown)).Select Selection.TextToColumns Destination:=Range("J2"), DataType:=xlFixedWidth, _ FieldInfo:=Array(Array(0, 9), Array(10, 1)), TrailingMinusNumbers:=True Selection.NumberFormat = "h:mm:ss" Range("K2").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlDown)).Select Selection.ClearContents Range("K2").Select Application.CutCopyMode = False ActiveCell.FormulaR1C1 =…
-
0
Reacciones de usuarios
- 1 respuesta
- 718 visitas
-
-
Dim Titulo$ Dim objHttp As Object Set objHttp = CreateObject("MSXML2.ServerXMLHTTP") objHttp.Open "GET", "https://sitioaverificar", False objHttp.Send "" Titulo = objHttp.ResponseText If InStr(1, UCase(Titulo), "<TITLE>") Then Titulo = Mid(Titulo, InStr(1, UCase(Titulo), "<TITLE>") + Len("<TITLE>")) Titulo = Mid(Titulo, 1, InStr(1, UCase(Titulo), "</TITLE>") - 1) Else Titulo = "" End If MsgBox Titulo Hola a todos, Estoy utilizando esta macro para obtener el título de un sitio http para saber si se encuentra ok o no, funciona a la perfección, pero no me resulta para los sitios https Sólo necesito extraer el título de la…
-
0
Reacciones de usuarios
- 7 respuestas
- 564 visitas
- 1 seguidor
-
-
Hello everyone from Maurizio I have a problem that despite its simplicity He's making me crazy. My problem is this:In an excel form: I entered Three Keys With the first key , if it is pressed I would like the Form to close with the function"Height"Conversely if I press the second key it should close using the function "Width"The Third key I simply use the " End " Function Therefore I close everything very quickly. Now my problem would be to get the two closures: " Width " and " Height " much more slowly that 's all ! I guarantee you that I have tried them all but precisely because I would like to keep this formula intact I haven't succeeded…
-
0
Reacciones de usuarios
- 2 respuestas
- 557 visitas
- 2 seguidores
-
-
Tengo un archivo de excel en el cual contiene botones para ocultar y aparecer filas; sin embargo si agrego comentarios a alguna de las celdas me aparece el siguiente error: "Run-Time error '1004': unable to set the hidden property of the ranges class" Este error solo me aparece si le agrego comentarios a alguna de las celdas; si remueve el comentario la macro vuelve a funcionar correctamente; agrego información adicional: El archivo se encuentra protegido ya que contiene fórmulas que no quisiera que el usuario manipulara. (En otros archivos ya lo he hecho de esta manera y el macro funciona) Hice algunas pruebas colocando comentarios en las celdas D12, D2…
-
0
Reacciones de usuarios
- 13 respuestas
- 910 visitas
- 1 seguidor
-
-
Hello everyone from Maurizio My problem is this . I'm trying but failing to want to create some sort of Calendar Slo that my problem with the vba is this: in a userform I inserted a Textbox and Seven Labels, of which 6 are classified as (Cella1,Cella2,Cella3) etc...! And I want them to stay that way. While a label the name has remained unchanged and is called (Label3) Now what I would like to get from vba code, and that every time I start the userform the Labels classified as (Cella1 etc ...! the number "26" is reported which corresponds to the number of the month of December which was (Monday ) and gradually all the other ends to reach (1) of the foll…
-
0
Reacciones de usuarios
- 8 respuestas
- 722 visitas
- 1 seguidor
-
-
Buenos dias. Busco una macro que me ayude a actualizar un programa. Tengo dos archivos necesito que del archivo 1 busque en el archivo 1 un número en especifico. X0001 (este número aparece en la columna D. Buscar dicho número en el archivo 2 y si aparece y el la columna F tiene un numero mayor a 0 copiarlo en el archivo 2 Si el siguiente número X0002 en el archivo 1 tiene el la columna F tiene un 0, pasar al siguiente hasta encontrar el número X que tenga número en la columna F Serian tan amables de ayudarme con esa macro. Archivo 1.xlsx Archivo 2.xlsx
-
0
Reacciones de usuarios
- 2 respuestas
- 387 visitas
-
-
Hola intento guardar el documento en Sharepoint como compartirlo en una carpeta que otras personas puedan ver, pero no sé cómo hacerlo. Es posible hacer un código que guarde mi documento excel en Sharepoint.. osea estar trabajando en este documento y luego de dar click en un botón o antes de cerrar el archivo que este se guarde en Sharepoint o en la nube?.. les agradezco si alguien me puede guiar.
-
0
Reacciones de usuarios
- 3 respuestas
- 3.7k visitas
- 1 seguidor
-
-
Buenas tardes, me ha pasado algo muy raro, ya que sin saber un formulario me ha dejado de funcionar. El formulario se llama Bebida entonces en una macro tengo lo siguiente para abrirlo Sub MacroBebidas() Load Bebida Bebida.Show End Sub Hasta este entonces la macro ha funcionado bien, de hecho, esto funciona para el resto de formularios pero este formulario me ha dejado de funcionar de un momento a otro sin hacer cambios en él, ya que cuando ejecuto la macro me sale: "Error 424. Se requiere un objeto". He mirado varias veces si el nombre está bien escrito, y sí. De hecho, si estoy en el formulario y quiero ejecutarlo (sin usar macro…
-
0
Reacciones de usuarios
- 4 respuestas
- 750 visitas
- 2 seguidores
-
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 [email protected]
Información adicional: Encontrarás más información en la política de privacidad.