XL 2010 Résolu par Chris, Lone-Wolf et DoubleZéro : msgbox : affichage et temps de fermeture

Usine à gaz · 1 Janvier 2017

Bonjour à toutes et à tous,

Tout d'abord, je vous souhaite une très belle année pleine de bonheur et de réussite pour vous et ceux que vous aimez.

En ce 1er janvier, je m'en remets déjà à vous LOL,

Ce n'est pas bloquant, mais j'aimerais distinguer mes affichages msgbox en deux catégories :
1 - affichage bloquant avec clic sur ok ou "oui ou non",
2 - affichage informatif sans le bouton ok avec fermeture automatique.

C'est le 2 qui que pose un petit problème
est-il possible ? :
- de réduire le temps (dans le fichier joint 1 seconde) à 0.5,
- qu'il n'y ait pas le OK dans le msgbox.

Malgré mes recherches et essais, je n'y suis pas arrivé.
Il semblerait, d'après mes visites sur le net, qu'il n'y aurait pas d'autre possibilité que de passer par un UserForm et ça, je ne sais pas faire.
Si on peut l'éviter, je préfèrerais mais sans autre solution, je prends LOL

Je joins un fichier test.
Avec mes remerciements,
Bonne journée à toutes et à tous,
Amicalement,
Lionel,

Usine à gaz · 1 Janvier 2017

Merci Chris
Bon apéro

Usine à gaz · 1 Janvier 2017

C'est tout bon,
Merci Chris
Merci Lone d'avoir été là
Amicalement,
Lionel,

Lone-wolf · 1 Janvier 2017

Re Lionel

Heiiii!!! Et pis moi alors!!

Lone-wolf · 1 Janvier 2017

Chris, Chris attend!!!

J'ai un formulaire avec listbox qui prend le numéro de ligne. En cliquand sur l'index, j'aimerais supprimer la ligne en se basant sur le numéro de ligne et non la valeur.Tu pourrais, s'il-te-plaît, corriger le code. Merci infiniment.

Usine à gaz · 1 Janvier 2017

Re Lone,

j'ai pas bien compris comment fonctionne ton fichier mais j'ai le fichier en pièce jointe.
j'espère que ça pourra t'aider

Lone-wolf · 1 Janvier 2017

Re Lionel

une V3

Usine à gaz · 1 Janvier 2017

J'ai aussi celui-là .... j'en cherche d'autres

Usine à gaz · 1 Janvier 2017

Lone-wolf à dit:
Re Lionel

une V3

Je regarde ... Merci Lone sympa et efficace

Usine à gaz · 1 Janvier 2017

Lone-wolf à dit:
Re Lionel

Heiiii!!! Et pis moi alors!!

Lol, j'avais pas vu mais j'ai vu ensuite ( d'ailleurs tu as peut-être vu le titre modifié.

Usine à gaz · 1 Janvier 2017

Lone-wolf à dit:
Chris, Chris attend!!!

J'ai un formulaire avec listbox qui prend le numéro de ligne. En cliquand sur l'index, j'aimerais supprimer la ligne en se basant sur le numéro de ligne et non la valeur.Tu pourrais, s'il-te-plaît, corriger le code. Merci infiniment.

J'ai trouvé ce code également :

Code:

'supprimer la ligne dont la cellule en colonne C est identique à ce qu'il y a dans la textbox5 lorsque je clique sur le bouton 36
Sub Bouton36_Cliquer()
Dim rng As Range
Dim tx As String
    If Sheets("Accueil").TextBox5 = "" Then Exit Sub
    tx = Sheets("Accueil").TextBox5.Value
    Do
      Set rng = Sheets("Données").Range("C:C").Find(what:=tx, LookIn:=xlValues, lookat:=xlWhole)
      If rng Is Nothing Then
        Exit Do
      Else
        Sheets("Données").Rows(rng.Row).Delete
      End If
    Loop
End Sub

Lone-wolf · 1 Janvier 2017

Re Lionel

Merci pour ton implication, mais comme expliqué avant, c'est d'après le numéro de ligne (exemple: Rows 4 - 7 - 11) de la listbox, que la macro doit supprimer la ou les lignes que j'ai choisi.

Chris24 · 1 Janvier 2017

Bonjour lone-wolf

Je va z'au cinéma, si personne n'est passé par ici ou par là je regarderai à mon retour

Bonne journée

DoubleZero · 1 Janvier 2017

Bonjour et Heureuse Ânée à toutes et à tous,

arthour973 à dit:
...est-il possible ? :
- de réduire le temps (dans le fichier joint 1 seconde) à 0.5,
- qu'il n'y ait pas le OK dans le msgbox...

Une autre suggestion en pièce jointe.

A tôtbien

Usine à gaz · 1 Janvier 2017

Bonjour DoubleZéro,
Merci de m'avoir répondu,
Je vous souhaite une très belle nouvelle année
Je teste.
Amicalement,
Lionel,

Usine à gaz · 1 Janvier 2017

Re DoubleZero,

Elle me plait bien cette version sans userForm et pourtant toutes mes recherches disent que ce n'est pas possible sans UserForm.
C'est donc magique.
J'ai un tout petit souci.
J'aimerais que le msgbox s'affiche centré dans l'écran.
Je n'arrive pas à trouver comment faire.
Merci pour cette version
A la maison : c'est sans modération LOL
Amicalement,
Lionel,

XL 2010 Résolu par Chris, Lone-Wolf et DoubleZéro : msgbox : affichage et temps de fermeture

Usine à gaz

XLDnaute Barbatruc

Pièces jointes

Usine à gaz

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Lone-wolf

XLDnaute Barbatruc

Lone-wolf

XLDnaute Barbatruc

Pièces jointes

Usine à gaz

XLDnaute Barbatruc

Pièces jointes

Lone-wolf

XLDnaute Barbatruc

Pièces jointes

Usine à gaz

XLDnaute Barbatruc

Pièces jointes

Usine à gaz

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Lone-wolf

XLDnaute Barbatruc

Chris24

XLDnaute Impliqué

DoubleZero

XLDnaute Barbatruc

Pièces jointes

Usine à gaz

XLDnaute Barbatruc

Usine à gaz

XLDnaute Barbatruc

Discussions similaires