Jump to content

Galactico

Members
  • Posts

    51
  • Joined

  • Last visited

  • Country

    Chile

Converted

  • Campos
    ,

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

Galactico's Achievements

  1. hola buenas, he estado hace un tiempo aprendiendo y desarrollando macros en vba para realizar scraping en paginas web, en una de las paginas que utilizo apareció esta protección del sitio, el posible bypasear con vba? he leído que se puede hacer con phyton pero no conozco ese lenguaje el mensaje que dice es Cheking your browser before accessing "sitio" dejo pantallazo https://ibb.co/wp4mwzP en caso de no ser posible, quizás ya sea momento de aprender otro tipo de lenguaje agradezco mucho la ayuda
  2. buenas tardes, tengo una macro que trabaja con datos, que los extrae de otras planillas y tablas web, cuando hago correr la macro, esta se demora aprox 2 horas en completar su proceso, lo que me imposibilita de trabajar en otras planillas existe alguna manera de abrir otro excel y poder utilizarlo a la par? tal vez con una maquina virtual o algo asi? muchas gracias por su ayuda
  3. muchas gracias, funciono a la perfeccion
  4. buenas, es posible cambiar el sentido a la formula coincidir? por ejemplo COINCIDIR("si";R1:R7000;0) =COINCIDIR("si";R1:R7000;0) eso me indica el primer valor "si" que este en un listado, pero además necesito buscar el ultimo valor y no se como invertir el orden agradecería mucho su ayuda gracias
  5. muchas gracias, eres un crack, como se podría ajustar para que siga funcionando cuando se cambia el alto de la fila?? gracias nuevamente!
  6. buenos días, espero que todos se encuentren bien en estos tiempos de pandemia actualmente estoy investigando como poder realizar lo siguiente, tengo varias celdas con texto, en las cuales debo ajustar el tamaño del texto al tamaño de la celda, las celdas pueden estar concatenadas o no, con diferentes tamaños, estoy tratando de buscar la forma de hacerlo de manera masiva, ya que básicamente debo realizar esta acción cientos de veces, por otra parte también agregar un marco solo a las celdas que contienen texto espero se pueda entender mi duda desde ya muchas gracias
  7. muchas gracias, me resulto a la primera saludos!!!!
  8. buenas noches, estoy tratando de utilizar un buscarv para extraer datos de una tabla, pero no logo obtener el resultado que quiero esta el la tabla con datos y este es el resultado al que quiero llegar he intentado realizar varias formulas con buscarv, pero solo me encuentra un par de datos agradecería mucho su ayuda desde ya saludos buscarv.xlsx
  9. Hola sergio, gracias por tu apoyo al tratar de buscar la etiqueta "a" obtengo como resultado, ambos textos juntos, de la siguiente forma, "HolaAdios", solo necesito lo ultimo gracias nuevamente
  10. 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!
  11. buenas noches, tengo una macro para navegar por paginas web, la cual siempre me ha funcionado bien, pero siempre me ha costado dar con los objetos web he intentado con las siguientes sentencias sin éxito para el color: c.Value = htmlDeRespuesta.getElementsByName("_ngcontent-hhw-c116")(0).innerText y para el valor 1,99 c.Value = htmlDeRespuesta.getElementsByName("_ngcontent-xsn-c116")(5).innerText c.Value = htmlDeRespuesta.getElementsByClassName("col-xs-2 price")(0).innerText c.Offset(0, 3).Value = htmlDeRespuesta.getElementsByClassName("tableHere")(0).innerText pero no he podido dar con el valor de ninguna forma agradecería mucho su ayuda saludos a todos
  12. disculpen, me exprese mal, pero la respuesta de antoni sirvió a la perfección, muchas gracias es un genio otra consulta, por ejemplo, en el for, si fuera de 0 a 100 el valor de y, como podría ingresar algo para que se me guarde la hoja cuando y valga 50, y luego al finalizar (con 100) muchas gracias de nuevo
  13. buenas, estoy tratando de reducir el tamaño del siguiente código If InStr(1, c, "Out") Or InStr(1, c, "out") Then c.Value = "NS" Else c.Value = c.Value If InStr(1, c.Offset(0, 1), "Out") Or InStr(1, c.Offset(0, 1), "out") Then c.Offset(0, 1).Value = "NS" Else c.Offset(0, 1).Value = c.Offset(0, 1).Value If InStr(1, c.Offset(0, 2), "Out") Or InStr(1, c.Offset(0, 2), "out") Then c.Offset(0, 2).Value = "NS" Else c.Offset(0, 2).Value = c.Offset(0, 2).Value If InStr(1, c.Offset(0, 3), "Out") Or InStr(1, c.Offset(0, 3), "out") Then c.Offset(0, 3).Value = "NS" Else c.Offset(0, 3).Value = c.Offset(0, 3).Value básicamente es reemplazar texto de una celda y hacer lo mismo en las 3 siguientes a la derecha, pero no se como poder juntar todo en una sola linea de código por otra parte estoy tratando de hacer algo similar con replace c.Replace What:="Hola", Replacement:="Adios" pero me pasa que, cuando la celda no contiene el texto "Hola" excel me arroja un error que dice lo siguiente: espero que se entienda lo que trato de hacer desde ya agradezco su ayuda saludos!
×
×
  • Create New...

Important Information

Privacy Policy