Macro pour faire du transpose automatiquement

Question

Bonjour, 
Pouvez vous m'aider SVP a faire une macro qui permettrai de choisir les lignes  entre deux date et de faire un copier et les coller en les transposant front of la 1er date?

26/06/2013
18:47:16 	
16:49:54 	
16:48:58 	
16:48:22 	
16:16:32 	
13:49:25 	
12:47:08 	
10:01:13 	
09:28:22 	
08:52:12 	
27/06/2013	
19:32:12 	
16:42:21 	
16:28:26 	
13:51:07 	
12:49:15 	
09:52:55 	
09:31:23 	
08:59:31 	
26/06/2013	
18:37:40 	
16:51:34 	
16:29:04 	
13:54:10 	
12:47:39 	
11:16:59 	


Configuration: Windows 7 / Chrome 27.0.1453.116

Frenchie83 · Answer

Bonjour

"une macro qui permettrai de choisir les lignes entre deux date "
Aucun programme ne pourra choisir les lignes pour vous

Par contre, après avoir sélectionnée une zone à transposer, exécuter le code sujvant
Bonjour Sub Transpose()
    Application.ScreenUpdating = False
    ZoneSelectionnee = Selection.Address
    Range(ZoneSelectionnee).Copy
    Do While ActiveCell.Value <= 1
        ActiveCell.Offset(-1, 0).Select
    Loop
    ActiveCell.Offset(0, 1).Select
    Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, SkipBlanks:=False, Transpose:=True
End Sub

les lignes seront recopiées à côté de la date début de la zone sélectionnée

cdlt

Macro pour faire du transpose automatiquement

1 réponse

Discussions similaires

Newsletters