lire la dernière cellule remplie

[JJ]

Bonsoir,
J'ai un tableau excel et une macro.
n colonne 3 j'ai un horodatage (jj/mm/aaaa hh:mm:ss)
Je voudrais rajouter un test VBA à ma macro qui lise la dernière cellule col 3 de mon fichier (date la plus ancienne), lise la col 3 ligne 2 (date la plus récente)pour faire la différence entre ces 2 dates , pour me donner le nombre de jours écoulés entre ces 2 dates (format nombre).
Est ce difficile à écrire?
merci et bonne soirée
JJ

 

[Manu45]

Voir fichier joint : ca peut marcher, faut essayer ! [file name=Classeur1_20060221174428.zip size=6236]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Classeur1_20060221174428.zip[/file]

 

[Hervé]

Bonsoir jj

peut etre comme ceci :

Sub Bouton1_QuandClic()
Dim premierjour As Date
Dim dernierjour As Date

premierjour = CLng(Range('c2'))
dernierjour = CLng(Range('c65536').End(xlUp).Rows)

MsgBox dernierjour - premierjour & ' jour(s)'
End Sub

salut

edition : salut manu

Message édité par: hervé, à: 21/02/2006 17:45

 

[JJ]

Bonsoir au Forum
Merci à vous 2, je vais tester les lignes de macro.
Toutefois , en lisant la solution d'Hervé, je voudrais que le nombre de jours soit aussi dans une variable, car apres je l'utiliserai dans une division pour établir une moyenne.
Encore merci
JJ

 

[Hervé]

re jj, manu

comme ca jj :

Sub Bouton1_QuandClic()
Dim premierjour As Long
Dim dernierjour As Long
Dim jour As Integer

premierjour = CLng(Range('c2'))
dernierjour = CLng(Range('c65536').End(xlUp).Rows)

jour = dernierjour - premierjour
End Sub

salut

 

[JJ]

Bonjour et merci beaucoup de votre aide.
Petite question: existe t il un moyen de 'verouiller' un résultat lié à une formule de calcul.
Dans cette macro par ex je calcule la variable jour (issue de la col 3)
Un peu plus loin la macro remet a 0 certaines colonnes dont la 3 !
Obligatoirement, ma variable jour passe à 0 faussant ma moyenne dans ma stat.

Peut on verouiller une valeur calculée en début de macro pour qu'elle soit 'figée ?
merci
Bonne journée