Experto en Vba o excel online, de google o onedrive

Requiero agarrar la informaciónd e un archivo de texto y llenar todo en un excel para crear un pdf personalizado.

Sub LlenarCotizacion()
    Dim Datos As Worksheet, Cotizacion As Worksheet
    Dim Producto As Range, Cantidad As Range, PrecioUnitario As Range, Total As Range
    Dim i As Integer, j As Integer, k As Integer
   
    'Abrir los archivos de Excel
    Set Datos = Workbooks.Open("Ruta\Datos de Cotizacion.xlsx").Worksheets("Hoja1")
    Set Cotizacion = Workbooks.Open("Ruta\Template de Cotizacion.xlsx").Worksheets("Hoja1")
   
    'Recorrer la lista de productos y precios en Datos de Cotizacion
    For i = 2 To Datos.Range("A" & Rows.Count).End(xlUp).Row
        Set Producto = Datos.Range("A" & i)
        Set PrecioUnitario = Datos.Range("B" & i)
       
        'Buscar el producto correspondiente en la cotización
        For j = 2 To Cotizacion.Range("A" & Rows.Count).End(xlUp).Row
            If Cotizacion.Range("A" & j) = Producto Then
                Set Cantidad = Cotizacion.Range("B" & j)
                Set PrecioUnitario = Cotizacion.Range("C" & j)
                Set Total = Cotizacion.Range("D" & j)
               
                'Calcular el total
                Cantidad.Value = InputBox("Ingrese la cantidad para el producto " & Producto.Value)
                Total.Value = Cantidad.Value * PrecioUnitario.Value
            End If
        Next j
    Next i
   
    'Guardar y cerrar los archivos de Excel
    Datos.Parent.Save
    Cotizacion.Parent.Save
    Datos.Parent.Close
    Cotizacion.Parent.Close
End Sub

[0:49 p. m., 12/5/2023] arleal: Si tienes un archivo de texto con la información de una cotización, puedes utilizar las herramientas de pivotaje en Excel para transformar los datos en un formato de tabla con las columnas y filas necesarias para generar una cotización con el formato deseado. Sigue estos pasos para pivotear los datos:

Abre Excel y haz clic en la pestaña "Datos".

En la sección "Obtener datos externos", haz clic en "De texto/CSV" y selecciona el archivo de texto con la información de la cotización.

En el cuadro de diálogo "Asistente para importar texto", selecciona la opción "Delimitado" si el archivo de texto está separado por comas o tabulaciones. Si el archivo de texto está en formato de ancho fijo, selecciona la opción "Ancho fijo".

Asegúrate de que los encabezados de columna estén marcados como "Mi tabla tiene encabezados". Haz clic en "Siguiente".

En el paso 3 del asistente, asegúrate de que todas las columnas estén seleccionadas y luego haz clic en "Finalizar" para importar los datos a Excel.

Con los datos importados, haz clic en la pestaña "Insertar" y selecciona "Tabla". Marca la casilla "Mi tabla tiene encabezados" y haz clic en "Aceptar".

Con la tabla creada, puedes utilizar la herramienta de "PivotTable" en la pestaña "Insertar" para pivotear los datos según tus necesidades. Selecciona las columnas que deseas agregar a la tabla pivote y arrástralas a los campos de fila y columna según corresponda. Utiliza las funciones de suma, promedio o conteo para agregar datos numéricos y agruparlos por categorías.

Con la tabla pivote creada, puedes utilizar el formato y diseño que desees para crear una cotización con el formato deseado. Asegúrate de guardar el archivo en un formato compatible con el software o sistema que utilizarás para compartir la cotización.

Con estos pasos, deberías ser capaz de pivotear los datos de un archivo de texto en Excel y generar una cotización con el formato deseado.
[0:53 p. m., 12/5/2023] arleal: En VBA, para leer un archivo en la nube y seleccionar filas y columnas para rellenar otro archivo, se pueden utilizar las funciones y métodos de Excel. A continuación, te presento un ejemplo de cómo hacerlo:

Conectarse a OneDrive: En primer lugar, es necesario conectarse a OneDrive para poder acceder al archivo. Para ello, se puede utilizar la función Workbooks.Open de Excel y especificar la ruta de la carpeta de OneDrive.

Seleccionar las filas y columnas: Una vez que se ha abierto el archivo, se puede utilizar el método Range de Excel para seleccionar las filas y columnas deseadas. Por ejemplo, para seleccionar la columna A y las filas de la 2 a la 10, se puede utilizar la siguiente línea de código:

mathematica
Copy code
Selection.Copy
Workbooks("NuevoArchivo.xlsx").Sheets("Sheet1").Range("A1").PasteSpecial xlPasteValues
Este es solo un ejemplo básico de cómo utilizar VBA para leer un archivo en la nube y seleccionar filas y columnas para rellenar otro archivo. Es importante tener en cuenta que se pueden utilizar diferentes métodos y funciones de Excel para personalizar y ajustar el código según las necesidades específicas.