Jump to content
  • Crear macros Excel

  • Posts

    • Private Sub CommandButton1_Click() Dim Celda As Range, x As Long Application.ScreenUpdating = False For x = 2 To Range("A" & Rows.Count).End(xlUp).Row Range("K" & x) = "" Set Celda = Sheets("Sheet2").Columns("A").Find(Range("A" & x), , , xlWhole) If Not Celda Is Nothing Then Range("K" & x) = Celda.Offset(0, 1) Next End Sub  
    • Hola @Galactico, ¿has probado a extraer el texto de la etiqueta "a"? Y si ha sido así, ¿qué resultado has obtenido?
    • buenas noches, estoy trabajando en una macro para obtener datos web, de a poco he ido aprendiendo como poder obtener objetos desde las diferentes paginas pero ahora he llegado a un punto donde no puedo seguir avanzando, precisamente con lo siguiente   tengo este código de pagina fuente <a href="www.google.com" data-original-title="" title=""> <span itemprop="category">Hola</span> "Adios" </a> con el siguiente código htmlDeRespuesta.getElementsByTagName("span")(0).innerText puedo obtener el texto Hola, pero no he logrado dar con la solución para obtener el dato Adios   por favor agradecería mucho su apoyo y gracias por el espacio   saludos!
    • hola Sergio. Gracias por tu respuesta. Pues algo así también he pensado. traducir las diferentes cantidades e ir cambiándolas en la macro saludos
    • Pues creo que si hay algo... aunque si ya lo hiciste, pues no estaría mal que lo compartas   Saludos!
  • Recently Browsing

    No registered users viewing this page.

×
×
  • Create New...

Important Information

Privacy Policy