elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Recuerda que debes registrarte en el foro para poder participar (preguntar y responder)


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP)
| | | |-+  Programación Visual Basic (Moderadores: LeandroA, seba123neo)
| | | | |-+  Macros en Internet....
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Macros en Internet....  (Leído 1,184 veces)
sepiluf

Desconectado Desconectado

Mensajes: 3


Ver Perfil
Macros en Internet....
« en: 3 Enero 2006, 20:09 pm »

Hola a todos!!!!

Tengo que hacer un copia y pega d un enlace de internet el cual tiene un texto repartido en unas 500 paginas aproximadamente y me han dicho que utilizando macros me podria evitar, lo siguiente:

1º estar delante del ordenador y hacer ctrl+c y ctrl+v en las 500 paginas para pegarme toooooa la informacion en una hoja d word.

2º ahorrarme unas gafas nuevas por pasar delante d la pantalla todo ese tiempo.


Es posible????

Estoy mirando por alli y por aqui y no entiendo mucho eso d las macros y para que sirven exactamente.
Entiendo q es como una herramienta q te evita hacer acciones repetitivas con documentos y hojas d calculo y demas.

Pero no tengo ni idea d como aplicar las macros para hacer copiar y pegar cosas d paginas d Internet.

Si alguien domina y me puede echar un cable?????

Muxas Gracinas y un saludo a todos!!!!


En línea

Kizar


Desconectado Desconectado

Mensajes: 1.325


kizar_net


Ver Perfil
Re: Macros en Internet....
« Respuesta #1 en: 3 Enero 2006, 23:23 pm »

Nada de marcos si e entendido bien lo k kieres acer es 500 archivos de texto ponerlo todo en uno no?

Código:
Dim I As Long
Dim Texto As String
Dim Bufer As String
For I = 1 To 500
Open "C:\archivo" & I & ".txt" For Binary As #1
Bufer = Space(LOF(1))
Get #1, , Bufer
Texto = Texto & Bufer
Close #1
Next I

Open "C:\archivo_completo.txt" For Binary As #1
Put #1, , Texto
Close #1

PD puede aber fallos ya k no lo e probado.
Salu2


En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
¿Macros .m4 c++ con eclipse?
Programación C/C++
BlaineMonkey 0 1,692 Último mensaje 28 Diciembre 2010, 12:11 pm
por BlaineMonkey
Crear un Xls con macros incluidas
Programación Visual Basic
yalosabes 8 5,005 Último mensaje 18 Marzo 2011, 10:36 am
por raul338
Dudas macros
Dudas Generales
ElGenar0 1 2,012 Último mensaje 20 Mayo 2013, 17:58 pm
por ivancea96
Macros en C
Programación C/C++
m@o_614 5 3,256 Último mensaje 19 Febrero 2014, 08:22 am
por eferion
macros en C
Programación C/C++
fafafa01 4 3,525 Último mensaje 25 Enero 2017, 18:43 pm
por MAFUS
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines