Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Face caché de la cellule

Créer une discussion

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire

activeforce

XLDnaute Occasionnel
Bonjour,

Est il possible d'avoir une valeur arrondi et en cliquant sur cette cellule d'avoir la valeur exacte.
Ci- joint le classeur1, la cellule K8 a une valeur arrondie de 25kg. Est il possible en cliquant sur cette cellule d'avoir la valeur exacte à un chiffre prés cad 25.2 kg.
Ainsi lorsque je clique sur une autre cellule la valeur redevient à sa valeur initiale soit 25kg.

Merci d'avance.
 

Pièces jointes

Trier par date Trier par votes
Re : Face caché de la cellule

Bonjour,

Un petit essai avec ce code (placvé dans le code de la feuille):
Code: 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$K$8" And Target.Count = 1 Then
    Target.NumberFormat = "General"
Else
    Range("K8").NumberFormat = "###"" kg"""
End If
End Sub

Bonne journée,

mth
 
Vote positif 0 Vote négatif
Re : Face caché de la cellule

Oui mais si je fais un copier coller sur une autre cellule l'application ne se fait pas.
Comment puis je faire pour conserver cette appllication pour toute le cellules quand je voudrais faire un copier / coller.
Merci.
 
Vote positif 0 Vote négatif
Re : Face caché de la cellule

re,

Dans ce cas, si tu travailles sur la même feuille, essaie en remplaçant ceci

If Target.Address = "$K$8"

par un truc du genre

If Not Intersect(target, [ta plage de cellules]) Is Nothing

Bonne journée,

mth
 
Vote positif 0 Vote négatif
Re : Face caché de la cellule

je tappe :
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Columns(K)) Is Nothing Then
Target.NumberFormat = "General"
Else
Range("K8").NumberFormat = "###"" kg"""
End If
End Sub
pourtant ça ne marche pas.
 
Vote positif 0 Vote négatif
Re : Face caché de la cellule

Bonjour à tous,
Salut Mimi,

Activeforce : si tu appliques le format 0" kg" à ta colonne K, tu verras dans la cellule 25 kg et 25.2 dans la barre de formule.

Bisous ++ à Mimi
A+ à tous
 
Vote positif 0 Vote négatif
Re : Face caché de la cellule

re,

Essaie comme ceci, il faut aussi modifier la cellule K8:

Code: 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Columns("K:K")) Is Nothing Then
Target.NumberFormat = "General"
Else
Columns("K:K").NumberFormat = "###"" kg"""
End If
End Sub

@ +

mth

Edit: Hello JC 🙂 🙂 🙂
Plein de bises et à bientôt 🙂
m
 
Vote positif 0 Vote négatif
Re : Face caché de la cellule

Ce qui est bizarre c'est que le format se remet automatiquement sur standard.
Cela fait que quand je veux le copier pour le mettre sur un classeur différent ça ne marche plus.
Aussi un copier / coller est impossible à faire de la cellule.
Je clique sur la valeur est le résultat est figé, ci-joint le fichier pour une meilleure compréhension.

Merci.
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Face caché de la cellule

re,

Dans ton nouveau fichier, les données se trouvent en colonne O et pas en colonne K comme tout à l'heure, il suffit de modifier,
Code: 
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Columns("O:O")) Is Nothing Then
Target.NumberFormat = "General"
Else
Columns("O:O").NumberFormat = "###"" kg"""
End If
End Sub

Si tu copies tes données dans un autre classeur et que tu veux y retrouver le même fonctionnement, il faut que cet autre autre classeur possède la code adapté dans la feuille où tu colles les données, si non ça ne se fera pas tout seul.

@ +

mth
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Face caché de la cellule

activeforce à dit:
Aussi quand je selectionne une ligne cela change mes formats de cellule.
Cliquez pour agrandir...

Normal, dans le post 2 de cette discussion j'avais mis ceci comme condition:
.... And Target.Count = 1 Then

il faut la conserver afin qu'une sélection multiple n'affecte pas tout le tableau.

Si non, au lieu de
Target.NumberFormat = "General"

tu peux mettre
Columns("O:O").NumberFormat = "General"
(mais moins bien je trouve)

Cordialement,

mth
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Face caché de la cellule

re,

En reprenant un post ci-dessus:


un copier coller d'une cellule ne fait rien, il faut le code VBA.

Cdt,

mth
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

A
  • Question Question
XL 2021 Comment préserver la première valeur d'une cellule uniquement si
2 3
Réponses
34
Affichages
2 K
Alamyr
A
E
  • Question Question
Microsoft 365 Changement valeur de cellule en cliquant sur une autre cellule
Réponses
3
Affichages
220
Dudu2
K
  • Résolu(e)
XL 2010 Roulement automatique
Réponses
9
Affichages
358
komarlehomard
K
B
  • Résolu(e)
Microsoft 365 Valeurs plages de cellules
Réponses
2
Affichages
200
BOILEAU
B
W
  • Résolu(e)
XL 2019 Colorer la partie d'entêtes d'un pavé de cellules selon clic-doit sur une cellule interne
Réponses
5
Affichages
564
Nicolas JACQUIN
S
  • Résolu(e)
Autres Problème avec sélection d'une cellule puis glisser
Réponses
2
Affichages
253
SPARKLETOF
S
R
  • Question Question
XL 2019 Paramètres de la fonction GRANDE.VALEUR
Réponses
8
Affichages
458
Hamid FLISSI
M
  • Résolu(e)
XL 2021 Récupérer la valeur d’une cellule dans un classeur fermé
Réponses
5
Affichages
353
patricktoulon
V
  • Question Question
XL 2019 encore besoin de votre aide pour SOMMEPROD
Réponses
3
Affichages
243
vincentast
V
A
  • Résolu(e)
Microsoft 365 Modifier la couleur de fond d'une cellule lorsque l'on clique dessus
Réponses
14
Affichages
1 K
Alain 79
A
T
  • Résolu(e)
XL 2010 VBA - Insérer image proportionnelle à la taille de la cellule
Réponses
8
Affichages
371
job75
M
  • Résolu(e)
XL 2010 Ressortir uniquement les nombres de la musique d'une course hippique
Réponses
5
Affichages
422
mamarus1
M
  • Question Question
XL 2019 format de cellule
Réponses
2
Affichages
144
pascal21
F
  • Question Question
Autres Récupération de données d'une feuille X en fonction de la valeur de cellule dans une collone d'une feuille Y
2
Réponses
27
Affichages
1 K
fanfan38
P
  • Résolu(e)
XL pour MAC Problème de changement de couleur de la valeur d'une cellule
Réponses
2
Affichages
578
pvander
P
M
  • Résolu(e)
XL 2021 Automatisation de la randomisation des cellules d'une colonne
3 4 5
Réponses
61
Affichages
3 K
Dranreb
N
  • Question Question
Microsoft 365 Tableau calcul entre deux dates
Réponses
1
Affichages
399
job75
D
  • Résolu(e)
Microsoft 365 VBA Déplacement de la cellule active dans une ligne sélectionnée
Réponses
11
Affichages
537
danielco
D
B
  • Question Question
XL 2016 Ramener une plage de données en fonction d'une cellule
Réponses
11
Affichages
724
JHA
J
M
  • Question Question
XL 2021 Colorer avec condition de temps
2
Réponses
29
Affichages
1 K
matlatarte
M
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…