UniversoExcelForo

Respuesta a consultas.
Fecha de creación: 09.Abril.2012

Fundadores: Wibly,Tyno,Servando,Sakkar,Rosendo2,RMaximo,Railar,Mcoronel,Ioyama,Igtelo,Hugotron,Drochar,Dedos,Alberto,Adolfo

No se pueden hacer consultas de Excel o VBA por mensaje privado.
Utiliza el botón buscar del foro y te ahorras tiempo para obtener "ayuda".

No estás conectado. Conéctate o registrate

Ver el tema anterior Ver el tema siguiente Ir abajo  Mensaje [Página 1 de 1.]

1 Rellenar celdas Vacias el 18/03/16, 08:15 pm

Nenita


Buenas Tardes
Saludos 
a Todos los de foro y  gracias a Aquellos que me han brindado su ayuda.....


Hoy tengo Otro problemita 

Solicito si alguien me pueda apoyar

con una Macro que  rellene todas las celdas vacías  en este caso de la columna D con el ultimo  Valor 

Para esto es  la macro siguiente :
Código:
Sub C_Relleno()
Dim hoja As Worksheet
Dim UltFila As Long
Dim Rng As Range
  
Set hoja = Sheets("Enero-Febrero 2016")
With hoja
      
    'Encontramos la última fila con valores
    UltFila = .Range("D" & .Rows.Count).End(xlUp).Row
    'creamos el rango
    Set Rng = .Range("D1:D" & UltFila)
End With
  
'formulamos las Celdas en Blanco para que tomen el valor de la celda anterior +1
Rng.SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C"
  
'liberamos las variables de objeto
Set hoja = Nothing
Set Rng = Nothing
End Sub

Sin Embargo  Mi problemita es que necesito que  RELLENE SOLO CUANDO ENCUENTRE VALOR EN COLUMNA A Y D  --- de lo contrario deje de rrellenar y siga buscando hasta que encuentre otra vez valor en ambas celdas -----

Envio el Archivo Como es que debe de Quedar mi archivo Una vez Ejecutada mi macro (las celdas en azul son las que se rellenaron....

Muchas gracias por todo su ayuda ..
Archivos
Foro.xlsx
No tienes los permisos para descargar los archivos.
(13 KB)

2 Re: Rellenar celdas Vacias el 18/03/16, 10:23 pm

Igtelo


Hola Nenita.

Sólo tú te entiendes, subes el archivo con el resultado que quieres, pero no indicas como están tus datos originalmente...

Te Recuerdo algo de recomendaciones para hacer preguntas:

B.- REDACCIÓN DE LA PREGUNTA:
1.- Pensar y redactar lo más claro posible, quien lee la pregunta no está frente a su hoja de cálculo y tampoco conoce su trabajo.
2.- Ser lo más concreto posible, redacciones extensas son poco comprensibles y no dan ganas de leerlas o de plano ni se leen.
3.- Si dicen que hicieron una macro, debe existir en el módulo correspondiente y con explicación.


Saludos
Ignacio Téllez

3 Re: Rellenar celdas Vacias el 20/03/16, 11:12 pm

Igtelo


Se cierra por abandono, norma 5.

Ignacio Téllez

Ver el tema anterior Ver el tema siguiente Volver arriba  Mensaje [Página 1 de 1.]

Permisos de este foro:
No puedes responder a temas en este foro.