Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: Alle werkbalken weg  (gelezen 2611 keer)

0 leden en 1 gast bekijken dit topic.

Offline Jannie

  • Lid
  • *
  • Berichten: 48
  • Oplossing.be
Alle werkbalken weg
« Gepost op: 21 september 2004, 10:21:26 »
Hallo,

Wie weet hoe ik alle werkbalken wegkrijg.
Beeld, werkbalken krijg je alleen standaard enzo weg.
Maar ik wil ook die weg van Bestand, bewerken, beeld enzo.

Zo dat de gebruiker alleen bepaalde handelingen kan doen via een formulierknop met macro.
Zo dat ze het formulier ook niet met het X af kunnen sluiten.

Groet Jannie
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline Oldy

  • Ervaren lid
  • ***
  • Berichten: 295
Re:Alle werkbalken weg
« Reactie #1 Gepost op: 21 september 2004, 12:49:26 »
Dag Jannie,

Probeer deze eens :

Application .CommandBars(1).Enabled = False

Geleerd op dit forum.

HP Pavillion Desktop 595 P0002NB
Intel(R) Core(TM) i7-9700F CPU @ 3.00GHz   3.00 GHz
SSD 512 GT1030
Ram 16Gb
Seagate 3,5 inch 1 Tb Sata 7200 rppm
2019
64-bits besturingssysteem, x64-processor
Windows 10 Home - Versie : 21H2

Offline Jannie

  • Lid
  • *
  • Berichten: 48
  • Oplossing.be
Re:Alle werkbalken weg
« Reactie #2 Gepost op: 21 september 2004, 13:33:20 »
Waar moet ik dit neer zetten?
Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

Offline Oldy

  • Ervaren lid
  • ***
  • Berichten: 295
Re:Alle werkbalken weg
« Reactie #3 Gepost op: 21 september 2004, 14:03:15 »
Jannie,

Ik heb die gezet in "ThisWorkbook"  van het VBA-project.
Gaat ook in een macro met knop bijvoorbeeld.

Telkens als het programmake opstart verdwijnen mijn balken.
Dit is wel voor persoonlijk gebruik. Als ge voor iemand anders een program maakt is dit wel wat anders, en zou ik de specialisten op het forum liever nog wat om raad vragen.

Ge moet ze natuurlijk bij het beëindigen van uw program terug zetten.

Zo werkt het bij mij :

Private Sub Workbook_Open()
    Application.ScreenUpdating = False (flikkeren van het beeld)

    WerkbalkenUIT

    Application.ScreenUpdating = True
End Sub
HP Pavillion Desktop 595 P0002NB
Intel(R) Core(TM) i7-9700F CPU @ 3.00GHz   3.00 GHz
SSD 512 GT1030
Ram 16Gb
Seagate 3,5 inch 1 Tb Sata 7200 rppm
2019
64-bits besturingssysteem, x64-processor
Windows 10 Home - Versie : 21H2

Offline Oldy

  • Ervaren lid
  • ***
  • Berichten: 295
Re:Alle werkbalken weg
« Reactie #4 Gepost op: 21 september 2004, 14:09:23 »
Jannie,

In de bijlage vind je een voorbeeld om de werkbalken AAN te zetten, deze staan nu allemaal TRUE.
Af zetten is andersom.
HP Pavillion Desktop 595 P0002NB
Intel(R) Core(TM) i7-9700F CPU @ 3.00GHz   3.00 GHz
SSD 512 GT1030
Ram 16Gb
Seagate 3,5 inch 1 Tb Sata 7200 rppm
2019
64-bits besturingssysteem, x64-processor
Windows 10 Home - Versie : 21H2

Offline LucHeyndrick

  • Volledig lid
  • **
  • Berichten: 217
  • Oplossing.be
Re:Alle werkbalken weg
« Reactie #5 Gepost op: 21 september 2004, 17:49:31 »
Inderdaad... voor persoonlijk gebruik.
Deze code zal immers gewoon maar half zijn werk doen indien ie op een andere computer met andere instellingen loopt.
Bovendien is het bijzonder gevaarlijk om aan de instellingen van iemand anders zijn computer te prutsen.

Op mijn website staat er wel een voorbeeld: 'Excel manipuleren'.  Maar ik raad het echt niet aan.

Luc

Gelieve uw systeemgegevens in te vullen. Klik HIER voor meer informatie.

 


www.combell.com