Abraham Valencia

Sin ver tu archivo y tus avances, es casi imposible darte consejos, más aún si mencionas no usar macros pero hablas de VBA. Saludos.

Sí, por eso digo lo de los detalles, es decir ¿qué crees tú que debe aparecer y qué aparece? Pon imágenes. Saludos.

Hola Yo uso Excel de64 bits y no tengo ningún problema, da detalles para entender qué es lo que ocurre contigo.

Hola, una forma es: Private Sub UserForm_Initialize() Me.StartUpPosition = 0 'Establecer posición de forma manual Me.Top = 100 'Desde la parte superior Me.Left = 100 'Desde el margen izquierdo End Sub Lee sobre las propiedades Top y Left del Userform para mejor referencia. Saludos.

Hola nuevamente @Betomil La búsqueda que usas en Power Pivot está destinada a los metadatos, en este caso a los encabezados de las columnas, si tú quieres ver los datos que necesitas buscar, debes usar los filtros de texto de las columnas o en todo caso, una de las alternativas que te han planteado en el otro foro y que por aquí te han hecho recordar.

¡Gracias Gabriel!

¡Bienvenido al foro!

Hola, adjunta y/o coloca en un enlace una muestra de tus datos y de preferencia envía captura de pantalla del error. Saludos.

Hola Es normal ya que un rango convertido en tabla se vuelve otro tipo de objeto y tiene en general su propia forma de insertar datos, por eso lo mejor es que decidas si prefieres usar un rango de datos o una tabla, decide eso primero. Saludos.

Hola ¿Pero si usa P4 para una variable? ¿cómo entonces quieres que se agregue algo en dicha celda? No tiene lógica.

Hola A diferencia de los ComboBox de VB 6.0 o de los de VB.Net, hasta donde recuerdo los de VBA no tienen una propiedad que permita de forma directa y manual introducir los valores que se quieren mostrar. Saludos.

Jajaja, @Antoni me refería a qué intentaba obtener nuestro amigo con eso ya que no subió su archivo, podrían ser equis razones; es más, incluso si corre eso que tiene ahí, Userform o no, el punto podría no afectarle, pero, insisto, este es de los casos que podría ser eso que colocas o podría alargarse y alargarse el tema. Saludos.

Hola Lamentablemente es una web de suscripción y no realizo suscripciones a webs que no son de mi interés; esperemos igual alguien sí lo haga, entienda el problema y las macros y te ayude.

Hola ¿y ese (0)?

¡Bienvenido!

Hola, probablemente cambiaste uno de los encabezados de los datos de origen de mayúsculas a minúsculas o viceversa.

Si adjuntas tu archivo sería más fácil entenderte. Inclúyele una explicación. Ah, no te preocupes si tienes datos privados, solo los cambias y deja lo necesario para entenderte.

Hola Los foros son públicos y la idea es compartir, pero nadie puede involucrarse si usuarios deciden tener tratos privados, aunque no es la lógica de un foro, claro. Saludos.

Hola nuevamente Si en tu pestaña "Programador" activas el botón de "Modo diseño", podrás elegir cualquiera de tus TextBox, una vez elegido cualquiera, das clic derecho (sin que se pierda la elección) y en el menú contextual que se desplegará eliges "Propiedades", buscas la que te menciono y en el casillero respectivo colocas, por ejemplo, "A1" (sin las comillas). Desactivas el Modo Diseño y cualquier cosa que escribas en el TextBox que seleccionaste, aparecerá en la celda A1 en automático.

Hola Tal cual pides, no se puede, la salida es que a la propiedad "LinkedCell" de cada TextBox de tu interés, le asocies una celda y usas el valor que se reflejará en dicha celda.

Hola, confirmado entonces, son los recursos de tu computadora. Lo importante es que ya pudiste Saludos.

Hola, mira lo resaltado en azul y la ruta que se ve en el "Tooltip": En algunos casos la referencia podría leerse solo como "Acrobat"

Parece ser cosa de la memoria y recursos de tu PC. Igual intenta así: Sub SumarEnRangoOptimizado() Dim folderPath As String Dim fileName As String Dim wb As Workbook Dim ws As Worksheet ' Carpeta que contiene los archivos folderPath = "D:\Carpeta\" ' Deshabilitar actualizaciones de pantalla y cálculos automáticos Application.ScreenUpdating = False Application.Calculation = xlCalculationManual ' Crear una instancia de Excel Application ' Set excelApp = CreateObject("Excel.Application") ' excelApp.DisplayAlerts = False ' Desactivar las alertas ' Iterar sobre los archivos en la carpeta fileName = Dir(folderPath & "\*.xlsx") Do While fileName <> "" ' Abrir el archivo Set wb = Workbooks.Open(folderPath & "\" & fileName) Set ws = wb.Sheets(1) ' Primera hoja de trabajo ' Aplicar la fórmula directamente en el rango With ws .Range("A3239:D3850").Formula = "=A$3238 + (ROW()-3238)" .Range("A3239:D3850").Value = .Range("A3239:D3850").Value ' Convertir las fórmulas en valores End With ' Cerrar el archivo sin guardar cambios wb.Close SaveChanges:=True Set ws = Nothing Set wb = Nothing ' Obtener el siguiente archivo en la carpeta fileName = Dir Loop ' Cerrar la instancia de Excel Application ' excelApp.Quit ' Set excelApp = Nothing ' Habilitar actualizaciones de pantalla y cálculos automáticos Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic MsgBox "La operación se ha completado en todos los archivos de la carpeta.", vbInformation End Sub Comentas

Hola Al aparecer no te estás explicando bien ¿Te refieres a que tienes tu archivo en OneDrive, en la nube, y que quieres un enlace directo a ese archivo que al darle doble clic lo abra en tu Excel de escritorio y NO en Excel para la web? De ser así, necesariamente tienes que instalar la aplicación OneDrive en dicha PC y mapear tu nube.