Tengo un error en un boton con macro

2 envíos / 0 nuevos
Último envío
visitante (no verificado)
Imagen de visitante
Tengo un error en un boton con macro

hola me podrias ayudar a revisar que me falta en mi programacion por favor

 

Sub Button6_Click()

[C3] = [C3] + 1

'
' Consecutivo Macro
'
'
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = "=R[-4]C&R[-1]C&R[-3]C"
    Range("C6").Select
'
'
' Folio Macro
'
'
    Range("H2").Select
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1 = "=R6C3"
'
'
End Sub

me sale un error cuando aprieto varias veces el boton

necesito tu ayuda por fa

Leticia

Etiquetas: 

Cron
Imagen de Cron
Offline
última acción: Hace 1 hora 43 mins
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntos
alta: 23/06/2010 - 12:30
Puntos: 8840
Pues he copiado tal cual tu

Pues he copiado tal cual tu macro, y no me sale ningún error al pulsar muchas veces (lento y rápido) el botón.

Lo que sí veo es que la fórmula que pones en "Consecutivo macro" depende de la celda activa. Si has pinchado en una celda, ahí se pondrá la fórmula.

Puede ocurrir que a mí no me dé error por un comportamiento de Excel que se haya añadido a partir de cierta versión (esto es pura elucubración, no tengo instaladas versiones anteriores para probar).

Lo que hace tu macro es cambiar el valor de la celda C3, luego se va a la celda activa y coloca una fórmula que hace referencia a 3 celdas que están por encima de ella. Finalmente selecciona H2, y cambia también la fórmula.

La segunda vez que pulsas el botón, la celda activa es H2, y solo tiene una celda por encima, por lo que puede ser que el error que te da sea porque intenta colocar la fórmula en la celda activa, pero hace referencia a celdas que están fuera de la hoja.

En mi caso no me da error, porque le da la vuelta a la hoja y continúa contando desde el final.

¿Puede ser eso?

Un saludo