Résultats de la recherche

Bonjour à tous, Très bonne année à tous ! J'aurais un problème à vous soumettre : en vba, comment séparer une chaine de caractère alphanumérique qui ne renferme pas toujours un caractère particulier (pas toujours d'espace dans ce cas). Par exemple : 12.0 mm ou 65m ou 855l ou 1250g/dm...

Bonjour à tous, Je poursuis mon apprentissage... J'ai encore une question... Avec le fichier créé par Pierre ci-joint, est-il possible d'utiliser la molette de la souris pour faire défiler les lignes, une fois que le scrollbar a été sélectionné ? Je sais que c'est possible avec une combobox, une...

Bonjour à tous, Je ne pensais pas que ce point me poserait problème, j'ai eu tort. Dans le fichier joint, j'essaie de modifier la couleur de la bordure de l'image selon la valeur de la checkbox1. Si la checkbox1 = true alors la bordure de l'image devient rouge sinon elle reste noire. Ce point...

Bonjour à tous, Dans un userform, j'ai une textbox nommée TBNombre pour laquelle je force la saisie numérique. J'utilise à cette fin, le code suivant : Private Sub TBNombre_Change() If InStr("0123456789", Right(Me.TBNombre, 1)) = 0 Then Me.TBNombre = Left(Me.TBNombre...

Bonjour à tous, Je travaille toujours sur le fichier que m'avait gentiment proposé Tatiak. J'ai besoin d'afficher l'userform en non modal afin de laisser la possibilité à l'utilisateur d'ouvrir des fichiers excel supplémentaires. Malheureusement, dans ce cas, la propriété mousemove n'est plus...

Bonjour, Mon fichier contient un tableau que j'alimente via un userform de saisie. Aucun problème de ce côté là. mon tableau peut contenir de nombreuses lignes et donc être réparti su plusieurs pages. J'aimerais pouvoir ajouter la ligne d'en-tête en début de chaque page mais uniquement pour les...

Bonjour à tous Je ne pensais pas autant m'arracher les cheveux sur cette question, mais c'est pourtant la cas. Voici mon problème : j'ai une combobox pour laquelle je dois limiter la saisie à la liste renseignée (initialisée dans l'Userform_Initialize) sauf si le choix dans la liste est "Ajout"...

Bonjour, Dans la feuille "Création", j'aimerais suivre les changements dans le texte saisie dans les colonnes B à D. Pour cela, j'ai dupliqué mon tableau 100 colonnes plus loin. Ensuite en cas de modification (c'est à dire un texte différent pas simplement une resaisie du même texte), je...

Bonjour à tous, J'ai besoin à nouveau de vos conseils... Voilà, j'essaie actuellement de développer un fichier "Création" dont le but est de: 1. constituer une liste de participants 2. créer un fichier nominatif de chaque participant sélectionné dans la liste. Ce fichier est une copie d'un...

Bonsoir à tous, Le code ci-dessous fonctionne parfaitement pour trier des listboxes, le seul soucis c'est qu'il impose que toutes les lignes de la colonne triée soient remplies... Ce qui n'est évidement pas le cas pour l'une des colonnes de ma listbox... Est-il possible d'ajouter cette condition...

Bonjour Dans le fichier joint se trouve un userform contenant un dtpicker et un bouton. Le bouton permet de passer du français à l'anglais (le français étant la langue par défaut). Je ne sais absolument pas comment gérer les formats de date spécifiques à ces 2 langues. Si l'un d'entre vous a...

Bonjour à tous, Est-il possible d'enregistrer sur son disque dur un fichier excel inséré en tant qu'objet dans un autre fichier excel? Dans le fichier joint "Source", j'aurais aimé savoir s'il était possible d'enregistrer sur mon bureau le fichier "Template" inséré dans la feuille 2. Le but...

Bonjour, J'utilise l'excellent fichier de tototiti2008 permettant de gérer les codes vba , le seul "défaut" de cet excellent fichier apparait lorsque le nombre de noeuds devient important (et que le scrollbar apparait). En effet, dans ce cas, si l'on souhaite déplacer un item, le scrollbar reste...

Bonjour, Est-il possible d'ajouter une image en filigrane et ce, sous conditions ? Par ex., dans le fichier joint, si la cellule A1 contient le mot Fleur, mettre la photo en filigrane, sinon la masquer. Merci mille fois de votre aide, Amicalement

Bonjour à tous, Est-il possible de modifier le caption d'un label lors de son survol uniquement ? Pour l'instant, j'arrive à changer le caption lors du survol mais je ne parviens pas à revenir à l'état initial... Private Sub Label1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer...

Bonjour à tous, J'aurais besoin de vos conseils avisés... J'aimerais créer un fichier qui me permettrait de suivre les mouvements du personnel et les restructurations. L'entreprise est constituée de différents départements : ici DepA, DepB et DepC. Chacun de ces départements est lui même divisé...

Bonjour à tous, J'ai un soucis avec une macro et j'aurais besoin de vos conseils... J'ai écrit une macro qui me permet de : 1. filtrer les données non vides de la colonne Y du tableau1 présent dans la feuille 1 de mon classeur 2. une fois filtrée, les cellules de cette feuille1 sont copiées vers...

Bonjour, J'aimerais empêcher le clic sur la barre de titre de l'userform. J'utilise le code suivant : Private Sub UserForm_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal x As Single, ByVal y As Single) Dim MonCurseur As point If x < 10 Or y < 10 Or x > Me.Width - 10 Or y >...

Bonjour, J’ai lu tous les posts relatifs au redimensionnement des userforms. Les codes fournis sont très bien, mais je me rends compte que ma demande est différente… Mon userform devrait être affiché en grand (bouton agrandir et non pas en plein écran) et surtout s’adapter à tous les écrans...

Bonjour à tous, J'ajoute souvent des images aux boutons de mes userforms et un détail me gêne... Ne peut-on pas harmoniser la position de l'image et du texte pour tous les boutons ? En effet, l'image peut se retrouver au centre ou totalement à gauche selon la taille du texte du bouton... Je...