Contenu récent par youguybass

Merci pour votre retour slts

Bonjour Je cherche a avoir une validation de données en fonction d'une table ... voir le fichier joint En faisant évoluer le 'Ø corps' en case D21, je souhaiterai avoir un liste déroulante en D23 me proposant juste les valeurs d'entête 3/4/5/8 s'il y a un "1" dans la matrice par exemple : pour...

Merci pour votre retour Slts

Bonjour Dans un Userforme comment faire pour contrôler la position du curseur et déclancher un code par la suite ... J'ai essayé par setfocus mais cela ne marche pas If Textbox1.setfocus= true then ... End if Merci d'avance Slts

en le faisant cela ça agrandi légèrement l'affichage générale, Cela ne le fais qu'une seule fois une fois en allant et revenant sur cet USF ... c'est peut-etre la solution

Je reviens vers vous PatrickToulon L'intégration c'est bien passée, mais j'ai un petit pb en fait mon fichier a plusieurs USF qui reviennent automatiquement de l'un a l'autre Quand je fait cette manip de l'un à la taille des textes diminue à chaque fois que je reviens sur le USF principal j'ai...

Merci Pat Merci Patrick Cela fonctionne bien . Merci pour le temps passé Cordialement Guillaume

Je n'y arrive pas !!!!!!!!!! J'ai essayé votre code PatrickToulon mais l'ajustement ne se fait pas.:rolleyes: Dim hwnd& hwnd = ExecuteExcel4Macro("CALL(""user32"",""GetActiveWindow"",""JCC"")") 'api GetActiveWindow Capture du handle de la fenetre active ExecuteExcel4Macro...

Je pense que le zoom auto de Patrick Toulon devrait m'alerter. Je testerai dans la journée. Slts

Bonjour et merci mais mon code (PJ) fonctionne mieux sur mon poste . Je ne veux pas que l'on ait accès à la croix de fermeture. Avec le code de Jurassik, le bas du userform n'apparait pas completement. Dim hWnd As Long, exLong As Long, zFactor As Integer hWnd = FindWindowA(vbNullString...

Bonjour C'est un fichier Excel avec Vba pour la gestion de mon service. Slts

Ça coince toujours Pour le moment j'ai ajouté des boutons zoom + et zoom - sur le userform afin de le faire varier en fonction de l'écran

Merci bien mais ... Ce code fonctionne sur mon poste mais Je viens de tester sur le portable de mon patron et cela ne fonctionne pas, l'ajustage ne se fait pas

Bonjour tt le monde Je cherche à ouvrir un userform en plein écran quelque soit la taille de l'écran, naturellement c'est un fichier partagé ! Sur mon poste aucun soucis mais sur des écrans + petit cela ne marche pas. J'ai comme code: Option Explicit Private Declare PtrSafe Function FindWindowA...

J'ai intégré votre code a mon fichier et celui-ci marche également;) Merci