Luis Mondelo

Dentro de las reglas de validación elige la opción personalizada y escribe dentro esta fórmula: =Y(ESNUMERO(ABS(DERECHA(B6;4)));ESTEXTO(IZQUIERDA(B6;2));LARGO(B6)=6) (En mi caso la validación la hago sobre la celda B6)

Esta es la solución: (Los nombres de las hojas los dejamos como: hoja1 y hoja2) Sub copiado() sheets("hoja1").select columna = Range("b39").Value Range("b40:b80").Copy Destination:=Sheets("hoja2").Cells(1, columna) End Sub Recuerda finalizar y puntuar

Tu problema se resuelve con la creación de un campo calculado en tu tabla dinámica. En el siguiente link te dejo un video demostrativo con los datos de tu ejemplo: http://es.tbox.ws/297Xfj

Esa fórmula no existe en excel 2003 por lo que hay que construir una fórmula matricial para que pueda funcionar. Si quieres pásame el archivo y te lo dejo montado [email protected]

Prueba con esta macro y me cuentas: Sub imprimirarea() primera = "B3" ultima = Range("d65000").End(xlUp).Offset(0, 2).Address ActiveSheet.PageSetup.PrintArea = primera & ":" & ultima ActiveSheet.PrintPreview End Sub

Esta es mi solución con este ejemplo: Tenemos la columna A con multitud de datos repetidos y queremos poner un combobox en la hoja con los datos únicos y ordenados. En mi ejemplo la macro utiliza de forma provisional la columna B para ordenar los...

Mándame tu archivo con los datos y te intentaré construir la solución [email protected]

La pregunta es: ¿En qué hoja quieres buscarlo? ¿En todas? ¿En alguna en particular?

Estupendo Rafael, te he mandado por mail el archivo con el botón en la hoja recibo Ya me contarás.

Esta es mi propuesta de solución: Dibuja un botón en la hoja2 y adjudícale esta macro. Al pulsarle te llenará tu combo con solo los datos únicos de la hoja1-columna A (Partimos de la base que en hoja2 tenemos dibujado un combobox1) Sub llenacombo()...