Discussion :

[juju1988]

Bonjour,

Pour faire court mes utilisateurs utilisent mon fichier en le copiant, or quand ils le copient cela ne copie pas également les modules de mon fichier ainsi que ce qu'il y a derrière ThisWorkbook.
Pour pallier à ça, pour les modules je les ai tous intégrer à la feuille en question, cependant comme faire pour ma fonction :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Workbook_Open()
    Set wbkAnalyse = ThisWorkbook
    Set shAnalyse = wbkAnalyse.Sheets("contrôle arrivage-final")
    Call recupNumCmdTtt
End Sub

Existe t-il un Worksheet_Open() ?
J'ai essayé de le placer derrière ma feuille mais évidemment ce n'est pas appelé à l'ouverture du fichier.

C'est donc ma question comment puis je initialisé mes variables et appeler ma procédure à l'ouverture de mon fichier mais sans passer par Workbook_Open() ??

Si vous avez des questions complémentaires n'hésitez pas je n'ai peut être pas été assez claire...

Merci d'avance

[mercatog]

Bonjour

Pour faire court mes utilisateurs utilisent mon fichier en le copiant, or quand ils le copient cela ne copie pas également les modules de mon fichier ainsi que ce qu'il y a derrière ThisWorkbook.

Étrange, comment se fait cette copie?
Tu es en excel 2003, c'est ça?

[juju1988]

Oui 2003 ou 2007.
En fait ils cliquent droit sur l'onglet de ma feuille et font déplacer ou copier. Malheureusement mes modules et mon code Workbook ne se copient pas... du coup je dois trouver une solution pour faire ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
Private Sub Workbook_Open()
    Set wbkAnalyse = ThisWorkbook
    Set shAnalyse = wbkAnalyse.Sheets("contrôle arrivage-final")
    Call recupNumCmdTtt
End Sub

Mais pas avec workbook_open ...
J'ai pensé à

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Worksheet_Activate()
    Set wbkAnalyse = ThisWorkbook
    Set shAnalyse = wbkAnalyse.Sheets("contrôle arrivage-final")
    Call recupNumCmdTtt
End Sub

Mais pour ça il faudrait que mon classeur s'ouvre par défaut sur une autre feuille est ce possible?

[mercatog]

Entre copier la feuille et copier le fichier, certes il y a nuance. (copie du fichier et du projet vba en entier)
il fallait copier tout le fichier et l'enregistrer en xlsm pour le 2007.

[juju1988]

Le problème c'est qu'ils ne veulent copier que la feuille pour l'insérer à des documents existants...

[mercatog]

Copier ton fichier et lui insérer leurs feuilles existantes. (l'opération inverse)