Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Re : "Case Is = "Facile": Selection.Interior.ColorIndex = 3
Re,
Est ce que quelqu'un serait modifier une de ces formule ci-dessus pour pouvoir utiliser du texte à la place des chiffres, pour utiliser facile à la place de 1, etc.
Merci.
A+
Re : "Case Is = "Facile": Selection.Interior.ColorIndex = 3
Re Hasco,
Ta dernière formulation est impressionnante! :eek:
Je ne sais pas si un jour j'arriverai à écrire des trucs comme ça.
A+
Re : "Case Is = "Facile": Selection.Interior.ColorIndex = 3
Re,
En faite je veux utiliser des écritures à la place des chiffres, c'est à dire facile à la place de 1, moyen à la place de 2 et dur à la place de 3. Alors j'ai essayé :
Private Sub Worksheet_Change(ByVal Target As Range)
Dim...
Re : "Case Is = "Facile": Selection.Interior.ColorIndex = 3
Salut tototiti2008,
Je pense que le problème ne viens pas de cette partie du code mais j'ai quand même essayé au cas où. :D
Cdt
Re : "Case Is = "Facile": Selection.Interior.ColorIndex = 3
Re,
Voici un fichier joint pour que vous puissiez mieux comprendre et essayer des trucs si ça vous dit.
Merci à vous.
A+
Re : "Case Is = "Facile": Selection.Interior.ColorIndex = 3
Salut Hasco et Papou-net,
Merci pour vos proposition.
Celle de Hasco bloque et indique qu'il maque une référence et celle de Papou-net ne bloque pas mais ne fonctionne pas. Par contre celle de Papou-net fonctionne lorsque ce n'est...
Salut à tous,
La première partie de ma macro fonctionne mais pas la deuxième. La deuxième partie ne fonctionne plus depuis que j'ai changé "Case Is = 1" en "Case Is = "Facile"" ...
Est ce que quelqu'un sait pourquoi? Je pensais que c'était c'était possible ou alors j'ai fais une erreur de...
Re : Langage VBA : si 2 cellules de la plage... = ... alors ...
Re,
Excuse Roger, ça fonctionne, je m'étais trompé en faite.
Merci à tous et Hasco, les 2 fonctionne parfaitement.
A+tard
Re : Langage VBA : si 2 cellules de la plage... = ... alors ...
Salut Roger,
J'ai essayé mais apparemment ça ne fonctionne pas.
Merci d'avoir tenté de résoudre se mystère :p
Bonjour,
Quelqu'un serait-il exprimer en langage VBA la chose suivante :
Si 2 cellules de la plage A1 à A4 est égale à 3 alors la cellule B1 est verte.
Pour l'instant j'en suis à :
If 2 Cells In Range ("A1:14") = 3 Then Range("B1").Interior.ColorIndex = 4
Mais ça ne fonctionne...
Re : Macro pour ajouter, dans une cellule, du texte à du texte déjà présent.
Salut Eric et Phlaurent,
Je n'avais pas essayé tout ça, c'est trop cool. Merci
A plus.
Bonjour à tous,
Une petite question pour les professionnels du VBA :
Est-il possible d'ajouter du texte dans une cellule, par le biais d'une macro, tout en gardant du texte déjà présent. Par exemple, ajouter "Monsieur" à une cellule contenant "Bonjour" de façon à avoir "Bonjour Monsieur"...
La macro bug, j'ai l'impression que c'est parce qu'elle fait tourner en rond (à la suite) les 2 boucles For-Next, voici la macro :
Private Sub Worksheet_Change(ByVal Target As Range)
ChartObjects(1).Activate
For i = 3 To 9
ActiveChart.SeriesCollection(1).DataLabels(i -...
Re : Pb : mettre 2 macro sur la même feuille
J'obtiens le message suivant lorsque j'utilise la macro :
Erreur d'exécution...:
Impossible d'obtenir la propriété Count de la classe DataLabels.
Re : Pb : mettre 2 macro sur la même feuille
Lorsque je met les 2 macro à la suite avec "End" entre les 2 et sans mettre "Private..." la deuxième fois, la 2ème macro ne fonctionne pas (elle ne se met pas en route).
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.