Forums Últimos mensajes - Powered by IBM
 

Excel Funcion HOY() no se modifique automaticamente

26/05/2006 - 21:57 por darcom1 | Informe spam
hol
tengo un problema en exce
estoy usando la funcion HOY() para que ingres
automaticamente la fecha en una celda(B) cuando ingrese
modifique algun otra(A o B)

a1 b2 b
dato dato2 fech
dato dato2 fech
dato dato2 fech

uso algunas condiciones para que aparesca en blanco l
fecha en caso de no tener datos en la col A o
el problema es que al momento de modificar cualquie
linea se modifican todas las fechas que esten en l
columna b

si tienes alguna idea te lo agradesco de anteman
cualquier ayuda mandame un mail porfavo
darcom1@yahoo.co
saludo

_________________________________________________

darcom1

Ver este tema: http://www.softwaremix.net/viewtopic-519267.htm

Enviado desde http://www.softwaremix.net
 

Leer las respuestas

#1 KL
27/05/2006 - 10:21 | Informe spam
Hola darcom1,

No puedes hacerlo de esta manera - las formulas por su naturalleza no son estaticas y la funcion HOY() es encima volatil. Al igual que el concepto HOY es relativo, el valor devuelto por la formula =HOY() lo es tambien. Para que la fecha te quede estatica debes introducir una constante - no una formula (con condiciones o sin).

Op1: Entrada manual

- selecciona la celda en cuestion
- pulsa la siguiente combinacion de teclas: {CTRL}+{;} (control + punto y coma)

Op2: Entrada por macro

Si explicas el arreglo de tu hoja y las condiciones para insertar las fechas intentaremos proponer algun codigo. En vias de mientras podrias probar lo siguiente:

con la hoja en cuestion activada...
- haz clic derecho sobre el nombre de la hoja (en una de las pestanas de la parte de abajo de la ventana de Excel)
- elige la opcion 'Ver codigo...' para abrir el Ediotor VBA
- una vez en el Ediotor VBA, pega el siguiente codigo en la ventana mas grande a la drecha:

'Inicio codigo--
Private Sub Worksheet_Change(ByVal Target As Range)
Dim rng As Range, c As Range
On Error Resume Next
Set rng = Intersect(Target, [A:A])
On Error GoTo 0
If rng Is Nothing Then Exit Sub
For Each c In rng
c.Offset(, 1) = Now
' sustituye "Now" por "Date" si solo quieres la fecha
Next c
[B:B].EntireColumn.AutoFit
End Sub
'Fin codigo--

- pulsa las teclas {Alt}+{F11} para volver a la hoja
- prueba modificar los datos en la columna [A]

Saludos,
KL


"darcom1" wrote in message news:

hola
tengo un problema en excel
estoy usando la funcion HOY() para que ingrese
automaticamente la fecha en una celda(B) cuando ingrese o
modifique algun otra(A o B).

a1 b2 b3
dato dato2 fecha
dato dato2 fecha
dato dato2 fecha

uso algunas condiciones para que aparesca en blanco la
fecha en caso de no tener datos en la col A o B
el problema es que al momento de modificar cualquier
linea se modifican todas las fechas que esten en la
columna b.

si tienes alguna idea te lo agradesco de antemano
cualquier ayuda mandame un mail porfavor

saludos

__________________________________________________


darcom1


Ver este tema: http://www.softwaremix.net/viewtopic-519267.html

Enviado desde http://www.softwaremix.net


Preguntas similares