OVH Cloud OVH Cloud

Une présentation sympa

10 réponses
Avatar
DOC Prod
Bonjour =E0 tous,
( =E7a fait un moment que je ne suis pas pass=E9 sur le forum ! ! !
=2E.. =E7a roule ?)

Voila une petite question.

De quelle fa=E7on est il possible de lancer la lecture d'un film par
commande VBA
pour remplacer l'action manuelle sur
CommandBars("Movie").Controls(2)

(sans kernel32 ou ? c'est pour un G5)

Merci.

Ps:une r=E9ponse serait bien aussi pour les autres Controls()
et j'ai d'autres questions =E0 100balles.

10 réponses

Avatar
Emcy
c'est quoi cette barre movie, je ne l'ai pas :
essaies ça :
CommandBars("Movie").Controls(2).execute


"DOC Prod" a écrit dans le message de news:

Bonjour à tous,
( ça fait un moment que je ne suis pas passé sur le forum ! ! !
... ça roule ?)

Voila une petite question.

De quelle façon est il possible de lancer la lecture d'un film par
commande VBA
pour remplacer l'action manuelle sur
CommandBars("Movie").Controls(2)

(sans kernel32 ou ? c'est pour un G5)

Merci.

Ps:une réponse serait bien aussi pour les autres Controls()
et j'ai d'autres questions à 100balles.
Avatar
michdenis
Bonjour Emcy,

| c'est quoi cette barre movie, je ne l'ai pas

G5 : cela fait référence à la dernière évolution d'un MacIntosh


Salutations!


"Emcy" a écrit dans le message de news: em2EjFv$
c'est quoi cette barre movie, je ne l'ai pas :
essaies ça :
CommandBars("Movie").Controls(2).execute


"DOC Prod" a écrit dans le message de news:

Bonjour à tous,
( ça fait un moment que je ne suis pas passé sur le forum ! ! !
... ça roule ?)

Voila une petite question.

De quelle façon est il possible de lancer la lecture d'un film par
commande VBA
pour remplacer l'action manuelle sur
CommandBars("Movie").Controls(2)

(sans kernel32 ou ? c'est pour un G5)

Merci.

Ps:une réponse serait bien aussi pour les autres Controls()
et j'ai d'autres questions à 100balles.
Avatar
DOC Prod
Merci beaucoup Emcy ça marche.
J'ai du passer à côté dans l'aide VBA ???

Pour info la bar "Movie" c'est la barre de gestion des films insérés
sur une feuille de calcul.
Je prog. en VBA sur un Mac G5 ( c'est Apple ).

Pour de l'aide c'est pas facil. Les trucs de PC par routine de
"windows" User(machin) y en a pas...

merci encorerere.
Avatar
Emcy
De rien.
Une petite astuce : lorsque tu veux savoir quelles sont les propriétés et
procédures associées à un objet ( pour ton cas c'est
CommandBars("Movie").Controls(2) ), il suffit de tapez le caractère "." à la
suite de ton objet pour voir apparaitre un menu avec toutes les procédures
et propriétés disponibles.
=> ex : tapes ceci à la main (sans faire de copier/coller)
"CommandBars("Movie").Controls(2).", tu devrais voir apparaitre le menu (ça
marche sur PC)
=> après, il te suffit d'utilisé l'aide d'excel (surligner la commande puis
appuyer sur la touche F1) pour voir à quoi sert et comment utiliser la
commande (si l'aide sur cette procedure est disponible).


"DOC Prod" a écrit dans le message de news:

Merci beaucoup Emcy ça marche.
J'ai du passer à côté dans l'aide VBA ???

Pour info la bar "Movie" c'est la barre de gestion des films insérés
sur une feuille de calcul.
Je prog. en VBA sur un Mac G5 ( c'est Apple ).

Pour de l'aide c'est pas facil. Les trucs de PC par routine de
"windows" User(machin) y en a pas...

merci encorerere.
Avatar
Michel Gaboly
Juste une précision :

Ce que dit Emcy concerne l'immense majorité des utilisateurs de VBA, ma is ce n'est pas vrai pour les versions pour
Macintosh, où aucun élément n'est listé quand on tape le "."

C'est à la fois casse-pied, car il y a + de choses à entrer au clavie r, mais cela oblige + ou - à mémoriser +
d'éléments, ce qui n'est pas forcément un mal : on gagne en autonom ie ; on n'a - besoin de se demnder ce qui est
disponible, et l'explorateur d'objet permet de retrouver rapidement ce qu e l'on ne sait pas ou plus par cœeur.

C'est pourquoi, on voit des utilisateurs sous Windows écrire Me.Textbox 1 : il entre au clavier "Me." etrécupèrent le
complément.

Travaillant sur Mac, j'écris dans les mêmes circonstances Textbox1 ca rle "Me." ne m'apporte rien, au contraire, je
trouve qu'il rend le code - lisible car - concis.

De rien.
Une petite astuce : lorsque tu veux savoir quelles sont les propriété s et
procédures associées à un objet ( pour ton cas c'est
CommandBars("Movie").Controls(2) ), il suffit de tapez le caractère " ." à la
suite de ton objet pour voir apparaitre un menu avec toutes les procé dures
et propriétés disponibles.
=> ex : tapes ceci à la main (sans faire de copier/coller)
"CommandBars("Movie").Controls(2).", tu devrais voir apparaitre le menu (ça
marche sur PC)
=> après, il te suffit d'utilisé l'aide d'excel (surligner la com mande puis
appuyer sur la touche F1) pour voir à quoi sert et comment utiliser l a
commande (si l'aide sur cette procedure est disponible).


"DOC Prod" a écrit dans le message de news:

Merci beaucoup Emcy ça marche.
J'ai du passer à côté dans l'aide VBA ???

Pour info la bar "Movie" c'est la barre de gestion des films inséré s
sur une feuille de calcul.
Je prog. en VBA sur un Mac G5 ( c'est Apple ).

Pour de l'aide c'est pas facil. Les trucs de PC par routine de
"windows" User(machin) y en a pas...

merci encorerere.





--
Cordialement,

Michel Gaboly
www.gaboly.com

Avatar
DOC Prod
Merci pour les coups d'oeuil.
je vais pouvoir continuer de bosser.

D'ici peu il me faudra aléger mes fichiers Excel car avec peu de
fonctioalités le fichier principal compte 10Mo pour à peine 1/5ème
de ce que je désir lui faire traiter. Userform avec ListBox et image
on dirait que ça prend de la place... Mais le rendu devient trés
agréable.
Jusqu'ou Excel et VBA sont ils puissants ?
En attaquant les procédures pour le Web ça devrait le dire.
J'espère que mes propres capacités ne seront pas dépassées(pouf
pouf)
ps: "pouf pouf" il me semble que c'est "lol" pour les
adèptes des Tchats.

ciao. a plus
Avatar
Emcy
10Mo pour du code vba ça me semble un peu gros .... tu n'aurais pas mis des
images par hazard ? moi, j'ai fais une macro avec une quinzaine d'userform
avec plusieurs centaines de lignes de commandes et il faut 700Ko
=> un petit conseil car j'ai une des problemes : definis bien toutes tes
variables (mets option explicit) car en augmenatant la taille de mon code
j'ai eu des bugs

"DOC Prod" a écrit dans le message de news:

Merci pour les coups d'oeuil.
je vais pouvoir continuer de bosser.

D'ici peu il me faudra aléger mes fichiers Excel car avec peu de
fonctioalités le fichier principal compte 10Mo pour à peine 1/5ème
de ce que je désir lui faire traiter. Userform avec ListBox et image
on dirait que ça prend de la place... Mais le rendu devient trés
agréable.
Jusqu'ou Excel et VBA sont ils puissants ?
En attaquant les procédures pour le Web ça devrait le dire.
J'espère que mes propres capacités ne seront pas dépassées(pouf
pouf)
ps: "pouf pouf" il me semble que c'est "lol" pour les
adèptes des Tchats.

ciao. a plus
Avatar
DOC Prod
bonjour

si si il y a des images.
certaine sont enregistrées dans les UserForm, je les passerais en
LoadPicture ça devrais soulager. Mais elles sont primordiales pour un
visuel explicite.

Au fait, pour ce qui est de l'utilisation de Zoom d'un UserForm, tu
connais certainement ?
Il me serait util pour l'utilisation d'écrans de taille
différentes, mais ça devient illisible.
? une boite de dialogue par format d'écran ?

Ps: connais tu un ouvrage clair, pratique et assez complet pour le
petit papa noël VBA.

ciao, a plus
Avatar
Emcy
salut,

pour la resolution
trouvé surhttp://www.info-3000.com/vbvba/index.php :

Private Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As
Long) As Long

Sub AfficherResolution()
Dim Largeur As Integer
Dim Hauteur As Integer

Largeur = GetSystemMetrics(0)
Hauteur = GetSystemMetrics(1)
MsgBox "La résolution de votre écran est de " & Largeur & " par " &
Hauteur
End Sub

=> après il faut que tu dimensionnes tes controles en fonction de la
resolution


"DOC Prod" a écrit dans le message de news:

bonjour

si si il y a des images.
certaine sont enregistrées dans les UserForm, je les passerais en
LoadPicture ça devrais soulager. Mais elles sont primordiales pour un
visuel explicite.

Au fait, pour ce qui est de l'utilisation de Zoom d'un UserForm, tu
connais certainement ?
Il me serait util pour l'utilisation d'écrans de taille
différentes, mais ça devient illisible.
? une boite de dialogue par format d'écran ?

Ps: connais tu un ouvrage clair, pratique et assez complet pour le
petit papa noël VBA.

ciao, a plus
Avatar
DOC Prod
salut Emcy

sympa ton truc il faudra que je l'essai sur le PC.

mais "user 32" c'est du window zzzz
et sur Mac et bien zobi.

Mais au fait que fais tu comme traitements avec tout tes ListBox ?

ciao, a plus