Con mucha pena tengo que decirles que conozco muy poco de macros y es por ello que respuosamente les formulo esta pregunta.
Siempre que copio una macho y al ejecutarla me sale el siguiene mensaje:" Error de Compilacion se esperava un End Sub" y me rasalda el Nombre de la Macro.
Mis sistema Operativo es Windows 7
El Oficce es 2007
El Error se repite con todas las macros que copio
El procedimiento que utilizo para copiar la macro es el siguiene:
1ª Abro un libro de excel
2ª Visual Basic
3ª Herramientas
4ª Macros
5ª Nombre de la Macro
6ª Crear
7ª Copio la Macro
"Esta es una macro copiada"
Sub MACRO7()
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False) = "C15" Then
Application.EnableEvents = False
Target.Value = Target.Value + Range("AB1").Value
Range("AB1").Value = Target.Value
Application.EnableEvents = True
End If
End Sub
Muchisimas gracias por su ayuda
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Con mucha pena tengo que decirles que conozco muy poco de macros y es por ello que respuosamente les formulo esta pregunta.
Siempre que copio una macho y al ejecutarla me sale el siguiene mensaje:" Error de Compilacion se esperava un End Sub" y me rasalda el Nombre de la Macro.
Mis sistema Operativo es Windows 7
El Oficce es 2007
El Error se repite con todas las macros que copio
El procedimiento que utilizo para copiar la macro es el siguiene:
1ª Abro un libro de excel
2ª Visual Basic
3ª Herramientas
4ª Macros
5ª Nombre de la Macro
6ª Crear
7ª Copio la Macro
"Esta es una macro copiada"
Sub MACRO7()
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False) = "C15" Then
Application.EnableEvents = False
Target.Value = Target.Value + Range("AB1").Value
Range("AB1").Value = Target.Value
Application.EnableEvents = True
End If
End Sub
Muchisimas gracias por su ayuda