Macro que se ejecuta si solo hay información en algunas celdas | Excel | Visual Basic
Вставка
- Опубліковано 5 лют 2025
- Hola amigos de UA-cam, en esta ocasión les traigo una macro muy útil para que no se ejecute otra macro si falta alguna información en un rango de celdas especificadas.
Suscribete aquí!!!: goo.gl/r2jdTU
Blog Ramón Gracesqui: ramongracesqui....
MUCHAS GRACIAS, ME SIRVIÓ MUCHO
Muchas gracias. Era lo que necesitaba
Me acabas de salvar de un gran problema, muchas gracias, y ya tienes un suscriptor mas. Grande!!!
Distinguido Profesor, como todos sus instructivos, sencillos, prácticos y muy útiles!
Muchas gracias por el código de VBA, me sirvió para automatizar un filtro avanzado con macros y activarlos solo si tiene valores.
Bendiciones 🙏🏻✨
Muchas gracias, justo lo que estaba necesitando
¡Perfecto! Funciona muy bien. Muchas gracias por compartir.
si pudiera darle 100 veces me gusta, por supuesto lo haría. gracias bro. Master
Eres genial amigo!!! me estas ayudando mucho con mi trabajo jajaja, he aprendido demasiado, mil gracias por tu contenido
Muchas gracias... me sirvió de maravilla, sigue así estimado Ramón, nuevo suscriptor
Gracias! Muy útil, me sacó de apuros. Pulgar arriba.
Muchísimas gracias nos salvaste la vida ❤
Muchas gracias, se puede hacer lo mismo pero con celdas relativas?
Excelente video
Excelente explicación y con un código no complicado. Gracias...
GRACIAS RAMON!!!! Eres un crack!!!! Saludos desde mexico!!
Hola Ramón, muchas gracias por tu video! Me fué muy útil....
Me di cuenta de que tu macro registra solo los productos que aparecen en la sección correspondiente, sin importar si es solo uno o más... Podrías explicarnos cómo haces para que registre solos los productos que registras?....
Muchas gracias, saludos!
Pudiste revisar esto?
Gracias por todo Ramón !! Eres un genio
Excelente como siempre Ramón. gran trabajo
+JavierII Gonzalez. Muchas gracias por apoyarme. Saludos
Excelente Ramón: Gracias por tu aporte. No olvides el tutorial de como modificar registro en visual basic
Hola Ramón, como es que haces que copie el numero exacto de productos y luego se pegue abajo de los que ya existe en tus base de datos?. Por favor me.seria de gran ayuda qie me contestaras esa pregunta.
¡Muchísimas Gracias!
gracias Ramon por comparttir tus conocimientos
Te ganaste un suscriptor.
Gracias.
Excelente trabajo Ramón. Muchas gracias.
+José Ibáñez. Muchas gracias por el apoyo. Saludos
Ramon muchas gracias, oye por favor que programa usas para grabar o crear esos tutoriales? Gracias
Ramón cordial saludo excelente video una pregunta cómo se hace para aplicar esa macro con más celdas
Gracias amigo, me ha sido de GRAN ayuda!
Ramón eres un grand Dio te bendiga
Gracias muy buen aporte y muy bien explicado,peo para que también lo diga con un combobox?
Hola, excelente, Muchas Gracias.
Buenos días desde Colombia, de antemano muchas gracias por compartir tus conocimientos.
Mi pregunta es ¿Como se lee la macro?, ya que no veo cuando valida si la celda no esta vacía ejecute los otros procedimientos.
Muy bueno, tengo una duda, la única condicionante es en Range("C6") es decir que si hay información ahí que se ejecute y si no, no corre, pero si fuera a la inversa, es decir, si hay información ahí pero no en las otras celdas igual correría... si quieres poner determinante en varias sería como Range("C6"),("otra celda"), ..., ...,?
Muy interesante, quisiera saber si se puede hacer lo mismo pero que se ejecute la macro si no hay información en un rango de celdas? Desde ya muchas gracias por tu ayuda.
Hola +INFINITOS . Si, como podrás ver en los códigos que les facilite en esta linea For Each D In Range("D2:D7") puedes notar que entre las comillas esta D2:D7 que es el rango de celdas que esta en la columna D desde la fila 2 hasta la 7 en el video solo lo hice en una celda, pero como dije puedes poner un rango diferente. Saludos
una pregunta como seria la macro si... C14 (articulo) esta con datos, pero la E14 (cantidad) esta vacia como haria para que no se ejecute la macro.. por favor ayudame
Hola, excelente información, tengo una pregunta referente a tu archivo, tu macro registra solo los productos que aparecen en la sección correspondiente, sin importar la cantidad de filas, me podrias explicar para registrar solo esos productos en mi archivo toma lineas en blanco y es muy complejo organizar la información.. mil gracias!.
Tambien tengo la misma pregunta, alguien Sabe?
Buen Día. quiero preguntarte como haces para modificar esta macro para que al igual como muestras en el ejemplo si tengo una lista de datos que quiero guardar en el registro solo me guarda las celdas que tienen valor y las que están en blanco no las tome.
Mil gracias.
Hola amigo, busco un formato como la de "orden de compra" que tienes ahí, para escribir y guardar y que éste se pase directamente a un registro de ventas donde se reducirá de un inventario, tienes algún vídeo de como hacerle?
Que chido tu vidio! GRACIAS
gracias por compartir tus conocimientos, mi pregunta es la siguiente en una hoja tengo varios formularios al ejecutar la macro se imprimen todos los formularios, como se hace para que se impriman solo los formularios cuando se escriba en la celda adyacente a otra.
Muy buena metodología; Ramón si quisiera que el macro se ejecute dependiendo del valor de una celda que rellena por una formula osea que el usuario no ingresa datos directamente, cual seria la forma?
hola Ramon, que buen contenido, gracias por su ayuda, saludos desde Colombia. Tengo una duda...¿es posible determinar el "existe" en la celda deseleccionada y no en una columna o rango especifico? ..le agradezco si me puede ayudar llevo tiempo buscando sobre ese tema y no lo encuentro..mil gracias!!
Muy buen video... una pregunta... en tus videos los cuales he visto muchos me he percatado que en la codificacion de las macros no declaras las variables. ¿Porque?
hola Ramón, no se si contestarás este mensaje, cuando pego y lo modifico, al momento de ejecutar la macro me tira un error de compilación " se esperaba function o variable" no sé cómo resolverlo :(
consulta, tengo varias celdas que se deben registrar si o si, como fecha, nombre de vendedor y otros, como lo codigo en vba.
Me gustó el vídeo, pero no sé si puedo tener un cod vba que no posibilita mover una celda de una referencia de celdas determinada para otra celda
Muchas gracias
Hola, como puedo proteger la hoja donde se guardan los datos para que no puedan modificar esa información. al momento que se protege la hoja de datos la macro no se puede ejecutar. agradecería tu ayuda
muy buena Solucion
Hola Ramon, necesito ayuda en un tarea, tengo un cuadro con datos de PLACAS, VELOCIDAD Y TIPO (calle, avenida, carretera). Me pide que llene otro cuadrito de doble entrada. Se debe poner la placa de tipo calle del auto que presento más velocidad (es decir, aquellos de tipo calle, cual fue la max velocidad, y del auto que fue de max velocidad en tipo calle cual es su placa). He intentado toda la semana y no me sale. HELP PLEASE!!
hola sera posible que expliques este codigo pero que cumpla con el criterio de validar la irformacion de una tabla y que despues de esto pase a otra hoja en un mismo libro de excel
Muchas gracias!
Amigo tengo una consulta, si quiero repetir esta macro para varias celdas, debo cambiar tambien el "existe" o solo el rango y la letra de la columna donde esta el dato?
Hola, solo cambiar el rango y la letra de la columna. Saludos
Muchas Gracias Ramon!!!
buenas tardes me gusto mucho el video, pero tengo un detalle yo trabajo con ordenes de produccion al dia y tengo celda activa desde la A11: E60 y no toda se utiliza y mi pregunta es la siguiente como puedo decir a la macro que me ejecute por cada linea es decir supongamos que tengo una orden desde la A11: E16 con informacion sin celda vacia con ese rango si le aplico tu formula la Voy a tener activa A11:E60 pero mi rango permitido va a ser de A11: E16 eso quiere decir que no me va a ejecutar la macro porque tengo la A17:E60 vacia que metodo podria aplicar para el caso comentado
Hola, tengo una lista de precios actualizado con el tipo de cambio al momento en monedas de varios países, sin embargo solo me faltaron 2 países, busque un aproximado y lo fije, ya tengo todo armado, cambio en una celda el país que necesito y se cambian los precios, solo quiero que al momento de poner un país, Venezuela, que se lance un mensaje para poder advertir que la moneda no esta actualizada para que consulten el tipo de cambio actual
Amigo me pueden ayudar con un botón de macro para borrar contenido de las celdas.
Sucede que la celda a estar vacía, si doy clic en el botón se ejecuta la macro y me da los mensajes de MsgBox que configure.
No quiero que se ejecute la macro si hay celdas vacías.
Este es el código de la macro de ejemplo.
Sub borrar()
'
' borrar Macro
'
'
Dim mensaje As String
mensaje = MsgBox("¿Desea borrar el contenido?", vbYesNo, "Borrar")
If mensaje = vbYes Then
Range("A1:B1").Select
Selection.ClearContents
Range("C1").Select
mensaje = MsgBox("Datos borrados correctamente", vbInformation, "Borrar")
Else
mensaje = MsgBox("Operación Cancelada", vbInformation, "Cancelado")
End If
End Sub
gracias maestro voy a probarla para un problema que tengo con unos datos en celdas vacias funciona pero cuando no hay datos sale ERROR
}HOLA COMO ESTAS RAMON?
PODRÍAS HACER UN TUTORIAL DE COMO HICISTE ESE ARCHIVO MUCHAS GRACIAS.
Buenas tardes, al yo crear una macro para guardar la información en una hoja de registro como puedo hacer para que si le doy clip nuevamente no se guarde la misma información de nuevo
como se puede hacer una macro funcione solamente si hay u texto en especifico escrito, por ejemplo tengo dos macros una solo funcione cuando en la casilla A1 esta escrito Claudio y la segunda cuando en la casilla A1 este escrito David.
Amigo tengo un gran problema...en mi base de datos que hize necesito condicionar que...''si en las a5:k5 no hay nada copiar lo que hay en A1:k4.....o hacer una macro que solo guarde la informacion que contenga o la informacion que escriba en la tabla. Ya sean 10 celdas y yo escriba 5 celdas sin que se me añadan celdas bacias demas..porfavor ayuda
excelente, gracias...
hola amigo como estas prodrias hacer un video de como hicistes el video
y si tengo un valor que es 0 ? la macros como se ejecutaria? por que lo interpretaria como vacio...
hola me podrias decir el codigo de guardar por favor asi tan cual lo tienes muchas gracias!!!!
Hola.
Desgara el archivo de excel en el mi blog, busca el archivo #16
en este link. ramongracesqui.blogspot.com/p/descargas.html
Saludos
@@RamonGracesqui Hola muchas gracias por el aporte. Pero no me funciona ya le hice los cambios que necesito pero me sale error 9 subindice fuera de intervalo ya revise el nombre de las hojas y los copie tal cual los tengo pero me sigue saliendo ese error espero me puedas ayudar y muchas gracias.
listo maestro mil gracias me funciono solo que si Existe es verdadero todo mi codigo esta adentro de el y fuera de eso le tuve que cambiar = por y listo veamos el codigo
Sub celdablancorecorrido()
Existe = False
For Each GW In Range("GW1:GW10")
If GW.Value "" Then
Celdas = Celdas & " " & GW.Address(False, False)
Existe = True
End If
Next
If Existe Then
Dim FilasGW1 As Integer
Dim RecorridoGW1 As Integer
Sheets("GEnigmaCeldaBlanco").Select 'hoja de trabajo
FilasGW1 = 1 'Siempre se empieza desde la fila2 porque la fila 1 son titulos
RecorridoGW1 = Cells(FilasGW1, 205) 'RecorridoGW1 es igual a adueñarme de todo un recorrido _
en ese numero de columna mientras alla datos GW = 205
Do While Cells(FilasGW1, 205) = "" 'que haga su recorrido mientras hallan datos, Rango Variable
If Cells(FilasGW1, 205).Value = "" Then
'quitar datos y colocarlos en orden sin celdas vacias en la columna que se elija
Range("GW1:GW10").Select
Selection.SpecialCells(xlCellTypeConstants, 23).Select 'ese 23 tiene que ir hay yo creia que eran filas y no lo es
Selection.Copy
Range("HA2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False 'descargo papelera
Range("HA1").Select 'celda de referencia Descanso
Else
Range("HA1").Value = Range("HA1").Value
End If 'termino mi condicion If
FilasGW1 = FilasGW1 + 1 'Que No Haga Nada
Loop 'termino mi Do While
Dim FilasGW2 As Integer
Dim RecorridoGW2 As Integer
Sheets("GEnigmaCeldaBlanco").Select 'hoja de trabajo
FilasGW2 = 1 'Siempre se empieza desde la fila2 porque la fila 1 son titulos
RecorridoGW2 = Cells(FilasGW2, 205) 'RecorridoGW2 es igual a adueñarme de todo un recorrido _
en ese numero de columna mientras alla datos GW = 205
Do While Cells(FilasGW2, 205) "" 'que haga su recorrido mientras hallan datos, Rango Variable
If Cells(FilasGW2, 205).Value "" Then
'quitar datos y colocarlos en orden sin celdas vacias en la columna que se elija
Range("GW1:GW10").Select
Selection.SpecialCells(xlCellTypeConstants, 23).Select 'ese 23 tiene que ir hay yo creia que eran filas y no lo es
Selection.Copy
Range("HA2").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False 'descargo papelera
Range("HA1").Select 'celda de referencia Descanso
Else
Range("HA1").Value = Range("HA1").Value
End If 'termino mi condicion If
FilasGW2 = FilasGW2 + 1 'Que No Haga Nada
Loop 'termino mi Do While
Exit Sub
End If
End Sub
Hola Ramón, me da un error "no se han definido las variables"
y como indicar a VBA en que celda pegarla y hoja de excel ...ESE ES MI PROBLEMA
Hola buenas. Tengo un problema. Quiero crear una macro, esta macro consiste en un boton de guardar que cuando introduzco los campos que yo señalo (nombre, apellidos están en hoja1) (estan en hoja 2 en una celda que contiene una formula) cuando ejecuto la macro y le doy a guardar, se copian todos los datos donde yo le digo y cuando pincho en guardar, se borran todos datos excepto el de la fornula que sigue el numero. Alguien me podria decir como hacer para que se borre todo? Solo me da fallos en la formula
Y bueno si me pueden ayudar en otra cosa, necesito saber a traves dd una formula que me diga exactamente las casillas que se deberian de haber rellenado. Y me muestre el numero de casillas que no se han rellenado. Por mas que doy vueltas a una posible formula no consigo hacerla. Alguien me podria ayudar? Gracias de antemano.
exelente codigo
Buen dia Profe me da un error me podrías ayudar por favor, "error de copilacion" y me marca la palabra "existe =" saludos.
Hola, Nada sobre este error ?
no me funciona
A MI NO ME FUNCIONO