[Excel] Zelfgemaakte knop gaat niet weg

Pagina: 1
Acties:

  • FaZe
  • Registratie: Maart 2000
  • Laatst online: 15-09 14:06
Ik zit met het volgende probleem.
Ik heb een excel document (a.xls) en aan dit document zelfgemaakte knoppen toegevoegd(die weer aan macro's gekoppeld zijn).

Het probleem is nu dat excel bij het sluiten van het werkblad de knoppen laat staan.

Als ik deze verwijder (Excel XP-->extra-->aanpassen-->bij werkbalken) dan is de werkblak weg. Bij toevoegen zie ik dat hij wel nog in het werkblad zit. (zoals ook de bedoeling is)
Maar bij het sluiten en openen van het werkblad en vervolgens weer sluiten blijven de knoppen weer zitten.

Waarom dit een probleem is? Ik heb een macro dit het document onder een speciale naam opslaat (met opslaan als). Nu gaan de verwijzingen bij de knoppen automatisch naar de macro die dus onder de nieuwe bestandsnaam zit.
Als ik nu mijn originele document weer open, zijn de knoppen aan het verkeerde document gekoppeld (de knoppen met nieuwe verwijzingen bleven dus weer staan. En de verwijzingen worden niet bijgewerkt bij het openen van het originele document)

Wie kan mij hieruit helpen. Zelf kan ik 2 manieren bedenken (weet alleen niet hoe).
1. de koppeling van de macro aan de knop soort van relatief maken. Nu verwijst hij automatisch naar bestandsnaam+macronaam. maar dan zeg maar "huidige-bestand-macronaam".

2. Een optie dat de knoppen gewoon weer verdwijnen na het sluiten van het werkblad (Dit lijkt me zelf het fijnste, zodat ook de knoppen dan tenminste weer weg zijn)

Verwijderd

Het zelfde probleem heb ik ook gehad. De enige oplossing die ik er voor heb kunnen bedenken is een marco te schrijven voor het BeforeClose event van je workbook. In dit event kun je er dan voor zorgen dat je CommandBar (oid) sluit of verwijderd.

  • FaZe
  • Registratie: Maart 2000
  • Laatst online: 15-09 14:06
ok tnx. Ik zal eens op onderzoek uitgaan hoe dit precies in zn werk gaat. Hier kan ik weer mee verder :)

  • Coffeemonster
  • Registratie: Juli 2000
  • Laatst online: 18-09 18:20
Copy/paste uit eigen Excel-sheet (97) met zelfde probleem:
code:
1
2
3
4
5
Private Sub Auto_Close()

    Application.CommandBars("Naam_van_balk").Delete

End Sub

Kan je gewoon onder de andere macro's plakken :)

Look for something long enough and you will find it; look for something without understanding, and it will find you.
A normal day at the stock exchange


  • FaZe
  • Registratie: Maart 2000
  • Laatst online: 15-09 14:06
Ja het werkt nu perfect zoals ik het wil. Bedankt allebij. Het commando is precies zo geworden zoals Coffeemonster het zei :)