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
-
¡Hola! Busco ayuda para guardar un libro en un archivo nuevo, y cuyas hojas solo contengan los valores (nada de fórmulas). Gracias!
-
0
Reacciones de usuarios
- 3 respuestas
- 710 visitas
- 1 seguidor
-
-
Buen día Señores del Foro Estoy utilizando la formula =CONTAR.SI($D:$D;D716)=1, de tal manera a evitar duplicidad de Datos, me funciona cuando quiero ingresar manualmente, pero tengo un CommandButton1 (GRABAR), en la misma hoja, que es para grabar nuevos registros, y la formula no controla en ese caso la duplicidad de Datos, me gustaría se a través de macro o formula que sea controlada la duplicidad.. mismo que se quiera introducir Datos manualmente o a través del Botón Grabar, particularmente los Datos de la columna "D" .. que no deben repetirse.. Adjunto Planilla Evitar Duplicacion.xlsm
-
0
Reacciones de usuarios
- 2 respuestas
- 573 visitas
-
-
Buenas he estado buscando la forma de hacer una consulta WED desde la pagina de SUNAT donde segui los pasos de la pagina de youtube de excelnegocios, bueno mi consulta es q si coloco: Set Nombres = IE.Document.getElementbyId("f5_cspm") Rpta = Nombres.InnerText donde si me sale la respuesta por que tiene un nombre Mi consulta es en la linea: <td width="30%" height="15px" class="bgn">La Boleta de Venta Electrónica B001-12414 ha sido informada a SUNAT</td> Como podria o que funcion podrian sujerirme para tener esa linea como respuesta. Me ayudarian bastante la verdad en darme luces para poder realizarlo. Les adj…
-
0
Reacciones de usuarios
- 0 respuestas
- 949 visitas
-
-
Buenas Tardes, Ante todo agradecer el tiempo y la ayuda que me puedan brindar con una carga de un Archivo TXT (delimitador "|") a una tabla creada en SQL Server. el problema es que cuando cargo el archivo me inserta todos nulos.. agradezco su tiempo. Saludos Cordiales, ImportarTXT_SQL.rar
-
0
Reacciones de usuarios
- 0 respuestas
- 1.8k visitas
-
-
hola expertos buenas tardes mi idea es bordear aquellas celdas que su numero sea igual a su posicion en los cuadros tanto arriba como abajo como lo muestro en la imagen con las celdas rojas Sub resaltar() ' ' Resaltar Macro ' Resalta similitudes https://foro.todoexcel.com/threads/bordear-celdas-de-acuerdo-a-posicion.55559/#post-237370 ' ' Acceso directo: CTRL+q ' Sheets("Hoja2").Select F1 = Asc(Range("A2").Value) f2 = Asc(Range("A3").Value) C1 = Range("B2").Value C2 = Range("B3").Value For J = 0 To 7 ' numero de Columnas Debug.Print "Siguiente Fila " If J Mod 2 = 0 Then Debug.Print "Esta si la hago :" & J For i = 0 To 9 ' numero de filas De…
-
0
Reacciones de usuarios
- 4 respuestas
- 1.2k visitas
- 1 seguidor
-
-
Hola de nuevo. Ya he terminado mi proyecto, con vuestra ayuda. Pero ahora veo que uno de los procesos es muy lento. Cuando le doy a un botón ejecuta esta macro con 7 bucles, uno por semana, que recorre cada vez que lo hace 7.000 filas. Y que cada mes añadirá otras más de 2.000 filas más. Así que cada vez que ejecute la macro se me va a emplear mucho tiempo. Yo creo que con un solo bucle lo puede hacer, porque pienso que debe haber una lógica matemática que lo haga, pero yo no soy capaz de saber cómo. U otra manera que no sea con bucles... Pego el código por si alguien de vosotros podría ayudarme. Ya veis que repito el código cada día de la semana y que los textbox so…
-
0
Reacciones de usuarios
- 12 respuestas
- 2k visitas
- 1 seguidor
-
-
Hola Gente!!! ¿como estan? Estoy en un proyecto y me freno un tema, el el listbox me aparece un dato pero no en forma de hora como esta la planilla. ¿Como puedo cambiar ese tema para que se vea en hh:mm? Desde ya gracias!! If UCase(Description) Like "*" & UCase(Me.TextBox1.Value) & "*" Then Me.LISTA.AddItem Me.LISTA.List(Y, 0) = Sheets("PLANILLA").Cells(File, 2).Value Me.LISTA.List(Y, 1) = Sheets("PLANILLA").Cells(File, 3).Value 'Hora hh:mm Me.LISTA.List(Y, 2) = Sheets("PLANILLA").Cells(File, 4).Value Me.LISTA.List(Y, 3) = Sheets("PLANILLA").Cells(File, 5).Value Me.LISTA.List(Y, 4) = Sheets("PLANILLA").Cells…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.1k visitas
-
-
Hello everyone my name is Maurizio and my problem is this again: On an Excel sheet In Cell (B13) I send the data directly from the web page, which in turn I would like to be able to take only its first data as I specified in the project. And you should transfer them to the Cells (L2:L3). Is all this possible? Thanks for all the help you want to give me about it. Greetings from A: Maurizio Meteo_Con_Form.xlsm
-
0
Reacciones de usuarios
- 0 respuestas
- 700 visitas
- 1 seguidor
-
-
Buenos días, Tengo un libro donde voy registrando datos en una tabla, y quiero que cada vez que haya cambios en la tabla se realice una acción, pero solamente cuando se haya completado el registro completo del registro. En la hoja adjunta, detecto cuando hay un cambio en un rango ,pero claro, cualquier cambio. y me gustaria poder detectar cuando se hace un cambio en la fila completa de la tabla. Adjunto tambien el fichero... Gracias Registro trabajo.xlsm
-
0
Reacciones de usuarios
- 0 respuestas
- 578 visitas
-
-
Hola de nuevo. Sigo peleándome con mi proyecto. Lo cierto es que ya lo tengo prácticamente terminado, pero necesito acabar esto que me está volviendo a dar quebraderos de cabeza. He buscado en la red y este problema se plantea bastantes veces y he adaptado de una manera muy básica un código para un Textbox. Veréis en la captura que el formulario tiene muchos Textbox. La idea es la siguiente, en los Textbox H.Entrada, H.Salida y Tiempo NO efectivo, recojo los datos de una tabla Excel. Quedaría así una vez busco un empleado y una fecha. Lo que pretendo es poder modificarlos. o bien borrando el dato (dejándolo en blanco) o modificando la hora. Para …
-
0
Reacciones de usuarios
- 18 respuestas
- 4.6k visitas
- 1 seguidor
-
-
Qué tal, estoy teniendo problemas nuevamente queriendo copiar la misma hoja de diferentes archivos almacenados en una carpeta, lo que hace la macro es encontrar la última fila disponible para pegar la info del archivo 2, y así sucesivamente pero me aparece el error "1004" de que la hoja en la que quiero pegar el archivo no tiene el mismo número de celdas. Mi objetivo es hacer un archivo Master con la información de la primera hoja de todos los archivos dentro de la carpeta. Este es mi código: Sub MasterSTS() Dim Carpeta As String Dim Examinar As Object '-- Application.ScreenUpdating = False Application.DisplayAlerts = False Set Examinar = Application.FileDia…
-
0
Reacciones de usuarios
- 5 respuestas
- 968 visitas
-
-
Buenas noche, el proyecto que estoy realizando y me tiene desconcertado ya que he leído, probado y vuelta a leer, y no lo consigo es que al filtrar desde el comboBox este me llene los datos filtrados al listBox,tambien comentar que el formulario no se encuentra en la hoja activa, agradeceria la ayuda, adjunto archivo Nuevo Hoja de cálculo de Microsoft Excel.xlsm
-
0
Reacciones de usuarios
- 2 respuestas
- 1.2k visitas
-
-
Ciao a tutti mi chiamo Maurizio e il mio nuovo problema è questo: su un foglio excel sto cercando di estrarre dati da una pagina web; Sulle previsioni del tempo. Per esercitarsi. Diciamo di essere un principiante con questo tipo di approccio tabulare; Sono un disastro, ma nemmeno molto. Ora il problema è questo: sono stato in grado di estrarre tutti i dati di cui avrei bisogno per fare un buon lavoro; Il problema è che tali oggetti dovrebbero essere estratti da un elenco e collocati altrove in celle separate. Allora posso pensare di metterli anche nel posto giusto. Hai una vaga idea di come posso risolvere questo problema? (P.S) Io da solo avevo provato ad u…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.1k visitas
- 1 seguidor
-
-
Hola de nuevo. Llevo varias horas con esto y no consigo trabajar bien con las horas en VBA. Ahora mismo el problema que tengo es que con este código no me suma los Textbox vacíos. Necesito que los sume como "cero". Porque a veces no hay hora de entrada, o tampoco final, simplemente porque ha estado de vacaciones. O por ejemplo no ha habido tiempo para comer porque se ha hecho la jornada continua. ¿Podéis ayudarme? Me da lo mismo que lo de en horas (hh:mm) que en decimal, pero que me de el resultado., que no sea un número entero. TextBoxT1 es el resultado, TextBoxS1 es la hora Final, TextBoxE1 es hora Inicio, TextBoxN1 es el tiempo para comer. Es decir que a…
-
0
Reacciones de usuarios
- 4 respuestas
- 1.5k visitas
- 1 seguidor
-
-
Estimados, Esperando que se encuentren bien, recurro a ustedes para que me ayuden a dar solución a una duda que tengo. He creado una VBA para generar una fórmula en Excel tomando como criterio el contenido de otra. Si tiene "X" cantidad de filas esta se rellene en otra celda con la fórmula propuesta. Ahora, ¿Cómo puedo hacer para que después de aplicada la formula esta pase a valores? Adjunto el VBA que use: Range("Z2").Formula = "=VLOOKUP(Y2,AO:AP,2,0)" Range("Z2", "Z" & Range("AC2").End(xlDown).Row) = Range("Z2").Formula Quedo atento a sus comentarios. Ss.
-
0
Reacciones de usuarios
- 2 respuestas
- 1.1k visitas
-
-
Hola amigos de AE Una consulta. Tengo un archivo para que se guarde automáticamente antes de cerrar con un mensaje que avisa al usuario que se ha guaedado con éxito, sin embargo, desde de darle ok al mensaje pregunta aparece el cuadrito que pregunta si deseo guardar, no guardar o cancelar. Private Sub Workbook_BeforeClose(Cancel As Boolean) ThisWorkbook.Save MsgBox "ARCHIVO HA SIDO GUARDADO CON ÉXITO" End Sub El archivo es muy grande y no lo puedo adjuntar. Será algún comando en alguna macro del archivo que pregunta si desea guardar?? Muchas Gracias!!!
-
0
Reacciones de usuarios
- 8 respuestas
- 1.2k visitas
-
-
Buenas tardes, esperando se encuentren bien ante esta situación tan penosa, el motivo por el cual escribo es que estoy haciendo una especie de sistema en Excel para controlar un pequeño almacén, los códigos los tomé recopilando e investigando códigos de varias páginas, porque en realidad no sé mucho de macros, solamente trato de entenderlas y acoplarlas a mi necesidad. El punto es que todos los formularios funcionan bien hasta ahora, pero me vino una duda con los formularios "frm_Guia" y "frm_Factura" específicamente con las Cantidades y Montos, por ejemplo en el formulario "frm_Factura" cuando asocio una guía, modifico los montos y hasta ahí todo normal, el problema…
-
0
Reacciones de usuarios
- 2 respuestas
- 1.1k visitas
-
-
Buenos días y semana a todos. He intentado eliminar una columna a través de una macro y si su rango es fijo lo se hacer. Ahora bien si su rango es variable pues la cosa se me complica. Creo que para este caso (corregirme si me equivoco) la mejor opción sería localizar el titulo de la columna y después eliminar. He visto que algo con la función "Find" pero no he conseguido configurar nada, por eso recurro a vosotros por si me podéis ayudar. Adjunto macro. Saludos MEliminarColumnas.xlsm
-
0
Reacciones de usuarios
- 2 respuestas
- 994 visitas
-
-
Buenos días amigos de la comunidad, Tengo un fichero que extraigo todos los meses de nuestra plataforma de fichajes y es formato csv. Yo lo convierto a xlsb y genero una tabla para poder explotar los datos. Mi problema como podeis observar es que el campo duración me lo saca en texto 9h 32m, me gustaría poder convertirlos a formato hora para que me aparezca 09:30. Subo el fichero Alguien me puede ayudar? Gracias anticipadas. Histórico01-01-202131-01-2021 2.csv
-
0
Reacciones de usuarios
- 2 respuestas
- 698 visitas
-
-
Buenas tengo creado un mapa coroplético y me gustaría refactorizar el código mediante el uso de clases. La idea es que al abrir el libro se ejecute un constructor y almacene todos los objetos provincia en una colección. Pongo una captura de lo que he hecho hasta ahora: https://i.postimg.cc/90MJvP2W/imagen-2021-03-20-200920.png Ya he creado la estructura de cada una de las clases (cProvincia y cProvincias) pero mi duda es: 1. ¿Sería posible declarar a modo global una colección que dure el tiempo de vida del libro? ¿Es posible declarar una colección de tipo static como variable global? Lo he intentado y marca error. Más que nada lo digo, porque si cambio…
-
0
Reacciones de usuarios
- 6 respuestas
- 1.4k visitas
-
-
Buenos días; A ver si me podéis ayudar. Tengo una consulta SQL en Excel que me cuenta las fechas por número de semana, todo funcionaba bien hasta este año. Buscando por internet he encontrado la solución ( [vbMonday],[vbFirstFourDays] ) pero no me funciona, no sé qué pongo mal. Esta era la consulta que funcionaba hasta este año ( ahora en la semana 8 me cuenta lo de la 7 ). Query = "Select count (Columna1) from [Hoja1] where Columna1 In" & Datos & "And DatePart('ww',Columna2)=" & SemanaActual & "And DatePart('yyyy', Columna2)=" & AñoActual & "And (Not tipo_Columna3='No' or Columna3 is null)" Esta es con la solución qu…
-
0
Reacciones de usuarios
- 4 respuestas
- 1.6k visitas
-
-
Hola buenas. Tengo este código y quisiera simplificarlo, con un bucle que me cargase lo mismo en los Combobox2 a Combobox8. No encuentro como hacerlo o no se como hacer la pregunta para encontrarlo, porque no lo encuentro. ¿me podéis ayudar? No es urgente, es simplemente que así son demasiadas líneas de código. Gracias. For Each celda2 In rango2 ComboBox2.AddItem celda2.Value ComboBox3.AddItem celda2.Value ComboBox4.AddItem celda2.Value ComboBox5.AddItem celda2.Value ComboBox6.AddItem celda2.Value ComboBox7.AddItem celda2.Value ComboBox8.AddItem celda2.Value Next celda2
-
0
Reacciones de usuarios
- 6 respuestas
- 1k visitas
- 1 seguidor
-
-
Buenas tardes Tengo un formulario ya completo con un botón que guarda la información en diferentes hojas del libro de excel. Mi interés está en que al agregar la información a las filas de las hojas de excel, no puedan editarse. Dado que habrá varias personas utilizando el archivo, se quiere evitar el que se eliminen datos por algún descuido. Ya he intentando con los comandos de protect y locked y no logro resolverlo. Agradezco de antemano su apoyo y asesoría y tiempo. Daniela Plantilla LV 4.3.xlsm
-
0
Reacciones de usuarios
- 1 respuesta
- 1k visitas
-
-
Hola amigos AE. Una consulta. ¿Existe un comando de proteger la hoja previa o anterior? No me sirve colocarle nombre de la hoja pues la dinámica del proyecto cambia el nombre. Gracias!!!
-
0
Reacciones de usuarios
- 3 respuestas
- 792 visitas
-
-
Buenas, Tengo un archivo en el cual debo hacer gráficos, según cada valor único de la columna CLASE, en el excel que adjunto están 4 clases, estas se dividen en ESTACION, y esta en EPOCA, AÑO y FUENTE. Quisiera saber si hay una forma de generar estos gráficos automáticamente, son 32 clases en el archivo principal. Asimismo en el adjunto muestro el ejemplo de una sola CLASE. Muchas gracias Ejemplo.xlsx
-
0
Reacciones de usuarios
- 2 respuestas
- 662 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 [email protected]
Información adicional: Encontrarás más información en la política de privacidad.