Search copy worksheet

32 resultados
Ordenar por fecha - Ordenar por pertinencia
Todos (32)
Foros (32)
 
Bucle para Copiar, pegar con Transpose
Hola amigos He encontrado el siguiente código que me permite copiar y ejecutar la función transpose con miles de datos. Option Explicit Sub testme() Dim wks As Worksheet Dim DestCell As Range Dim iRow As Long Set wks = ...
Mensaje publicado en el 23/08/2009 - 05:04
ERROR 1004 EN TIEMPO DE EJECUCION
Hola no se porque me esta saliendo el siguiente error: Se ha producido el error "1004" en tiempo de ejecucion Error en el metodo "Copy" de objeto "_Worksheet" El codigo que utilizo es el siguiente: Private Sub ...
Mensaje publicado en el 03/12/2005 - 19:23
Tema Objeto Range
Saludos a tod@s Espero que esten bien, bueno, la pregunta es la siguiente Tengo que pegar varios datos en una plantilla desde un documento principal, el tema es que al intentar hacer el famosisimo "Copy - Paste " me genera una serie de ...
Mensaje publicado en el 10/11/2005 - 19:12
Error en macro que copia filas de una hoja a otra
¡ Hola !\nSaludos cordiales!\n\nConstruí una macro para trasladar un rango de filas de una hoja a otra del mismi libro.\nLa macro pide que con un ImputBox se seleccione un rango de filas consecutivas ( en la hoja TAREAS) y copiarlas ...
Mensaje publicado en el 24/02/2014 - 11:38
Manejo de Rangos-Range
Por favor,Hector, me ayudas a mejorar este código? . Copio una tabla (rango columna A:E) a otra hoja para llevar un historico , pero como hacer para: *Que no me copie las 7 primeras filas (pues son Titulos y Encabezados). *Existe la ...
Mensaje publicado en el 29/05/2009 - 13:35
Insertar datos hacia abajo
Que tal Hice un codigo para tomar ciertos datos de una hoja (hoja1) y pegarlos en otra de manera que inserte los renglones (para no escribir arriba de los datos que ya existen) en otra hoja (hoja2). sub pega() Sheets("hoja2").Select ...
Mensaje publicado en el 15/12/2008 - 21:37
copiar y pegar de un libro a otro por código
Hola a todos, gracias por leerme necesito un poco de ayuda, quiero copiar y pegar de un libro de excel a otro Tengo dos posibilidades (me gustaría que me ayudarais con las dos) 1º Directamente copiar y pegar la hoja Desde libroActivo, ...
Mensaje publicado en el 21/11/2008 - 08:55
Función que no funciona en UserForm
Estimado señores: Porqué la función: "Selection.PasteSpecial Paste:=xlPasteAll", no funciona adecuadamente con códigos UserForm? El siguiente código permite copiar la hoja CARATULA en la hoja Vistas, sin ...
Mensaje publicado en el 18/10/2006 - 22:05
Cambiar de nombre a una hoja
Hola algo tan sencillo que no he podido hacer les pondre el codigo: Sub AdicionHoja() Dim wBk As Workbook Dim ws As Worksheet Dim BkName As String Dim newSheetName As String Dim ruta As String Dim rutaynombre As String ruta = ...
Mensaje publicado en el 02/02/2006 - 00:21
Error en el código por cambiar el nombre de las hojas
Hola, tengo un documento con una macro cuyo código pongo mas abajo, que funcionaba bien cuando las hojas de documento se llamaban Hoja1, Hoja2, etc... Pero ahora que he tenido que cambiar el nombre de las hojas a "Benjamin" ...
Mensaje publicado en el 23/08/2005 - 11:49
Error en el código por cambiar el nombre de las hojas
Hola, tengo un documento con una macro cuyo código pongo mas abajo, que funcionaba bien cuando las hojas de documento se llamaban Hoja1, Hoja2, etc... Pero ahora que he tenido que cambiar el nombre de las hojas a "Benjamin" ...
Mensaje publicado en el 23/08/2005 - 11:49
Error en el código por cambiar el nombre de las hojas
Hola, tengo un documento con una macro cuyo código pongo mas abajo, que funcionaba bien cuando las hojas de documento se llamaban Hoja1, Hoja2, etc... Pero ahora que he tenido que cambiar el nombre de las hojas a "Benjamin" ...
Mensaje publicado en el 23/08/2005 - 11:49
Error en el código por cambiar el nombre de las hojas
Hola, tengo un documento con una macro cuyo código pongo mas abajo, que funcionaba bien cuando las hojas de documento se llamaban Hoja1, Hoja2, etc... Pero ahora que he tenido que cambiar el nombre de las hojas a "Benjamin" ...
Mensaje publicado en el 23/08/2005 - 11:49
LA enti penultima pregunta :P
Private Sub Worksheet_Change(ByVal Target As Range) Dim Rng As Range On Error Resume Next Set Rng = Intersect(Target, _ Range("F18:F30,C18:C30,D18:D30,E18:E30,G18:G30,I18:I30,K18:K30,L18:L30")) On Error GoTo 0 If Rng Is Nothing Then Exit ...
Mensaje publicado en el 19/04/2005 - 19:57