Saltar al contenido

Chat en red local desde excel (actualizado 25/09/15)

publicado

Buenos días/ tardes/ noches

A raíz de este tema, cree este aporte, utilizando una base de datos access y un libro de excel.

Para que funcione se debe copiar el archivo "Chat.accdb" a una carpeta compartida o a la carpeta publica, a la cual los usuarios que utilizaran el chat tengan acceso, cada uno de los usuarios debe tener el archivo "chat.xlms".

Se debe cambiar la ruta de la base de datos en el modulo1.

Actualización 25/09/15

*Ahora se pueden compartir imágenes.

*Se crea una carpeta llamada "media" en el directorio de la base de datos, para almacenar las imágenes compartidas.

*Los cuadros de msj se ajustan mejor al contenido del mismo.

*Aumentado el tamaño del formulario.

*Mejora del diseño (cualquier parecido con Whatsapp es pura coincidencia ;)).

*El formulario ahora se puede minimizar (esta API puede ser incompatible en algunos equipos por lo que se adjunta una versión sin esta también) .

*Se puede trabajar en otros libros de excel mientras el chat esta abierto( modal=false).

*Algunas otras correcciones.

La ruta de la base de datos debe tener una estructura similar a esta:

\\10.10.200.254\Users\Public\Documents

Saludos a todos.

Chat Excel_RIDDLE V2.rar

Featured Replies

publicado
Hola [uSER=162198]@winkey777[/uSER] debes cerrar el excel, abrirlo nuevamente y sin realizar ninguna acción en excel ingresar al editor de vba, a mi también me pasaba y creo que es porque en cuanto ejecuto cualquiera de las macros empieza a ejecutarce en el codigo de este proyecto el "Application.OnTime" cada segundo y sabemos que si el form esta en ejecución no me deja modificar el código.

Espero te sirva.

muchisimas gracias amigo [uSER=198844]@JUANJG[/uSER] , ESO ERA..

publicado

buenas tardes,, siguiendo con este maravilloso aporte de nuestro compañero [uSER=143023]@Riddle[/uSER] , y con su permiso subo un pequeñísimo aporte,, en este agregue un botón para eliminar el historial, el famoso sonido beep al enviar.. estoy por querer terminar de agregar los emoticones.. espero se pueda.. espero les guste.

Chat Excel_RIDDLE V2 - copia - copia.part1.rar

Chat Excel_RIDDLE V2 - copia - copia.part2.rar

publicado
  • Autor

[uSER=162198]@winkey777[/uSER], se agradecen todos los aportes, yo por falta de tiempo no he podido agregar las notificaciones y las otras solicitudes, así que bienvenidas sean todas las mejoras.

Por otra parte en el botón de eliminar el historial yo modificaría la conexiones a la tabla para que solo borre el historial de la sala seleccionada de lo contrario borra todas las conversaciones de todas las salas afectando a los usuarios que las estén usando.

Esto

Set Rs = New ADODB.Recordset
Sql = "delete * FROM Chat"
Rs.Open Sql, miConexion, 3, 3, adCmdText[/PHP]

Cambiarlo por esto

[PHP]Set Rs = New ADODB.Recordset
Sql = "delete * FROM Chat where Sala=" & sala
Rs.Open Sql, miConexion, 3, 3, adCmdText[/PHP]

Salu2

publicado
[uSER=162198]@winkey777[/uSER], se agradecen todos los aportes, yo por falta de tiempo no he podido agregar las notificaciones y las otras solicitudes, así que bienvenidas sean todas las mejoras.

Por otra parte en el botón de eliminar el historial yo modificaría la conexiones a la tabla para que solo borre el historial de la sala seleccionada de lo contrario borra todas las conversaciones de todas las salas afectando a los usuarios que las estén usando.

Esto

Set Rs = New ADODB.Recordset
Sql = "delete * FROM Chat"
Rs.Open Sql, miConexion, 3, 3, adCmdText[/PHP]

Cambiarlo por esto

[PHP]Set Rs = New ADODB.Recordset
Sql = "delete * FROM Chat where Sala=" & sala
Rs.Open Sql, miConexion, 3, 3, adCmdText[/PHP]

Salu2

Muchisimas gracias amigo [uSER=143023]@Riddle[/uSER]. tomare eso en cuenta.. y esperemos seguir con este proyecto a ver hasta donde llegamos.. saludos.

publicado

Exclente proyecto... va avanzado y tiene mejor apariencia que la ultima vez que lo vi, bueno adicional a lo que piensan agregar como las notificaciones, y d que elimine solo las conversaciones de la sala, lo unico que le agregaria seria que los mensajes deje selecionar y copiar. Cuando uno envia un mensaje en PC muchas veces necesita Copy Paste..

Por otro lado Ojala permitiera cambiar la Font y Color, con estas cosas pasaria a otro nivel este chap

un saludo y los felicito por este proyecto esta muy bueno!

Saludos!

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.