bky

hola a todos... hace un par de dias expuse una situación de macro condicional
y me notificaron la repuesta a mi mail.. pero cuando intento abrir la pagina
sale en blanco.. no se a que se debe esta situación y ya van dos veces que me
ocurre.. si alguien sabe la respuesta por favor expongala.. ahora voy a
exponer mi sisutación otra vez.. se trata de la siguiente macro que no me
funcional y el problema esta en la condición...

Sub Imprime_Numerancf()
ActiveSheet.PrintOut 'Copies=2
ActiveSheet.Unprotect ("1496")
Sheets("FACTURA").Range("G10").Value = Sheets("FACTURA").Range("G10") + 1
If Sheets("FACTURA").Range("F8").Value = ("1") Then
Sheets("NCF").Range("B1").Value = Sheets("NCF").Range("B1") + 1
ActiveSheet.Protect Password:="1496", DrawingObjects:=True, Contents:=True
'Save=True
End Sub