Insertion données VBA

[TTOU]

Bonjours à tous
alors voilà le problème du jour😀

colonne A
12/08/10
15/08/10
19/08/10
..

je voudrais (en vba) insérer une date qui se trouve en b1, par ex: 17/08/10

Ben voilà...merci d'avance les amis😉

 

[phlaurent55]

Re : Insertion données VBA

Bonjour TTOU,

avec ceci:

Sub Macro1()
Cells(Range("A65535").End(xlUp).Row + 1, 1) = [B1]
End Sub

à+
Philippe

 

[skoobi]

Re : Insertion données VBA

Bonjour Ttou,

sur la même ligne?
dans ce cas:

Sub Macro1()
    Range("B1").Cut
    Range("A1").Insert Shift:=xlDown
End Sub

Edit: bonsoir Philippe

 

[TTOU]

Re : Insertion données VBA

Alors plus de précisions s'impose:
je voudrais que la date qui ce trouve en b1 soit insérer dans la colonne a, au bon endroit bien sur 😛 c'est à dire dans l'exemple entre le 15/08 et le 19/08.
Et j'avais oublié de préciser, sans utiliser la fonction de tri😱

 

[phlaurent55]

Re : Insertion données VBA

Re,

Et j'avais oublié de préciser, sans utiliser la fonction de tri😱

ce serait pourtant plus commode
y a-t'il une bonne raison de ne pas vouloir l'utiliser ?

Cells(Range("A65535").End(xlUp).Row + 1, 1) = [B1]
Range("A1:A" & Range("A65535").End(xlUp).Row).Select
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortTextAsNumbers

à+
Philippe

 

[TTOU]

Re : Insertion données VBA

Oui effectivement il y a une raison, dans cette colonne A, il y a des cellules vide pour séparer plusieurs mois , donc si on fait un tri.....baah tous les mois sont à suivre et on voit plus rien😛

 

[phlaurent55]

Re : Insertion données VBA

Re,

Alors plus de précisions s'impose:
je voudrais que la date qui ce trouve en b1 soit insérer dans la colonne a, au bon endroit bien sur 😛 c'est à dire dans l'exemple entre le 15/08 et le 19/08.
Et j'avais oublié de préciser, sans utiliser la fonction de tri😱

Pourrais-tu préciser :

l'endroit de destination est-il vide avant insertion de ce qui se trouve en B1 ?

ou alors, faudra-t'il d'abord insérer une ligne avant d'y mettre quelque chose

si tu pouvais mettre un exemple en pièce jointe .......................


à+
Philippe