Lancer plusieurs Listview les uns après les autres avec une seule macro

C

CHALET53

XLDnaute Barbatruc

• 25 Janvier 2015

• #2

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Bonsoir,

Si tu as 3 macros qui lancent chacune un USF contentant une listview
Tu peux créer une 4ème macro qui appelle les unes à la suite des autres les 3 macros

Sub macro4()
Call macro1
call macro2
call macro3
End Sub

Tu gardes ainsi la possibilté de lancer tes USF individuellement

a+

 

Vote positif 0 Vote négatif

C

Chri8Ed

XLDnaute Occasionnel

• 25 Janvier 2015

• #3

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Bonsoir

J'avais bien pensé à cela, mais le problème c'est que les UserForm ne sont pas lancer les uns après les autres,
Mais tous en même temps !

A+

 

Vote positif 0 Vote négatif

C

CHALET53

XLDnaute Barbatruc

• 26 Janvier 2015

• #4

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Re,

Sans fichier, difficile d'imaginer une solution

a+

 

Vote positif 0 Vote négatif

C

Chri8Ed

XLDnaute Occasionnel

• 26 Janvier 2015

• #5

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Re,

Oui effectivement je comprends
Comme il s'agit d'un très gros fichier
J'ai reconstruit un exemple de mon fichier avec les macros concernées

Voir les boutons User1, User2, User3 et enfin User1-2-3 qui pose problème

A+

 

Pièces jointes

• Exemple de mon fichier.xlsm

  47.7 KB · Affichages: 73
• Exemple de mon fichier.xlsm

  47.7 KB · Affichages: 65
• Exemple de mon fichier.xlsm

  47.7 KB · Affichages: 69

Vote positif 0 Vote négatif

C

CHALET53

XLDnaute Barbatruc

• 26 Janvier 2015

• #6

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Il te pose quoi comme problème le bouton 1 2 3
tu veux quoi comme résultat

a+

 

Vote positif 0 Vote négatif

C

Chri8Ed

XLDnaute Occasionnel

• 26 Janvier 2015

• #7

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Re,

Comme je l'ai dit, les 3 userform s'ouvrent en même temps
Ce que je veux, c'est la même action que si j'ouvre l'User 1, je choisi, je ferme
Puis j'ouvre l'User2, je choisi, je ferme
Puis j'ouvre l'User3, je choisi, je ferme

Cordialement

 

Vote positif 0 Vote négatif

C

CHALET53

XLDnaute Barbatruc

• 26 Janvier 2015

• #8

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Pas sûr d'avoir tout compris

En t'inspirant de ce que j'ai fait pour continuer
click sur User 1-2-3

pour voir

 

Pièces jointes

• Chri8Ed Exemple.xlsm

  63.1 KB · Affichages: 62

Vote positif 0 Vote négatif

C

Chri8Ed

XLDnaute Occasionnel

• 26 Janvier 2015

• #9

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Re,

Non ce n'est pas du tout cela
Les 3 Listview que j'ai mis, sont des versions réduites au maximum
c'était juste pour te montrer le problème de l'ouverture qui n'est pas successive comme je le souhaite.
Mais je ne veux pas changer ces Listview car en fait elles ouvrent d'autres Litview ou d'autres UserForm en cascade

Si ce n'est pas claire, on va prendre un exemple plus parlant
Prends mon exemple que je joins
Tu te mets sur la ligne 25
Tu clique sur User1, tu clique sur Essai
Tu clique sur User2, tu clique sur Bleu
Tu clique sur User3, tu clique sur Espace
Tu obtiens donc la même chose que la ligne 23.

Maintenant, comme je vais faire cela des centaines de fois par moi
Au lieu de cliquer sur User1, puis sur User2, puis sur User3 et ainsi de suite car il y en a d'autres
je souhaiterais cliquer sur un seul bouton
qui lance d'abord le 1er ListView
Puis le 2ème, mais seulement quand l'action sur le 1er est terminé

Je veux aussi manipuler ces ListView individuellement
Car je les utilisent aussi pour modifier une seule cellule , sans modifier les autres cellules sur la même ligne.

A+

 

Pièces jointes

• Exemple de mon fichier.xlsm

  51.4 KB · Affichages: 59
• Exemple de mon fichier.xlsm

  51.4 KB · Affichages: 56
• Exemple de mon fichier.xlsm

  51.4 KB · Affichages: 49

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 26 Janvier 2015

• #10

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

salut

Chri8Ed à dit:

Bonjour à tous

J’ai plusieurs Listview et j’ai donc plusieurs macros pour les lancer
Existe-il un moyen de lancer ces Listview les uns après les autres, tout en gardant la possibilité de les lancer individuellement ?

Je ne suis pas du tout sûr que cela soit possible ! et pourtant...
A+

Cliquez pour agrandir...

les 3 formulaires en ShowModal=True, pour le bouton d'appels successifs :

Code:

sub ...
  U1.show
  U2.show
  U3.show
end sub

ShowModal=False donne la possibilité de les ouvrir simultanément.

Maintenant Si... tu veux les ouvrir un par un mais dans n'importe quel ordre, c'est une autre histoire que CHALET53 a commencé à te raconter ; mais je n'avais lu ton dernier message

 

Dernière édition: 26 Janvier 2015

Vote positif 0 Vote négatif

C

Chri8Ed

XLDnaute Occasionnel

• 26 Janvier 2015

• #11

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Bonjour Si

Mettre le ShowModal en True, c'est bien la bonne solution

Par contre je ne comprends pas ta dernière phrase :

Maintenant Si... tu veux les ouvrir un par un mais dans n'importe quel ordre, c'est une autre histoire que CHALET53 a commencer à te raconter. mais je n'avais lu ton dernier message

Cliquez pour agrandir...

A+

 

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 26 Janvier 2015

• #12

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Re

le modèle que je t'ai proposé implique un ordre d'affichage tandis qu'avec celui de CHALET53 tu peux ouvrir les formulaires à ta guise,par exemple le troisième puis le premier et revenir au troisième.

 

Vote positif 0 Vote négatif

C

CHALET53

XLDnaute Barbatruc

• 26 Janvier 2015

• #13

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Je ne suis pas sûr de comprendre ce que tu veux faire. Toutefois, si, dans la procédure

Private Sub Lv_ItemClick(ByVal li As MSComctlLib.ListItem)

Du premier USF tu ajoutes avant le End Sub (final), l'appel de la procédure suivante : Call Boite

Du second USF tu ajoutes avant le End Sub (final) l'appel de la procédure n°3 : Call Lieu

Cela déclenche l'appel des USF

a+

 

Vote positif 0 Vote négatif

cathodique

XLDnaute Barbatruc

• 26 Janvier 2015

• #14

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

Bonsoir,

excusez mon intrusion. J'ai voulu suivre la discussion mais en ouvrant le fichier du post#5, j'ai eu ce et j'ai dû insérer les listview dans tous les userforms. pourriez-vous me dire pourquoi. j'ai windows7 64 bits et excel2007.

Toutes mes excuses, en vous remerciant.

 

Pièces jointes

• Capture.JPG

  18.1 KB · Affichages: 35
• Capture.JPG

  18.1 KB · Affichages: 38

Vote positif 0 Vote négatif

S

Si...

XLDnaute Barbatruc

• 26 Janvier 2015

• #15

Re : Lancer plusieurs Listview les uns après les autres avec une seule macro

salut

cathodique, cela doit provenir de l'OCX (plus d'une version disponible).

 

Vote positif 0 Vote négatif