MACRO Couper une ligne et déplacer

Bonjour,

Je recherche une macro, pour couper une cellule aprè le (:) et copier dans la cellule suivante.

Merci

Bonjour,

Une proposition

Sub Scinder()
Dim Cel As Range
    With Worksheets("Feuil1")
        For Each Cel In .Range("A1:A" & .Range("A" & Rows.Count).End(xlUp).Row)
            Cel.Offset(0, 1).Value = Split(Cel, ":")(0)
            Cel.Offset(0, 2).Value = Split(Cel, ":")(1)
        Next Cel
    End With
End Sub

A+

Bonjour frangy ,

Super boulot.

Merci

Une petite question.

Connaîtrais tu un site qui explique les variables d'excel, comme la variable Split?

Merci

Tu peux commencer par les cours d’initiation à VBA.

Un exemple :

https://www.excel-pratique.com/fr/vba.php

Ensuite, tu trouveras de nombreux sites pour répondre à des questions plus spécifiques.

Un exemple pour la fonction SPLIT:

https://www.excel-pratique.com/fr/vba/tableaux_vba_suite.php

A+

Bonjour frangy,

Super , je vais fouiller dans ce site, c'est une vraie mine d'or.

Merci très sincèrement