adrian105

adrian105

 Colombia @adrian105 desde - visto
Preguntar

Actividad pública reciente

Ha valorado "Excelente" la respuesta

Ruta para archivo de excel

respondió: Ajusta de esta manera ruta = ThisWorkbook.Path & "\" FOTO = ruta & Sheets("DESCRIPCION").Range("F6").Value ' ActiveSheet. Shapes("foto"). Fill.UserPicture (ruta & "NO.JPG")
Ha preguntado en el tema en

Filtrar celdas solo de color amarillo

Necesito realizar la siguiente actividad en excel en la hoja1 del rango a11:A30 tengo un listado de equipo médicos, requiero que cuando le ponga el color amarillo a aquellos que requieran se pase a la hoja2 en el rango a11:30... Si en la hoja1 le...
Sin respuestas
Ha valorado "Excelente" la respuesta

Filtrar por color y poner en otra hoja

respondió: Prueba con esta macro, copiara solo las filas coloreadas en amarillo a la hoja 2 Sub copiar_coloreados() Set datos = Range("a1").CurrentRegion With datos filas = .Rows.Count x = 1 For i = 1 To filas xcolor = .Cells(i, 1).Interior.ColorIndex If xcolor...
Ha valorado "Buena" la respuesta

Como poner Imágenes automáticas celdas excel

respondió: En el link tienes varios ejemplos https://www.youtube.com/playlist?list=PLdK9H5dMIfQhfjfayLQRxEUVYUFAIMigE
Ha valorado "Excelente" la respuesta

Ayuda con mensaje de desconexión en visual basic

respondió: Si usas Vb6 Podrias usar un control de errores, para evitar que se cierre la ventan y pierdas los datos. Y en el tratamiento del error, podrias poner el codigo necesario para testear tu conexion....
Ha valorado "Excelente" la respuesta

Ayuda con error 3251 en tiempo de ejecución

respondió: Adrian si pudieras poner el código donde te aparece este error seria de mucha ayuda, aunque al parecer es por que estas intentando actualizar un dato en un recordset donde no se puede y habría que revisar de que modo quieres hacerlo.
Ha preguntado en el tema en

Matriz para checkbox

Hola amigos tengo 40 checkbox y necesito que cuando abra el formulario la opción caption de ellos arranque en NO.. Tengo el siguiente código en formload Private Sub Form_Load() Check1.Caption = "NO" end sub . .pero he visto que se puede hacer con una...
Sin respuestas
Ha preguntado en el tema en

Ayuda con matriz check box

Hola amigos tengo mas de 40 check box en un formulario y necesito hacer esto en cada uno de ellos. ? Private Sub Check1_Click() If Check1.Value = 1 ThenCheck1.Caption = "SI" ElseCheck1.Caption = "NO" End IfEnd Sub Como puedo hacer para que con una...
Sin respuestas
Ha valorado "Excelente" la respuesta

Le envío el código para ayuda..

respondió: Lo que puedo ver asui es que intentas hacer una actualización SOBRE el recordes que hicste una selección anteriormente rsdatper(3) = Text1(3) ''AQUI ES DONDE ME MANDA CUANDO ME DA EL ERROR 3251 rsdatper(4) = Text1(4) 'por ejemplo Si tu llenas un...
Ha empezado a seguir a