Discussion :

[Didpa]

Bonjour

Voilà j'ai une macro qui s'exécute dès l'ouverture du fichier. Ce fichier est en réseau donc il s'ouvre sur plusieurs ordinateurs. J'aimerais que quand je l'ouvre sur le miens pour faire des modifications "Private Sub Workbook_Open", reconnaisse l'ordi (avec le nom de l'ordi peut être) et ne lance pas la macro de démarrage.
Est ce que c'est possible ???

Cordialement

Didier

[EngueEngue]

Oui: Plutot reconnaitre l'username, un petit if dans ton wb_open et fini

Code :

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

environ("username")

[mayekeul]

bonjour,

plutôt

Code :

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

environ("computername")

;o)

[Didpa]

Merci pour ta réponse mais cela ne fonctionne pas. Voilà ce que j'ai essayer mais mon userform continue de s'ouvrir au démarage.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Private Sub Workbook_Open()
Call Effacer
Call Aujourdhui
Call Trier
 
If Environ("Didier") = True Then
Exit Sub
Else
Pointeuse.Show
End If
 
End Sub

[mayekeul]

ce que tu dois faire c'est plutot

Code :

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

if environ("computername")="Didier" then ...

ou si tu préfére tester le nom de l'utilisateur

Code :

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

if environ("username")="Didier" then ...

[Invité]

Code :

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

If environ("username")="Didier" then

[Didpa]

Merci a toi mayekeul cela fonctionne.

Cordialement

[Invité]

mayekeul,
tu as appuyé le premier sur le buser, à question pour un champion,tu te serais retrouvé dans le métro avec une encyclopédie de 20 Kg dans la main!