buenas con todos, estoy desarrollando una macro que me permita buscar desde Internet una palabra en Google y el resultado guardarlo en PDF y guardarlo con el nombre de la palabra de búsqueda. muchas gracias por su apoyo. psdt: son varias palabras pero que valla buscando palabra por palabra y luego lo guarde. Public Sub PALABRAS() Dim cuenta As Variant i = 2 While Range("A" & i).Value <> "" Espera (2) dni = Range("A" & i).Value Espera (2) 'seleccionamos la pantalla Sesion A (IBS) AppActivate "Google - Microsoft internet explorer provided by banbif" Espera (2) If i = 2 Then Espera (2) SendKeys (dni) Espera (2) SendKeys "{ENTER}" Espera (2) AppActivate "Microsoft Excel - Libro1" Espera (1) SendKeys (dni) SendKeys "{ENTER}" Espera (1) AppActivate "Google - Microsoft internet explorer provided by banbif" Espera (1) SendKeys "%{PRTSC}" Espera (1) Else Espera (2) SendKeys (dni) Espera (2) SendKeys "{ENTER}" Espera (2) AppActivate "Microsoft Excel - Libro1" Espera (1) SendKeys (dni) SendKeys "{ENTER}" Espera (1) AppActivate "Google - Microsoft internet explorer provided by banbif" Espera (1) SendKeys "%{PRTSC}" Espera (1) End If 'mspaint AppActivate "Microsoft Excel - Libro1" Espera (1) SendKeys "^v" Espera (1) GuardarPDF Espera (1) SendKeys "{deleted}" i = i + 1 Wend AppActivate "microsoft excel" MsgBox "Fin de Captura de pantallas", vbInformation, "Captura de Prueba pantalla" End Sub Sub Espera(ByVal Segundos As Long) Dim Hora As Double On Local Error Resume Next Hora = Timer Do Until Timer >= Hora + Segundos DoEvents Loop End Sub Sub GuardarPDF() ruta = "C:\Documents and Settings\OPAREDES\Escritorio\Imagen\" nombre = Cells(1, 1).Value ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ ruta & nombre, Quality:= _ x1QualityStandard, IncludeDocProperties:=False, IgnorePrintAreas:=False, _ OpenAfterPublish:=False End Sub

Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis Ingresar

JavaScript está desactivado. Para una mejor experiencia, por favor active JavaScript en su navegador antes de continuar.

Capturar Pantalla y guardar en PDF

Autor del tema omarzinho86
Fecha de inicio 3 Mar 2015

omarzinho86

New member

3 Mar 2015

buenas con todos, estoy desarrollando una macro que me permita buscar desde Internet una palabra en Google y el resultado guardarlo en PDF y guardarlo con el nombre de la palabra de búsqueda...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

Iniciar sesión o registrarme para responder aquí.

Temas similares

Pregunta

Como capturar imagen.jpg de webcam enformulario VBA

Respuestas: 5

7 Dic 2025

Héctor Miguel

Resuelto

Capturar datos de un libro de Excel y guardarlo en otro libro

Respuestas: 6

10 Feb 2022

Jacifuentes521

Pregunta

Macro para capturar datos desde un formulario

Respuestas: 9

4 Jul 2021

Macro Antonio

Pregunta

ayuda capturar datos rango y ejecutar update mientras la celda no este vacia

Respuestas: 0

14 Sep 2020

Gabo_0691

Pregunta

Capturar pulsación en botón Cancelar o tecla ESC

Respuestas: 3

11 Jun 2019

Chuse_M

Pregunta

macro para capturar texto

Respuestas: 0

8 Nov 2017

lucas18

Pregunta

Useform para buscar y capturar datos

Respuestas: 0

24 Oct 2017

danik07

Pregunta

Capturar datos a través de formulario

Respuestas: 2

2 Oct 2017

lucas18

Pregunta

Capturar Shapes en Excel

Respuestas: 4

14 Jun 2017

Cacho R

Pregunta

Capturar en textbox ruta de carpeta

Respuestas: 1

18 Ago 2016

Macro Antonio

Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Correo electrónico Enlace

Bienvenido a nuestro foro Excel 👋

Tenemos 135.000 usuarios registrados,
y 240.000 preguntas y respuestas Excel.

Primero 👉 regístrate gratis aquí 👈
para ver contenidos y descargas
sin restricciones!

Este sitio usa cookies para ayudar a personalizar el contenido, adaptar su experiencia y mantenerlo conectado si se registra.
Al continuar usando este sitio, usted está consintiendo nuestro uso de cookies.

Aceptar Saber más…

Volver

Arriba