XL 2013 Différence entre une entrée manuelle ou automatique grâce au VBA

[degards]

Bonjour à vous !!!

Petite question technique pour vous, est-il possible qu’Excel soit en mesure de savoir si une cellule est remplie suite à un code VBA ou une entrée manuelle. Par exemple, dans ma feuille les cellules A3 à A10 sont remplis des numéros d’employé qui seront au travail, j’ai conçu un code à cet effet. Par contre, comme l’équipe n’est pas complète, il me faut 2 autres employés en temps supplémentaires pour les cellules A11 et A12. Lorsque je vais taper les numéros d’employés dans ces cellules j’aimerais qu’elle deviennent jaune. Est-ce qu’excel est en mesure de faire la différence ? Il peut arrivé que selon l’horaire, les cellules A11 et A12 se remplissent automatiquement car j’ai tout mon personnels.

Merci à l’avance
Degards

 

[Compte Supprimé 979]

Bonjour Degards

Cela n'a rien à voir, on parle ICI de MFC (Mise en Forme Conditionnelle) qui se moque de comment est rentrée la valeur.

A+

 

[degards]

Bonjour Degards

Cela n'a rien à voir, on parle ICI de MFC (Mise en Forme Conditionnelle) qui se moque de comment est rentrée la valeur.

A+

La MFC est-elle en mesure de déterminer si la valeur entrée en A11 et A12 a été faite par un code ou c’est l’utilisateur qui la inscrit manuellement. La MFC je connais bien mais pas de cette façon.

 

[Compte Supprimé 979]

Re,

La MFC n'est là que pour calculer une condition (VRAI/FAUX) donc peut importe si c'est saisi manuellement ou inscrit via un code, le calcul se fera au bout

A+

 

[degards]

Re,

La MFC n'est là que pour calculer une condition (VRAI/FAUX) donc peut importe si c'est saisi manuellement ou inscrit via un code, le calcul se fera au bout

A+

Mais est-ce qu’il y a un moyen par codage d’appliquer ce que je veux faire dans ce cas là

 

[Compte Supprimé 979]

Re,

Navré mais alors je n'ai rien compris à votre demande 🤔

 

[degards]

Re,

La MFC n'est là que pour calculer une condition (VRAI/FAUX) donc peut importe si c'est saisi manuellement ou inscrit via un code, le calcul se fera au bout

A+

Merci quand même, il est vrai que sans fichier c’est un peu plus compliqué de comprendre. Je vais ajouter un fichier sous peu et cela va sûrement aider à recevoir des solutions.

 

[job75]

Bonsoir degards, Bruno,

Pourquoi parler de MFC ? Voyez le fichier joint qui applique les couleurs de fond avec ces codes :

Private Sub Worksheet_Change(ByVal Target As Range)
Set Target = Intersect(Target, [A:A])
If Target Is Nothing Then Exit Sub
Target.Interior.ColorIndex = xlNone 'RAZ
On Error Resume Next 'si aucune SpecialCell
If Target.Count > 1 Then Target.SpecialCells(xlCellTypeConstants).Interior.Color = [D2].Interior.Color _
    Else If Target <> "" Then Target.Interior.Color = [D2].Interior.Color
End Sub

Sub EntreeAutomatique() 'bouton Entrée
Dim Target As Range
ActiveCell.Activate 'si Selection n'est pas un Range
Set Target = Intersect(Selection, [A:A])
If Target Is Nothing Then Exit Sub
Application.EnableEvents = False 'désactive les évènements
Target = Application.RandBetween(1, 1000) 'entrées quelconques
Application.EnableEvents = True 'réactive les évènements
Target.Interior.ColorIndex = xlNone 'RAZ
On Error Resume Next 'si aucune SpecialCell
If Target.Count > 1 Then Target.SpecialCells(xlCellTypeConstants).Interior.Color = [D3].Interior.Color _
    Else If Target <> "" Then Target.Interior.Color = [D3].Interior.Color
End Sub

A+

 

[Compte Supprimé 979]

Salut sieur @job75 😉

Perso quand je peux me passer du VBA je n'hésite pas trop 😜😁