Conflicto en libro compartido

Hola, un problema a la hora de guardar los cambios en un libro compartido por varios usuarios que introducen datos simultáneamente. El libro esta ya diseñado para que los usuarios no introduzcan datos en las mismas celdas (con la finalidad de reducir al máximo los posibles conflictos), pero, inevitablemente, es necesario que los usuarios introduzcan y eliminen filas de manera frecuente, y el libro está programado para que el numero de fila creada sea el siguiente a la ultima fila vacía,..., por lo que puede ocurrir que cuando se sincroniza el libro tras el guardado (save) dos o mas usuarios hayan creado información en un mismo numero de fila, ..., y he aquí el conflicto.


Buscando soluciones que permitieran que cuando esto pasara una de las filas se trasladara a la siguiente fila vacía (ao algo asi), encontré un usuario de un foro de excel que planteaba un problema casi idéntico al mio. Este usuario, comunicó que lo había solucionado con el siguiente código:

ThisWorkbook.AcceptAllChanges
For Each w In Application.Workbooks
w.Sabe
Next w

con esta posibilidad, copie el código en el evento beforeclose del workbook, y dentro del procedimiento declare la variable "w" como "range", quedó algo asi:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim w As range
ThisWorkbook.AcceptAllChanges
For Each w In Application.Workbooks
w.Sabe
Next w

El problema es que, no me funciona, de hecho me da un error de ejecución
código 1004 (no coinciden los tipos) en la linea: ThisWorkbook.AcceptAllChanges
¿que hago mal?


Un fuerte abrazo y Felices Fiestas!!!

Añade tu respuesta

Haz clic para o