XL pour MAC Format conditionnel

[candido57]

Bonjour,
Je voudrait insérer une X si la cellule n’est pas vide .
Par exemple dans la cellule A1 est saisir 50 ou autre chose, il faudrait mettre une X automatiquement dans la cellule F1.

Merci d’avance pour vos réponses.

 

[Staple1600]

Bonjour @candido57 , le fil

Je voudrait insérer une X si la cellule n’est pas vide .

Et nous nous voudrions voir toujours un petit Bonjour commencer une discussion... 🙄
(comme le stipule la charte du forum depuis une palanquée d'années désormais)

Sinon plein d'exemples dans les archives du forum, relatifs à ta question
(là aussi voir la charte du forum, qui conseille une petite recherche avant de poser sa question)

 

[candido57]

Oui vous avez raison , excusez moi

 

[candido57]

Voila j’ai modifier ma demande en rajoutant bonjour

 

[Staple1600]

Re,

Une possibilité par formule
En F1
=SI($A1<>"";"X";"")
puis recopie vers le bas

 

[Staple1600]

@candido57

Une version plus esthétique
(par macro)
(à mettre dans le code de la feuille concernée)

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Columns(1)) Is Nothing Then
    If Not IsEmpty(Target) Then
        If Target.Count = 1 Then
        With Target.Offset(, 5)
            .Value = "X"
            .Font.Bold = -1
            .BorderAround ColorIndex:=3, Weight:=xlThick
            .HorizontalAlignment = xlCenter
        End With
        End If
    End If
End If
End Sub

 

[candido57]

Ok ça fonctionne.

Merci beaucoup

 

[Staple1600]

Re

@candido57
Tu parles de la formule ou du code VBA ?