Bonjour à tous,
J'ai crée 1 bouton dans une feuille à l'aide de la Boite à outils Contrôle.
Son rôle est de publier la feuille dans un intranet.
Je croyais élégant de rendre ce bouton invisible le temps de cette
publication.
Ensuite le classeur est partagé, puis est introduit dans le réseau avec les
propriétés de partage et de sécurité adaptées aux utilisateurs.
Sur mon poste tout fonctionne.
Mais quand ce classeur est mis dans le réseau et que d'autres utilisateurs
essaient de s'en servir, le bouton a disparu.
Je récupère donc ledit classeur pour constater que le bouton est
effectivement invisible, y compris sur mon poste.
Il ne redevient visible que lorsque j'active le mode création de la boite à
outils contrôle.
Pouvez-vous m'expliquer ce tour SVP?
Voici le code attaché au bouton:
Private Sub BoutonPublier_Click()
BoutonPublier.Visible = False
With ActiveWorkbook.PublishObjects("Programme")
.Filename = "\\intranet\Yes\Reunion.htm"
.Publish (False)
End With
ChDir "\\\intranet\Yes"
BoutonPublier.Visible = True
End Sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
michdenis
Voir autre ficelle plus bas !
Salutations!
"ManBas" a écrit dans le message de news: % Bonjour à tous, J'ai crée 1 bouton dans une feuille à l'aide de la Boite à outils Contrôle. Son rôle est de publier la feuille dans un intranet. Je croyais élégant de rendre ce bouton invisible le temps de cette publication. Ensuite le classeur est partagé, puis est introduit dans le réseau avec les propriétés de partage et de sécurité adaptées aux utilisateurs. Sur mon poste tout fonctionne. Mais quand ce classeur est mis dans le réseau et que d'autres utilisateurs essaient de s'en servir, le bouton a disparu. Je récupère donc ledit classeur pour constater que le bouton est effectivement invisible, y compris sur mon poste. Il ne redevient visible que lorsque j'active le mode création de la boite à outils contrôle. Pouvez-vous m'expliquer ce tour SVP?
Voici le code attaché au bouton: Private Sub BoutonPublier_Click() BoutonPublier.Visible = False With ActiveWorkbook.PublishObjects("Programme") .Filename = "intranetYesReunion.htm" .Publish (False) End With ChDir "intranetYes" BoutonPublier.Visible = True End Sub
Merci +++ d'avance
Voir autre ficelle plus bas !
Salutations!
"ManBas" <nonospam-j.ragni@wanadoo.fr> a écrit dans le message de news: %233KtqST7FHA.1484@tk2msftngp13.phx.gbl...
Bonjour à tous,
J'ai crée 1 bouton dans une feuille à l'aide de la Boite à outils Contrôle.
Son rôle est de publier la feuille dans un intranet.
Je croyais élégant de rendre ce bouton invisible le temps de cette
publication.
Ensuite le classeur est partagé, puis est introduit dans le réseau avec les
propriétés de partage et de sécurité adaptées aux utilisateurs.
Sur mon poste tout fonctionne.
Mais quand ce classeur est mis dans le réseau et que d'autres utilisateurs
essaient de s'en servir, le bouton a disparu.
Je récupère donc ledit classeur pour constater que le bouton est
effectivement invisible, y compris sur mon poste.
Il ne redevient visible que lorsque j'active le mode création de la boite à
outils contrôle.
Pouvez-vous m'expliquer ce tour SVP?
Voici le code attaché au bouton:
Private Sub BoutonPublier_Click()
BoutonPublier.Visible = False
With ActiveWorkbook.PublishObjects("Programme")
.Filename = "\intranetYesReunion.htm"
.Publish (False)
End With
ChDir "\intranetYes"
BoutonPublier.Visible = True
End Sub
"ManBas" a écrit dans le message de news: % Bonjour à tous, J'ai crée 1 bouton dans une feuille à l'aide de la Boite à outils Contrôle. Son rôle est de publier la feuille dans un intranet. Je croyais élégant de rendre ce bouton invisible le temps de cette publication. Ensuite le classeur est partagé, puis est introduit dans le réseau avec les propriétés de partage et de sécurité adaptées aux utilisateurs. Sur mon poste tout fonctionne. Mais quand ce classeur est mis dans le réseau et que d'autres utilisateurs essaient de s'en servir, le bouton a disparu. Je récupère donc ledit classeur pour constater que le bouton est effectivement invisible, y compris sur mon poste. Il ne redevient visible que lorsque j'active le mode création de la boite à outils contrôle. Pouvez-vous m'expliquer ce tour SVP?
Voici le code attaché au bouton: Private Sub BoutonPublier_Click() BoutonPublier.Visible = False With ActiveWorkbook.PublishObjects("Programme") .Filename = "intranetYesReunion.htm" .Publish (False) End With ChDir "intranetYes" BoutonPublier.Visible = True End Sub
Merci +++ d'avance
ManBas
J'au vu la ficelle de Deuballiz. Est-ce celle-là? Oui mon classeur est protégé. Mais la protection inclu le bouton, non?
"michdenis" a écrit dans le message de news:
Voir autre ficelle plus bas !
Salutations!
"ManBas" a écrit dans le message de news: % Bonjour à tous, J'ai crée 1 bouton dans une feuille à l'aide de la Boite à outils Contrôle. Son rôle est de publier la feuille dans un intranet. Je croyais élégant de rendre ce bouton invisible le temps de cette publication. Ensuite le classeur est partagé, puis est introduit dans le réseau avec les propriétés de partage et de sécurité adaptées aux utilisateurs. Sur mon poste tout fonctionne. Mais quand ce classeur est mis dans le réseau et que d'autres utilisateurs essaient de s'en servir, le bouton a disparu. Je récupère donc ledit classeur pour constater que le bouton est effectivement invisible, y compris sur mon poste. Il ne redevient visible que lorsque j'active le mode création de la boite à outils contrôle. Pouvez-vous m'expliquer ce tour SVP?
Voici le code attaché au bouton: Private Sub BoutonPublier_Click() BoutonPublier.Visible = False With ActiveWorkbook.PublishObjects("Programme") .Filename = "intranetYesReunion.htm" .Publish (False) End With ChDir "intranetYes" BoutonPublier.Visible = True End Sub
Merci +++ d'avance
J'au vu la ficelle de Deuballiz. Est-ce celle-là?
Oui mon classeur est protégé.
Mais la protection inclu le bouton, non?
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
uVj2GdW7FHA.4076@tk2msftngp13.phx.gbl...
Voir autre ficelle plus bas !
Salutations!
"ManBas" <nonospam-j.ragni@wanadoo.fr> a écrit dans le message de news:
%233KtqST7FHA.1484@tk2msftngp13.phx.gbl...
Bonjour à tous,
J'ai crée 1 bouton dans une feuille à l'aide de la Boite à outils
Contrôle.
Son rôle est de publier la feuille dans un intranet.
Je croyais élégant de rendre ce bouton invisible le temps de cette
publication.
Ensuite le classeur est partagé, puis est introduit dans le réseau avec
les
propriétés de partage et de sécurité adaptées aux utilisateurs.
Sur mon poste tout fonctionne.
Mais quand ce classeur est mis dans le réseau et que d'autres utilisateurs
essaient de s'en servir, le bouton a disparu.
Je récupère donc ledit classeur pour constater que le bouton est
effectivement invisible, y compris sur mon poste.
Il ne redevient visible que lorsque j'active le mode création de la boite
à
outils contrôle.
Pouvez-vous m'expliquer ce tour SVP?
Voici le code attaché au bouton:
Private Sub BoutonPublier_Click()
BoutonPublier.Visible = False
With ActiveWorkbook.PublishObjects("Programme")
.Filename = "\intranetYesReunion.htm"
.Publish (False)
End With
ChDir "\intranetYes"
BoutonPublier.Visible = True
End Sub
J'au vu la ficelle de Deuballiz. Est-ce celle-là? Oui mon classeur est protégé. Mais la protection inclu le bouton, non?
"michdenis" a écrit dans le message de news:
Voir autre ficelle plus bas !
Salutations!
"ManBas" a écrit dans le message de news: % Bonjour à tous, J'ai crée 1 bouton dans une feuille à l'aide de la Boite à outils Contrôle. Son rôle est de publier la feuille dans un intranet. Je croyais élégant de rendre ce bouton invisible le temps de cette publication. Ensuite le classeur est partagé, puis est introduit dans le réseau avec les propriétés de partage et de sécurité adaptées aux utilisateurs. Sur mon poste tout fonctionne. Mais quand ce classeur est mis dans le réseau et que d'autres utilisateurs essaient de s'en servir, le bouton a disparu. Je récupère donc ledit classeur pour constater que le bouton est effectivement invisible, y compris sur mon poste. Il ne redevient visible que lorsque j'active le mode création de la boite à outils contrôle. Pouvez-vous m'expliquer ce tour SVP?
Voici le code attaché au bouton: Private Sub BoutonPublier_Click() BoutonPublier.Visible = False With ActiveWorkbook.PublishObjects("Programme") .Filename = "intranetYesReunion.htm" .Publish (False) End With ChDir "intranetYes" BoutonPublier.Visible = True End Sub
