Comment supprimer les valeur 0 sur une ligne

merci d avoir répondu voila ce que je veux excuse moi .
dans chaque cellule il y a des chiffre ex . A1 chiffre 7, B1 le chiffre 36, C1 le chiffre 0, D1 chiffre 14 , e1le chiffre 0 comment arriver a que sa soie 7-36-14- dans l'ordre
pas comme trier du plus petit au plus grand ex 7-14-36 sa je ne veux pas
comment retirer les 0 et la cellule qui ce trouve avec le 0
bien a toi luky

SUPEIMER LA CELULLE QUI CE TROUVER AVEC LE 0

bonjour OUI UNE VBA mais comment faire car ces des formule = changer en coller en value
bien a toi luky

Bonjour,

Voilà une VBA comme tu dis, qui te supprimes les cellule à zéro dans la plage sélectionnée.

Public Sub concat() 'concatener en supprimant les cellules sans valeur
Dim lig As Long, col As Integer, nbs As Long
With Selection      ' page sélectionnée
    If .Cells.Count < 2 Then MsgBox "Pas de sélection de plage": Exit Sub
    For lig = 1 To .Rows.Count
        For col = .Cells(lig, Columns.Count).End(xlToLeft).Column To 1 Step -1
            If .Cells(lig, col).Value = 0 Then .Cells(lig, col).Delete xlShiftToLeft: nbs = nbs + 1
        Next col
    Next lig
End With
MsgBox nbs & " cellules supprimées"
End Sub

bonjour
un grand merci sa fonctionne bien
je peux te demander autre chose
luky

Bonjour,

Pas de souci en espérant que l'on se comprenne plus facilement.