Ayuda VLOOKUP usado con VBA

Preguntas y respuestas relacionadas

Agregar dos funciones a esta macro

Estoy tratando de agregar a esta macro: Sub Borrar_celdas_Desbloqueadas() ActiveSheet.Protect Password:="1" Dim r As Range For Each r In Selection If r.Locked = False Then r.ClearContents Dim img As Shape On Error Resume Next For Each img In...
1 respuesta

Reemplazar una casilla de verificación con imágenes

¿Existe alguna forma de establecer una imagen determinada a un checkbox con valor true y otro con valor false? Aquí lo que hice es simplemente cambiar la visibilidad si previamente la casilla tiene un valor. Pero hacer clic en cada una no tiene...
1 respuesta

BUSCARV Referencia al address de celda-resultado

Supongamos que usando BUSCARV me da como resultado el valor de una celda de la matriz en la que he realizado la búsqueda ¿Cómo puedo referirme a la dirección (address) de la celda al margen de su valor? Es decir a la celda como objeto.
1 respuesta

Password para informe de Access

Tengo un botón que lanza un informe confidencial, ¿Sabéis si hay algún modo de que antes de lanzar el informe (vista previa) pida un password?
3 respuestas

Controlar temporizador con un solo botón

Tengo un temporizador en una celda de excel. ¿Cómo puedo hacer para iniciarlo y detenerlo con el mismo botón? Es decir, que cuando aprieto el botón e inicio el temporizador, al apretar el mismo botón nuevamente este se detenga.
1 respuesta

Comparar 2 hojas y sacar una tercera

DAN tengo el siguiente caso: En un mismo archivo 3 hojas: Inventario, toma-física, sobrantes-faltante. Debo comparar la columna A de inventario con la columna A de toma-física y colocar lo que este en Inventario que no este en toma-física en la...
2 respuestas

Implementar Progress Bar en macro para generar efecto visual

Sub Buscar() 'Mod.Por.DAM Application.ScreenUpdating = False Set h1 = Sheets("Estados de cuenta") Set h2 = Sheets("Cartera.") ' h1.Range("A18:E6000").ClearContents j = 18 Set r = h2.Columns("G") Set b = r.Find(h1.Range("A6"), LookIn:=xlValues,...
1 respuesta

Macro de mayúsculas, con un problema

Tengo esta macro para todo mayúsculas: Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range(" A12:A41,C12:C41")) Is Nothing Then Target.Value = AMayusculas(Target.Value) End If End Sub Y en un modulo: Public Function...
2 respuestas

Ejecutar macro según el valor de la celda

Que tal necesito de su valiosa ayuda tengo que ejecutar una macro en automático esto depende del valor de la celda. Estoy utilizando la siguiente macro: Private Sub Worksheet_Change(ByVal Target As Excel.Range) If Target.Address = "$S$1" And...
1 respuesta

Validar datos de clave principal

En un formulario de ingreso de datos en Acces 2007 quiero saber como hago para que cuando termine de ingresar el dato en el cuadro o control que me sirve de clave principal genere un aviso en caso de que el dato este repetido y no deba esperar a...
2 respuestas
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas de los temas