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

[RESOLU]Afficher boite de dialogues : Autres couleurs

C

Compte Supprimé 979

Guest
Bonsoir à toutes et à tous

Est-ce que quelqu'un connait la syntaxe à utiliser en VBA pour afficher
la boite de dialogue de l'outil : Couleur de remplissage -> Autres couleurs

Je souhaite récupérer la valeur de la couleur sélectionner pour l'appliquer à une cellule

Voir boite de dialogue ci-jointe

D'avance merci
 

Pièces jointes

  • ScreenShot153.jpg
    23.1 KB · Affichages: 167
Dernière modification par un modérateur:

TooFatBoy

XLDnaute Barbatruc
Bonjour,

la discussion est ancienne mais toujours pas résolu visiblement
Pourtant :
En fait le problème est que je pensais avoir trouvé la solution, en fait ce n'était pas le cas.
Du coup j'ai retiré le [RESOLU]

Et maintenant que la solution est réellement trouvée, je le remet

D'ailleurs je ne pensais pas qu'on pouvait utiliser la boîte de dialogue de choix de couleur dans une macro, mais je viens de tester et ça marche super bien !
 

dysorthographie

XLDnaute Accro
Bonjour,
puisque nous partons dans l'archéologie!
VB:
Public Property Get GetColor() As OLE_COLOR
With CreateObject("MSComDlg.CommonDialog")
    .CancelError = True
    On Error Resume Next
    .ShowColor
    If Err Then
       GetColor = -1
    Else
       GetColor = .Color
    End If
    On Error GoTo 0
End With
End Property
Sub test()
Debug.Print GetColor
End Sub
 

Discussions similaires

Réponses
12
Affichages
621
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…