|
|
|
|
Bonjour,
j'ai fait un tableau, où grâce à un code, j'insere des lignes automatiquement.
je souhaiterais dans la 1ere cellule de ces lignes, apparaisse la date du jour.
je sais qu'il faut inserer l'instruction ci-dessous:
Range("A1").Value = Format(Now, "dd.m.yyyy")
Où, "A1" = la cellule qui doit être renseignée avec la date.
Moi, mon code est le suivant:
Sub insere_ligne()
Dim DerLig As Long
Application.ScreenUpdating = False
DerLig = [A65000].End(xlUp).Row
Rows(DerLig & ":" & DerLig).Copy
Rows(DerLig & ":" & DerLig).Insert Shift:=xlDown
Rows(DerLig + 1 & ":" & DerLig + 1).ClearContents
Cells(DerLig + 1, 1).Value = Cells(DerLig, 1).Value + 1
End Sub
Mon problème, c'est que je ne sais pas ou insérer l'instruction pour la date.
Quelqu'un pourrait il m'aider svp?
Merci
Configuration: Windows 2003 Internet Explorer 7.0
Bonjours,
Sub insere_ligne()
Dim DerLig As Long
Application.ScreenUpdating = False
DerLig = [A65000].End(xlUp).Row
Rows(DerLig & ":" & DerLig).Copy
Rows(DerLig & ":" & DerLig).Insert Shift:=xlDown
Rows(DerLig + 1 & ":" & DerLig + 1).ClearContents
Cells(DerLig + 1, 1).Value = Cells(DerLig, 1).Value + 1
Range("A" & DerLig).Value = Format(Now, "dd.m.yyyy")
End Sub
la théorie et la pratique c'est la même chose...enfin en théorie |
Calc macro insertion ligne Conversion date jour Ecrire date jour php Excel macro supprimer lignes vides Inserer date jour dans macro Inserer des dates dans des cellules excel Insertion ligne dans excel avec macro somme Insertion ligne supplémentaire dans excel avec macro directement Insertion ligne verticale vbscript Insérer la date du jour dans un formulaire php Macro excel comparer 2 feuilles pour insérer lignes Macro excel mise a jour graphique automatique Macro excel vba "insérer la date du jour" Macro excel vba date du jour Macro supprimer ligne dans feuille protégée Macro supprimer lignes vides Recuperer date jour batch Sed insérer ligne
