** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Otros de Microsoft: Windows y Office > Excel
  Mensajes nuevos Mensajes nuevos RSS - Cambiar valores en celdas
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoCambiar valores en celdas

 Responder Responder
Autor
Mensaje
javierse Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 04/Julio/2009
Localización: España
Estado: Sin conexión
Puntos: 0
Enlace directo a este mensaje Tema: Cambiar valores en celdas
    Enviado: 21/Enero/2010 a las 10:32
Hola chicos :
 
Lo cierto es que soy un novatillo en los temas de Visual en excel. Me manejo algo en Access, pero no en Excel. Me gustaría que al introducir un valor en la celda A2, se añadieran la fecha B2 y Hora C2 actual en estas celdas, y que se haga sin formula, para mantener los datos.
 
Bueno espero no estar pidiendo demasiado, y muchísimas gracias por vuestra colaboración.
 
Un Saludo
JavierSE
javierse
Arriba
Coco Ver desplegable
Colaborador
Colaborador


Unido: 02/Febrero/2005
Localización: España
Estado: Sin conexión
Puntos: 2718
Enlace directo a este mensaje Enviado: 21/Enero/2010 a las 10:43
Hola!
 
pon este código en la hoja en cuestión, pero ojo, si cambias el contenido de la celda cambiarán la fecha y hora
 
Private Sub Worksheet_Change(ByVal Target As Range)
If Not IsEmpty(Target) Then
   If Target.Address = "$A$2" Then
      ActiveSheet.Range("B2") = Date
      ActiveSheet.Range("C2") = Time
   End If
End If
End Sub


Editado por Coco - 21/Enero/2010 a las 10:43
Saludos
Arriba
javierse Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 04/Julio/2009
Localización: España
Estado: Sin conexión
Puntos: 0
Enlace directo a este mensaje Enviado: 21/Enero/2010 a las 11:02

Muchísimas gracias coco :

 
Lo estoy probando pero no me funciona, le echo un vistacillo a ver que es lo que se me escapa.
 
Muchísimas gracias
JAVIERSE
javierse
Arriba
Jordi-Albert Ver desplegable
Colaborador
Colaborador
Avatar

Unido: 06/Abril/2006
Localización: Alemania
Estado: Sin conexión
Puntos: 4317
Enlace directo a este mensaje Enviado: 21/Enero/2010 a las 11:57
Vigila javier....
tal y como te indica coco, debes poner la funcion en la hoja... no en thisWorkBook o en un módulo genérico
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable