Jump to content
Sign in to follow this  
home can

Error 13 no coinciden los tipos

Recommended Posts

Hola home can,

No había entendido bien tu solicitud, pero anexa este código y me comentas

Private Sub CommandButton1_Click()
For x = 2 To Range("A2").End(xlDown).Row
If Cells(x, "A").Text <> "X" Then
Cells(x, "C").Value = ""
End If
Next x
End Sub[/CODE]

Saludos !!!

Share this post


Link to post
Share on other sites

Gracias Max2005 y Diego9019.

Vuestros códigos funcionan en la hoja de ejemplo... pero cuando los traslado a la hoja original (más amplia) ya no lo hacen, supongo que debido a una mala interpretación de las instrucciones por mi parte.

Adjunto una nueva hoja de ejemplo.

ejemplo2.rar

Share this post


Link to post
Share on other sites

Hola Max2005, tu código funciona a la perfección. Gracias!

Casi me lío porque creía que no había diferencia entre mayúsculas y minúsculas, pero ya he comprobado que si la hay.

Tema solucionado.

Share this post


Link to post
Share on other sites
Guest
This topic is now closed to further replies.
Sign in to follow this  



×
×
  • Create New...

Important Information

Privacy Policy


CTA Templates.png