OVH Cloud OVH Cloud

DialogSheet ? Un peu d'aide merci

13 réponses
Avatar
Excel...lent
Bonsoir la communauté,

Ci-joint ICI : http://cjoint.com/?lBxunMeP4G

Un petit exemple de ce que je souhaiterais.

Tous les boutons de commande des DialogSheet fonctionnent avec des petites
macros.

J'ai juste un problème avec les boutons " RETOUR " pour lesquels j'ai fait
aussi des petits codes qui plante
avec le message suivant :

erreur d'exécution '1004' la méthode Show de la
classe DialogSheet a échoué

Quand je vais au débogage cela me met en surbrillance jaune :

Pour le code Diag2ret() ----> DialogSheets("Diag1").Show
Pour le code Diag3ret() ----> DialogSheets("Diag2").Show

Où est ce que je me suis planté s'il vous plaît ?

Merci de votre aide.

Cordialement.

Excel...lent

N'oubliez pas votre lampe à huile et votre casque et descendez dans ces
mines d'or
pour des explorations fructueuses :
http://www.excelabo.net/
http://frederic.sigonneau.free.fr
http://dj.joss.free.fr/
http://jacxl.free.fr
http://www.cathyastuce.com/excel.htm

3 réponses

1 2
Avatar
Excel...lent
Re bonjour,

OOUUUPPPS ! ! !

Quel fainéant je fais !

Alors pour la question 2 j'ai la réponse --> T'AS QU'A ESSAYER HE PATATE ! !
!

C'est que je viens de faire et ça marche. Tu avais tout prévu mais tu
voulais que je
cherche un peu... lol

Merci encore.

Cordialement.

Excel...lent

N'oubliez pas votre lampe à huile et votre casque et descendez dans ces
mines d'or
pour des explorations fructueuses :
http://www.excelabo.net/
http://frederic.sigonneau.free.fr
http://dj.joss.free.fr/
http://jacxl.free.fr
http://www.cathyastuce.com/excel.htm
Avatar
Alain CROS
Bonjour,

C'est le même principe.
Ajouter un bouton sur Diag1.
Lui affecter la macro Diag1Imprime.

Sub Diag1Imprime()
Diag1close
Application.OnTime Now + TimeSerial(0, 0, 0.1), "ImprimeDiag1"
End Sub
Sub ImprimeDiag1()
DialogSheets("Diag1").PrintOut
Diag1
End Sub

Alain CROS

"Excel...lent" a écrit dans le message de news:
| Re bonjour,
|
| OOUUUPPPS ! ! !
|
| Quel fainéant je fais !
|
| Alors pour la question 2 j'ai la réponse --> T'AS QU'A ESSAYER HE PATATE ! !
| !
|
| C'est que je viens de faire et ça marche. Tu avais tout prévu mais tu
| voulais que je
| cherche un peu... lol
|
| Merci encore.
|
| Cordialement.
|
| Excel...lent
|
| N'oubliez pas votre lampe à huile et votre casque et descendez dans ces
| mines d'or
| pour des explorations fructueuses :
| http://www.excelabo.net/
| http://frederic.sigonneau.free.fr
| http://dj.joss.free.fr/
| http://jacxl.free.fr
| http://www.cathyastuce.com/excel.htm
|
|
Avatar
Excel...lent
Bonsoir Alain,

Ca fonctionne.

Mais est-il possible de revenir sur la DialogSheet que j'imprime plutôt que
la Diag1 à la fin de l'impression ?

Merci beaucoup pour tes conseils avises.

Cordialement.

Excel...lent

N'oubliez pas votre lampe à huile et votre casque et descendez dans ces
mines d'or
pour des explorations fructueuses :
http://www.excelabo.net/
http://frederic.sigonneau.free.fr
http://dj.joss.free.fr/
http://jacxl.free.fr
http://www.cathyastuce.com/excel.htm
1 2