macro que funciona al pegar un texto concreto en una celda pero que no funciona si se pegan 3 celdas
Publicado por celia (437 intervenciones) el 15/09/2019 12:31:03
Hola de nuevo.
Nuevo día nuevo problema !!
Si escribo o pego la palabra "BAJO" en A1 la macro lee la celda B1 bien, pero si pego 3 celdas a la vez en lugar de una sola ya no funciona la macro.
Adjunto hoja con breve ejemplo del problema
Gracias por la ayuda
Nuevo día nuevo problema !!
Si escribo o pego la palabra "BAJO" en A1 la macro lee la celda B1 bien, pero si pego 3 celdas a la vez en lugar de una sola ya no funciona la macro.
Adjunto hoja con breve ejemplo del problema
Gracias por la ayuda
1
2
3
4
5
6
7
8
9
Private Sub worksheet_change(ByVal Target As Excel.Range)
'
If (Target.Address = "$A$1") And ([A1] = "BAJO") Then
Application.Speech.SpeakCellOnEnter = True
Range("B1").Speak
Application.Speech.SpeakCellOnEnter = False
End If
'
End Sub
Valora esta pregunta


0