lire la dernière cellule remplie

JJ · 21 Février 2006

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 · 21 Février 2006

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é · 21 Février 2006

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 · 21 Février 2006

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é · 21 Février 2006

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 · 22 Février 2006

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

lire la dernière cellule remplie

JJ

Guest

Manu45

XLDnaute Nouveau

Pièces jointes

Hervé

XLDnaute Barbatruc

JJ

Guest

Hervé

XLDnaute Barbatruc

JJ

Guest

Discussions similaires