al borrar, copiar o pegar varias celdas a la vez salta una macro que no debería saltar
Publicado por celia (437 intervenciones) el 18/09/2019 09:47:31
Este código lee en voz alta las celdas C1, C2 o C3 si en A1, A2 o A3 se ecribe la letra A, B o C, respectivamente.
Pero al borrar, copiar o pegar varias celdas a la vez te lee la celda C2 sin motivo aparente.
Adjunto la hoja por si alguien sabe porqué ocurre esto.
Muchas gracias
Pero al borrar, copiar o pegar varias celdas a la vez te lee la celda C2 sin motivo aparente.
Adjunto la hoja por si alguien sabe porqué ocurre esto.
Muchas gracias
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
Private Sub worksheet_change(ByVal Target As Excel.Range)
On Error Resume Next
If (Target.Address = "$A$1") And ([A1] = "A") Then
Application.Speech.SpeakCellOnEnter = True
Range("C1").Speak
Application.Speech.SpeakCellOnEnter = False
ElseIf (Target.Address = "$A$2") And (UCase(Left(Target, 1)) = "B") Then
Application.Speech.SpeakCellOnEnter = True
Range("C2").Speak
Application.Speech.SpeakCellOnEnter = False
ElseIf (Target.Address = "$A$3") And (UCase(Left(Target, 1)) = "C") Then
Application.Speech.SpeakCellOnEnter = True
Range("C3").Speak
Application.Speech.SpeakCellOnEnter = False
End If
End Sub
- Libro1.zip(13,3 KB)
Valora esta pregunta
0
