............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

Error en tiempo de ejecución

Ver el tema anterior Ver el tema siguiente Ir abajo

Error en tiempo de ejecución

Mensaje por Bernardo el Jue Jul 31, 2008 4:31 pm

En la línea roja me sale "error 13 en tiempo ejecución.No coinciden los tipos". ¿Me pueden decir qué hice mal, por favor?

Sheets("Saldo").Range("A3:E33").Copy
uf = Sheets("Saldo").Range("A65536").End(xlUp).Row + 1
Sheets("Saldo").Range("A" & uf).PasteSpecial Paste:=xlValues
Application.CutCopyMode = False

If Range("A39:A65536").Value <> "" Then
Range("A39:A65536").Select
With Selection.Interior
.ColorIndex = 7
End With
End If

Bernardo

Cantidad de envíos : 18
Fecha de inscripción : 27/07/2008

Volver arriba Ir abajo

Re: Error en tiempo de ejecución

Mensaje por GalileoGali el Mar Ago 12, 2008 6:32 pm

Estas tomando algo asi como un array, que representaria el vector que contiene todos los valores contenidos en el rango, comparandolo con una string.
Puedes usar entre muchas posibles esta posibilidad:
If Application.COUNTA(Range("A39:A65536").value <>"" then

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1962
Edad : 61
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.