• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Control in CommandBars("Ply") uitschakelen.

HSV

Inventaris
Lid geworden
18 jul 2008
Berichten
21.098
Office versie
Bèta Insider Office 365
In het bestandje heb ik een en ander uitgeschreven wat ik van plan ben.
Misschien kan een van jullie eens kijken en testen in Office 365 waarom ik een control niet kan uitschakelen, maar wel uitgeschakeld is in de PopUp die ik laat opkomen.

Ook graag je bevindingen in oudere versies.

Ps. wees gerust, bij het sluiten van het bestand wordt het netjes gereset.
 

Bijlagen

In deze gebeurtenisprocedure werkt het hier als gewenst (E 2010)

Code:
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
 With Application.CommandBars("Ply")
    .Controls(10).Enabled = False
   .ShowPopup
  End With
End Sub
 
Dat klopt, in mijn versie ook met de PopUp, maar niet als je een rechtsklik op het werkblad Tab doet.
In die Menu is het dan niet uitgeschakeld.
 
Wel met mijn macro. Ik rechtsklik op een tabblad et alors... De gebeurtenisprocedure is cruciaal.
 
Dan werkt het helaas niet in Office 365.
In je PopUp net als bij mij in de Sub hsv_2() wel, maar een rechtermuisklik op de Tab weer niet.
Zouden het twee verschillende menu's zijn in Office 365?

Wat wel werkt in Office 365,....
Code:
Application.commandbars("cell").enabled = false
maar dat is weer een ander verhaal.
 
Blijkbaar wordt de instelling van deze optie in de coommandbar niet onthouden.
 
Denk het ook.
Wat het wel werkt.......
Code:
Application.commandbars("ply").enabled = false
... maar daar ging het mij niet om..
 
Terug
Bovenaan Onderaan