elda_vinci

A B C D E F G H I 1 año a b c d e f g h 2 2008 5 6 7 8 9 10 11 12 3 2009 23 24 25 26 27 28 29 30 Suponiendo que esta es la estructura y que en la celda B7 tienes el año que buscas y que en la celda C7 tienes la letra que buscas:...

Si, te has explicado bien, pero necesitaría el excel para poderte ayudar, ya que es muy genérico. Mándamela a [email protected]

Bien lo que me comentas se puede hacer utilizando cada celda como texto y cogiendo la parte derecha RIGHT(TEXTO, LARGO), IZQUIERDA(TEXTO, LARGO), ejemplo izquierda(E1;1) te daría "V". Pero para mayor comodidad deberías separarlos por columnas en una...

Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column <> 6 Or Target.Row < 15 Or Target.Row > 25 Or Range("H" & Target.Row) = "Pasado" Then Exit Sub ' Si la celda que has modificado está fuera del rango F15:F25 o el rango Hxx es igual...

Creo que es esto lo que me pides, pruébalo y me cuentas Workbooks.Open Filename:= "D:\Gabinete.xls" Sheets("Censo").Select Range("A5:B10").Select Selection.Copy Windows("Inspecciones").Activate Sheets("Reporte").Select Range("a1").Select...

No acabo de entender del todo lo que quieres hacer, me imagino que es así, si no, coméntamelo o mandame el libro a [email protected] con una pequeña explicación o ejemplo. If ActiveSheet.Range("H28").Value > 0 Then...

He estado probando varias cosas, está difícil que vba reconozca el color del formato condicional. Pero se puede hacer algo: ¿Los formatos condicionales son según un valor de la celda? Si es así, puedes hacer el filtro no haciendo referencia al color,...

Sub Guardar() Dim MiRuta, MiNombre Dim MiCarpeta As Object Dim Encontrado As Boolean Encontrado = False MiRuta = "C:\Documents and Settings\Miguel\Escritorio\CLIENTES\" ' Establece la ruta. MiNombre = Dir(MiRuta, vbDirectory) ' Recupera la primera...

Prueba con esto: Selection.End(xlDown).Address

Echale un vistazo a esto a ver si te puede ayudar http://support.microsoft.com/kb/290499/ES/