> Tous les forums > Forum Bureautique
 Texte en tougeSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
Gorfous
  Posté le 13/09/2017 @ 08:11 
Aller en bas de la page 
Petit astucien

Bonjour le forum,

Je cherche comment par un double click dans une cellule (uniquement dans la colonne F) mettre le texte de cette cellule en rouge.

En vous remerciant et en vous souhaitant une bonne journée.

Publicité
prosper34
 Posté le 13/09/2017 à 18:15 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

dans quel office : msoffice, openoffice, libroffice ? word ou excel ?

on sélectionne la cellule et ensuite couleur de police mais pas de double click.

Gorfous
 Posté le 14/09/2017 à 13:06 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour prosper,

Je te remercie mais ce n'est pas ce que je veux.

Je suis avec xl 2003

prosper34
 Posté le 14/09/2017 à 17:58 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

alors explique-toi mieux mais pour moi la fonction n'existe pas

Gorfous
 Posté le 15/09/2017 à 08:36 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Dans la colonne F j'ai des dates couleur de police noir

Je voudrai que par double clic la couleur de police passe en rouge

Si nouveau double clic elle redevienne en noir.

Que ça n'agisse que sur la colonne F

prosper34
 Posté le 15/09/2017 à 08:45 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

ce ne serait possible que par une macro très compliquée pour une manip facile en 2/3 clicks, et hors de mes compétences.

gilbert_rgi
 Posté le 15/09/2017 à 09:36 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

Gorfous a écrit :

Dans la colonne F j'ai des dates couleur de police noir

Je voudrai que par double clic la couleur de police passe en rouge

Si nouveau double clic elle redevienne en noir.

Que ça n'agisse que sur la colonne F

Salut Gorfous

dans le module de la feuille tu mets ceci

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Not Application.Intersect(Target, Range("F:F")) Is Nothing Then

cellule = Target.Address

changecouleur

Cancel = True

End If

End Sub

et dans un module standard tu mets ça

Option Explicit

Public cellule As String

Sub changecouleur()

If Range(cellule).Font.ColorIndex = 3 Then

Range(cellule).Font.ColorIndex = 1

Else

Range(cellule).Font.ColorIndex = 3

End If

End Sub

Gorfous
 Posté le 15/09/2017 à 23:32 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour gilbert,

Mes remerciements et salutations cher ami.

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !

Sujets relatifs
Modifier les marges d'un texte
Séparer du texte dans cellule
Extraction chaine de texte
sous Excel, inverser ordre du texte
Pb Traitement de texte ATLANTIS
comment récuper texte dans pps
Perte d'un texte sur Libre office
afficher valeur texte si croix case (non vide)
CENTRER UN TEXTE DANS UNE PAGE
Sauvegarder un texte à intervalles réguliers
Plus de sujets relatifs à Texte en touge
 > Tous les forums > Forum Bureautique