Format Cellule en fonction d'une valeur dans une autre cellule
Bonsoir
J'aimerai utiliser une macro qui pourrait me mettre un format dans une colonne
en fonction de la valeur [5120100] trouvé dans une colonne en amont
J'ai cherché sur le net mais je n'ai pas trouvé, le code qui me convient
Pourriez vous m'aider à écrire cette petite macro
je cherche la valeur [51210100] dans la colonne [A] pour mettre la cellule dans la colonne [N] au format
Code:
1 2 3 4 5 6 7 8
|
Sub format()
Range("i3:i100").Select
For Each cell In Selection
Selection.NumberFormat = "0000000000000"
Next cell
End Sub |
Merci d'avance de votre coup de main
Christian
format cellule en fonction ...
Bonsoir,
Ta demande est imprécise.
Tu veux mettre la valeur 51210100 d'une cellule de la colonne A dans quelle cellule de la colonne N et avec quel format ?
Cordialement,
format cellule en fonction
Re....
Est-ce que ceci ne serait pas plus approprié que d'indiquer un format.
Si oui je pense que des connaisseurs trouveront à la simplifier.
A loger sur la feuille concernée.
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13
|
Sub worksheet_change(ByVal target As Range)
If Not Intersect(Columns("i:i"), target) Is Nothing Then
If target.Offset(0, -8) = 51210100 Then
Application.EnableEvents = False
If Len(target.Value) < 13 Then
MsgBox "13 caractères recquis"
target.ClearContents
End If
Application.EnableEvents = True
End If
End If
End Sub |
Cordialement,
format cellule en fonction
Bonsoir,
Pour moi le code proposé marche parfaitement.
Par contre, je ne comprends pas par quelle magie cette "sub MFC()" se comporte exactement comme une macro événementielle.
"MFC" ne semble pourtant pas être un nom réservé qui peut sans altération du résultat être remplacé par "machin".
C'est précisément cette ignorance qui m'avait conduit à proposer plus haut une événementielle plus ou moins bien ficelée, ne voyant pas d'autre possibilité de traiter la question.
Cordialement,
format cellule en fonction
Je ne comprends pas alors l'intérêt du questionneur à vouloir impérativement entrer la condition avec une sub.
En effet, dès le premier passage elle écrira, selon ce que tu dis et ce que j'ai constaté, la condition dans le menu du tableur où elle restera à demeure exactement comme si elle avait été entrée manuellement dans celui-ci.
Je ne vois pas que la modification ultérieure de la condition s'en trouvera facilitée qui ne fera qu'ajouter la nouvelle à l'ancienne.
Enfin c'est son affaire ! J'ai quant à moi appris quelque chose: C'est vraisemblablement une sub inutile.
Cordialement,