¿Creación de macro con if que pueda dar clic en una celda y me de el valor en otra?
Soy nuevo en la creación de macros con VBA y estoy creando una macro donde yo pueda dar clic en una celda y me de el valor en otra que yo tengo previamente escogida. Pero me sale error de compilacion bloque if sin end if. Agradezco mucho a quien me pueda colaborar gracias
Private Sub worksheet_selectionchange(ByVal target As Range) Dim fullname As String If fullname = Range("b5").Value Then Range("b5").Offset(3, 5).Value = UCase(fullname) Else If fullname = Range("b5").Value Then Range("b8").Offset(3, 5).Value = UCase(fullname) Else If fullname = Range("b5").Value Then Range("d5").Offset(3, 5).Value = UCase(fullname) Else If fullname = Range("b5").Value Then Range("d8").Offset(3, 5).Value = UCase(fullname) Else MsgBox " PULSE LAS TECLAS A B C o D " End If End Sub
1 respuesta
Respuesta de Dante Amor
2