03/10/2009, 07:53
|
 | | | Fecha de Ingreso: marzo-2007 Ubicación: Bs.As.
Mensajes: 1.103
Antigüedad: 17 años, 10 meses Puntos: 88 | |
| Problema con macro....
Hola! Fernando. En la ayuda de VBA puedes leer:
"... El evento Change ocurre cuando alguna celda de la hoja de cálculo es modificada por el usuario o por un vínculo externo. Este evento no ocurre si las celdas se modifican al volver a calcular ..."
De modo que en "target" no tienes a [B22] sino a la celda a la que le has entrado el dato: ¿Qué celda es ésa?
Por otra parte, la línea:
If target.Address = Range("b22") Then
JAMÁS te funcioná correctamente... y no sólo porque target no es [B22], sino porque lo correcto hubiese sido:
If Target.Address = "$B$22" Then
Comenta cual es la celda que se modifica y -además- evalúa esta alternativa:
Código PHP: Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$B$22" Then Exit Sub
For Each Celda In Range([b22], [b65536].End(xlUp))
arch = [b7] & Celda & ".swf"
Abrir = Shell([b6] & " " & arch, vbMaximizedFocus)
Next Celda
End Sub
Saludos, Cacho.  |