Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
A better way to browse. Learn more.
A full-screen app on your home screen with push notifications, badges and more.
Este tema está ahora archivado y está cerrado a más respuestas.
Buen dia!
Por favor solicito urgente ayuda en varias macros que tengo para una misma hoja.
la primera que presento se refiere a una macro de busqueda en multiples hojas es vital para la actividad que realizo. El detalle es este:
Option Explicit
Private Sub Worksheet_Activate()
End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect([Codigo], Target) Is Nothing Then Exit Sub
If Not [bAuto] Then Exit Sub
Buscar
End Sub
La segunda que quiero incorporar es una que me asocie una base de datos a selecionar la celda. Cuando la aplico sola responde perfecto pero al intertar incorporarla me da un error . este es su codigo
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
On Error GoTo Salida
If Target.Column = 4 Then
foto = Target.Value
ActiveSheet.Image1.Picture = LoadPicture("F:\foto para los carnet\" & foto & ".jpg")
End If
Exit Sub
Salida:
End Sub
Por favor! como hago para que estas macros funciones en la misma hoja ayudaaaaaaaa
saludos!!!
Victor
vperez21@gmail.com