Abraham Valencia

[Hola ¿Qué ocurre exactamente? ¿Qué mensaje de error? ¿Algún detalle que nos ayude a ayudarte? Abraham Valencia

[Hola Pero no has puesto como das el formato al "TextBox" ni como envías la información a la hoja, he ahí seguramente el dilema. Abraham Valencia

[Hola Mira por aquí, quizá ahí está el dilema: https://abrahamexcel.blogspot.com/2018/01/el-gran-problema-de-los-archivos-lentos.html Saludos] Abraham Valencia

[Hola Prueba esto: Users = ActiveWorkbook.UserStatus With Workbooks.Add.Sheets(1) For Row = 1 To UBound(Users, 1) .Cells(Row, 1) = Users(Row, 1) .Cells(Row, 2) = Users(Row, 2) Select Case Users(Row, 3) Case 1 .Cells(Row, 3).Value = "Exclusive" Case 2...

[Hola Ya en la variable "ruta" agregas un slash (\), y en después la vuelves a crear generando un erro. Cambia esta parte así: Type:=xlTypePDF, Filename:= _ ruta & NOMBRE & ".pdf", Comentas Abraham Valencia PD: He ido directo al problema evidente,...

[Hola Colócalo así para que puedas usarlo en Office de 32 y 64 bits: #If VBA7 Then Public Declare PtrSafe Function FindWindow Lib "User32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long Public Declare PtrSafe...

[Hola Lo que hace "&" es concatenar, asumo que lo que querías poner es "And", reemplaza y comentas. Abraham Valencia PD: Por si acaso, no he revisado el código en su totalidad, he ido directo al problema evidente

[Hola Intenta así: =SI(SUMA(O24:X26)=0,"",SUMA(O24:X26)) No te olvides que esa fórmula no puede estar en alguna de las celdas del rango de la fórmula de la suma. Abraham Valencia

[Hola Asumo, por el título de tu pregunta, que el archivo tiene activada la opción "Libro compartido", entonces para determinar el problema hay que saber varias cosas, e ir descartando el problema: - El archivo está en una unida de red que usa como...

[Hola Además del 8 ¿qué otros números hay? Las letras son ¿de la A a la L o qué? Los número son ¿del 1 al 31? Abraham Valencia