Jump to content

JSDJSD

Members
  • Posts

    1,528
  • Joined

  • Last visited

  • Days Won

    122

JSDJSD last won the day on June 8

JSDJSD had the most liked content!

About JSDJSD

  • Birthday 01/01/1972

Profile information

  • Localización:
    Priego de Córdoba -- Excel 2016 --

Converted

  • Campos
    ;
  • Mi versión de Excel:
    2

Recent Profile Visitors

6,503 profile views

JSDJSD's Achievements

  1. Dale un vistazo a esto: Como Convertir uno o varios archivos de PDF a Excel con MACROS // SIN PROGRAMAS GRATIS y CONVERTIDORES - Aprende y Enseña Excel (xn--aprendeyenseaexcel-y0b.com)
  2. Pues sin archivo creo que nadie podrá darte una solución
  3. Solo quería mostrar mi admiración hacia ti, pero si tu lo quieres así pues cambio la palabra Maestro por GRAN ENTUSIASTA DE EXCEL (con mayúsculas), un saludo.
  4. Pues eso, sigue los consejos del Maestro Héctor Miguel que en esto de vba es uno de los muy grandes, un saludo
  5. Una vez listados todos los archivos de carpetas y su carpetas que quieres hacer ?
  6. For cont = 1 To 16361 With Hoja1 letra = Split(Cells(cont).Address, "$")(1) ufh1 = .Range(letra & Columns.Count).End(xlUp).Row If ufh1 > 1 Then letcol = .Range(letra & 1).Column MsgBox letcol Exit For End If End With Next cont
  7. Private Sub CommandButton1_Click() primeracol = Cells(1, 1).End(xlToRight).Column MsgBox "Primera columna con datos en fila 1 es: " _ & "La columna " & "** " & primeracol & " **" End Sub
  8. Aquí es donde tienes la modificación con respecto al anterior archivo.
  9. Prueba a ver que tal Disponibilidad v4.0.2.xlsm
×
×
  • Create New...

Important Information

Privacy Policy