Contenu récent par Valtrase

Bonjour à tous, Malheureusement, je ne pense pas que cela soit possible, sur un label, ou une EditBox. Peut être avec une usine à gaz, et des images, mais est-ce bien raisonnable. Windows contrairement à Androîde pour ne pas le citer, a des standards, et il est normal de s'y conformer, sinon...

Bonjour, Le seul problème que je peux voir c'est si le classeur est ouvert avec une version Web d'Excel, Ne pas oublier non plus que le ruban fonctionne avec des Callbacks donc du VBA, donc autorisations et tout le tintouin.

Bonsoir à tous, Qu'entendez-vous par là ?

Pourtant tout à l'air bon. Que dis le compilateur quand vous compillez le projet Menu débogage/Compiler VBAProject ?

C'est une feuille que j'ai ajouté au projet elle me sert à stocker le Handle du ruban en cas de perte, pendant les tests et autres. Contrairement à certains, je regroupe toutes les actions du ruban par type de contrôle, et pour éviter de surcharger mon module de Callbacks je crée des procédures...

Bonjour à tous, Patrick à mon avis c'est pas ce qu'il demande. Philippe, Qui à parlé de décompresser le classeur ? Il faut bien lire les énoncés ouvrir l'archive cela donne un truc dans le genre... Ensuite c'est comme dans l'explorateur le fichier xml est dans le répertoire customUI Voici le...

Bonjour, Ok c'est parti... On ferme le classeur clic droit sur le classeur Sélectionner ouvrir l'archive (il faut avoir 7Zip ou autre installé) On sélectionne le dossier customUI On sélectionne le fichier customUI* et on le dépose sur le bureau On ouvre le fichier le début du fichier ressemble...

Bonjour à tous, Pas testé mais peut-être avec le propriété Split jumelée avec FreezePanes

Re, Peut-être que cela dépend de la vélocité du PC : Sur le mien I7 16Go je n'ai aucun problème. Option Explicit Private Sub CheckBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) With CheckBox1 If X > 2 And X < .Width - 2 And Y >...

Bonjour à tous Un autre solution simple est d'obliger à tester la position du curseur : Private Sub CheckBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) With CheckBox1 If X > 2 And X < .Width - 2 And Y > 2 And Y < .Height - 2...

Bonjour, Il faut jouer sur la méthode Mousse Move de la case à cocher et du formulaire...

Je ne l'ai pas noté car un peu plus compliqué à utiliser par un novice. Pas de WysiWyg, il faut bien connaître le xml. Copy d'écran de l'assistant Ruban :

Bonjour à tous, Oui pour un novice cela peut paraître un peu compliqué. Voici quand même quelques liens pour la gestion du ruban : Ruban : gestion de l'interface Ruban : gestion des Callbacks Et aussi des utilitaires pour la création ou modification du ruban : Gestion avec Access...

Re, Oupss... c'est de ma faute change comme ceci : Set entireRange = Plage.Resize(, LastColumn - Plage.Column + 1)

Bonjour à tous, Peut-être avec une petite fonction ? Dans le module du formulaire tu colles et adapte ce code : Private Sub UserForm_Initialize() Me.ComboBox1.List = FillList() End Sub Private Function FillList(Optional ByVal Plage As Range, Optional ByVal Sh As Excel.Worksheet) As Variant...