Como hacer para que me ponga una celda cuando otras estan vacias

[lphant]

Buenos días;

A ver quien me puede dar una idea de cómo puedo hacer lo siguiente;

Necesito que en la columna de situación aparezca el titulo de las columnas, el titulo de la columna que debe de aparecer tiene que ser el siguiente vació después de la fecha o lo que es lo mismo la primera celda vacía de la fila, es complicado expirarlo con el Excel creo que lo veréis mejor.

Se podría hacer algo??

121126.xls

[Toldeman]

Hola.

Prueba esta formula:

=SI(CONTARA(A2:K2)=11;"";INDIRECTO(DIRECCION(1;CONTARA(A2:K2)+1)))

Un saludo.

[Antoni]

Hola:

Yo solo se hacer macros.

121126 MA.xls

[katheryn]

HolA:

Puedes intentar con el siguiente codigo.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

Dim columna, fila, filas As Integer


'obtenemos la cantidad de filas en la tabla

filas = Worksheets("Hoja1").Range("A2").End(xlDown).Row


'recorremos las filas iniciando en la fila 2 ya que la primera es de titulos

For fila = 2 To filas

    'obtenemos la columna en donde esta situada nuestra ultima celda con datos

    columna = Worksheets("Hoja1").Range("A" & fila).End(xlToRight).Column

    'si el nombre de la columna con la primera celda vacia es situacion entonces

    If Cells(1, columna + 1).Value = Cells(1, 12).Value Then

        'dejamos en blanco

        Range("L" & fila).Value = ""

        'no le asignamos color

        Range("L" & fila).Interior.ColorIndex = xlColorIndexNone

        'de lo contrario

    Else

        'en la columna situacion colocaremos el nombre de la columna con la primera celda vacia

        Range("L" & fila).Value = Cells(1, columna + 1).Value

        'coloreamos la celda con el color de la columna con la primera celda vacia

        Range("L" & fila).Interior.ColorIndex = Cells(1, columna + 1).Interior.ColorIndex

    End If

'avanzamos a la siguiente fila

Next fila


End Sub

[/CODE]

De cualkier modo. te dejo el archivo modificado y trabajando..

espero esto soluciones tu problema

121126 -modificado.xls

[lphant]

Muchas gracias a los 3.

He probado de las 3 formas que me a veis comentado, con la formula todo perfecto, lo único que el macro da como mas rapidez al no tener que estar escribiendo la formula cuando modifico una celda que tuviera formula.

Pero los macros no me terminan de funcionar bien.

En el de Macro Antonio si meto datos diferentes ( copiando ) o borro mas de un dato ( a la vez ) no se actualiza, solo se actualiza si voy de uno en uno, en cambio con la katheryn si que actualiza cuando copio datos o borro mas de uno a la vez, pero me da un fallo ( 1004 ) cuando borro los datos de las columnas A o B.

Una pregunta por curiosidad, tengo un Excel repleto de formulas por todos los lados y va muy lento, ahí alguna forma de pasar las formulas a macro??.

Muchas gracias a los 3.

Un saludo,

[vladief]

Hola a todos

Iphat, si la formula que te proporciono Toldeman te va perfecto y respondiendo a tu ultima pregunta, entonces propongo esta solución insertando formulas con macros.

Para grabar el código de una formula:

[TABLE=width: 295]

[TR]

[TD=width: 295]- Enciende la grabadora de macros.[/TD]

[/TR]

[TR]

[TD]- Selecciona la celda que contenga la formula.[/TD]

[/TR]

[TR]

[TD]- Presiona la tecla F2 y luego presiona Enter.[/TD]

[/TR]

[TR]

[TD]- Apaga la grabadora de macros.[/TD]

[/TR]

[TR]

[TD][/TD]

[/TR]

[TR]

[TD]Para ver el codigo de la formula grabada presiona ALT + F11[/TD]

[/TR]

[TR]

[TD][/TD]

[/TR]

[TR]

[TD]Revisa el código adjunto en el archivo adjunto para mayor comprensión.[/TD]

[/TR]

[/TABLE]

Saludos a todos.

121126 VEF.xls