-
Posts
-
-
By Gerson Pineda · Posted
Hola @Dani2020 Lo que pasa que estas confundiendo las variables, y eso hace que falle Prueba esto, a ver como te va Sub Modificar() Set H1 = Sheets("CERTIFICACION") Set H2 = Sheets("BD") Set BD = H2.Columns("A").Find(H1.[C4], lookat:=xlWhole) If H1.[C4] <> "" Then If Not BD Is Nothing Then Application.ScreenUpdating = False fi = BD.Row H2.Cells(fi, "B") = H1.[C6] H2.Cells(fi, "C") = H1.[C8] H2.Cells(fi, "D") = H1.[C10] H2.Cells(fi, "E") = H1.[C12] H1.Range("C4,C8,C10,C12").ClearContents Application.ScreenUpdating = True Else VBA.MsgBox "Nombre no encontrado", vbCritical, "AyudaExcel" End If End If Set H1 = Nothing Set H2 = Nothing Set BD = Nothing End Sub Supongo que mi código es similar al @tierra_pampa Saludos a ambos! -
By Héctor Miguel · Posted
si solo habrá 50 nombres, no tiene sentido poner reglas de validación por lista a TODA una columna, si al final de cuentas SOLO podrás seleccionar un nombre (de 50) -?- en vía de mientras, analiza este artículo: - Hide Used Items in Drop Down List al final de la página puedes descargar un libro con los ejemplos (el #1) -
By tierra_pampa · Posted
Hola @Dani2020 Por favor, prueba si lo que entendí es lo que necesitas. Suerte! ae20200929_post44048_Modificar 2020.xlsm -
By tierra_pampa · Posted
Perdón, elegí un post equivocado al responder!
-
-
Recently Browsing
No registered users viewing this page.
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now