ComboBox de 3 columnas - range select

Problema con macro y autofill

Hola, Estoy haciendo una macro que me copie un valor y lo arrastre hacia abajo hasta la última fila que contenga información. El problema es que el número de filas varía y no sé como decirselo a Excel. Éste ...

Mensaje publicado en el 04/05/2007 - 00:03

Como reconocer cuando no se ha seleccionado ningún item en un ListBox

Hola Gente del Foro: Tengo el siguiente problemilla en un UserForm. El formulario se usa para volcar datos a una base al apretar un CommanButton, que activa el código que vuelca los datos ingresados en los distintos TextBox, ComboBox y un ...

Mensaje publicado en el 27/02/2007 - 00:19

Macro para crear hoja y borrar filas específicas

Buenas tardes a todos! Tengo el siguiente codigo producto de una grabación de la herramienta Macro de Excel: Sub Creating_New_Sheet() Sheets("Fecha ODA Oct (5)").Copy After:=Sheets(13) Rows("2:2").Select Range(Selection, ...

Mensaje publicado en el 09/10/2006 - 22:56

Error de automatización

Buenos dias grupo, estoy teniendo un problema con una aplicavción que estoy haciendo. El error surge de forma aleatoria, hay ocasiones que sucede, otras no, hay ocasiones en que al abrir la aplicacion y presionar un boton surge el error otras ...

Mensaje publicado en el 29/07/2005 - 18:38

Copiar primeros 30 registros filtrados

Que tal grupo, una pregunta, tengo una tabla con varios registros, por medio de codigó VB estoy filtrando sobre uno de los campos, lo que deseo hacer es copiar solo 30 registros resultado del filtro, Cómo lo puedo hacer?, ...

Mensaje publicado en el 09/06/2005 - 17:26

Copiar primeros 30 registros filtrados

Que tal grupo, una pregunta, tengo una tabla con varios registros, por medio de codigó VB estoy filtrando sobre uno de los campos, lo que deseo hacer es copiar solo 30 registros resultado del filtro, Cómo lo puedo hacer?, ...

Mensaje publicado en el 09/06/2005 - 17:26

Eliminar Filas VBA

actualmente tengo el siguient ecodigo y lo quiero complementar chequen: Sub EliminarRepetidos() contador = 0 Range("b1").Select valor = ActiveCell.Value ActiveCell.Offset(1, 0).Range("a1").Select While ActiveCell.Value <> ...

Mensaje publicado en el 14/08/2004 - 20:54

macro excel

Estoy haciendo una macro en excel (Office XP) ... necesito hacer un bucle en donde analice la celda de la derecha de la celda activa y si dicha celda está llena, escriba en la celda activa un texto. Seguidamente que haga lo mismo con la celda ...

Mensaje publicado en el 02/07/2004 - 21:44

Comparar dos columnas con macros en Excel 2003

Un saludo a todos y aquí empiezo el año con una solicitud de ayuda de su parte. Resulta que tengo dos columnas de 3500 filas cada una, en la columna AG tengo el número de dias de un documento y en la columna BW necesito poner ...

Mensaje publicado en el 13/01/2010 - 23:45

Macro que funciona en dos pc si y otros dos no

Hola Tengo la siguiente macro en un servidor de red que usamos cuatro personas y para dos funciona perfectamente y para los otros dos da error 1004. La macro "debe estar bien" pues funciona siempre para esos dos usuarios y para los otros ...

Mensaje publicado en el 19/03/2009 - 20:56

Ocultar una libro consultado

Hola a todos. Desde un libro hago una búsqueda del contenido de una celda en otro libro y pinto la celda contigua a la encontrada en la celda contigua a la de la búsqueda, mediante una macro. Mi problema está en que durante ...

Mensaje publicado en el 09/09/2008 - 19:28

Rango dinámico en una macro

Hola !! Tengo mucho tiempo fuera de este grupo de noticias, hace algunos años pude compartir algunas experiencias con los miembros. Saludos !! En esta oportunidad tengo una duda a ver si alguien me puede ayudar. En esta pequeña ...

Mensaje publicado en el 27/09/2007 - 19:47

formato condicional con vba

Hola a todos! he adaptado este codigo que encontre en otro post, para colorear el texto contenido en las celdas "A1" y "A2" en el resto de la hoja. Como podria hacerlo para que si introduzco 01/012007 en A1 y 10/01/2007 en ...

Mensaje publicado en el 07/02/2007 - 21:59

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