Ver Mensaje Individual
  #1 (permalink)  
Antiguo 01/02/2015, 14:38
JoaoM
 
Fecha de Ingreso: agosto-2007
Mensajes: 1.945
Antigüedad: 16 años, 8 meses
Puntos: 39
Unificar rutinas

Quiero pedir la ayuda de tan dignos expertos para estas 2 rutinas unificarlas en una sola y que en nada afecte su ejecucion
Código:
    'se completa en la col F con la formula
        Range("F22").Select 'Selecciona F
        Selection.AutoFill Destination:=Range("F22:F23"), Type:=xlFillDefault

    'se completa en las col C y D con la formula
        Range("C22:D22").Select 'Selecciona desde C a D
        Selection.AutoFill Destination:=Range("C22:D23"), Type:=xlFillDefault

Probe algo así:


Código:
   Range("C22:D22,F22").Select
        Selection.AutoFill Destination:=Range("C22:D23,F22:F23"), Type:=xlFillDefault
Pero algo hago mal porque no me funciona

Mil gracias por las ayudas que pudieran entrar
__________________
Las contraseñas son como la ropa interior: Nunca dejarlas donde la gente pueda verlas
http://i64.tinypic.com/rho40i.jpg