Hoe maak ik een Snelkoppeling knop in excel?

[Tijger81]

Hallo,

Ik ben een excel document aan het maken, waarbij ik in excel een knop wil maken. Als er op die knop gedrukt wordt dan opent (Deze Computer) waar al de drives in staan.
Dus ik wil een soort snelkoppeling knop maken.

Wie kan mij helpen daarbij?

 

[edmoor]

Probeer deze macro achter een knop:

Private Sub OpenMyComputer
    Dim RetVal as Integer
    RetVal = Shell("explorer.exe ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}", vbNormalFocus)
End Sub

De knop maak je zo:
http://office.microsoft.com/nl-nl/e...an-toewijzen-in-een-werkblad-HP010342137.aspx

 

[Tijger81]

Ik heb een knop gemaakt en dit in module 3 geplaatst, maar krijg een foutmelding.

Private Sub MyComputer()
Dim RetVal As Integer
RetVal = Shell("explorer.exe ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}", vbNormalFocus)
End Sub

Sub Snelkoppeling()
'
' Snelkoppeling Macro
'

'
Range("N25").Select
End Sub

 

[edmoor]

En de foutmelding?

 

[Tijger81]

Heb nu dit geprobeerd, maar dan krijg ik geen reactie als ik op de knop druk.

Sub snelkoppeling()

End Sub
Private Sub OpenMyComputer()
Dim RetVal As Integer
RetVal = Shell("explorer.exe ::{20D04FE0-3AEA-1069-A2D8-08002B30309D}", vbNormalFocus)
End Sub

 

[edmoor]

De code is goed dus er gaat ergens anders iets mis.
De foutmelding heb je ook nog niet vermeld.

 

[Tijger81]

Foutcode krijg ik met deze code nier meer, maar Deze Computer opent niet.
Ik heb eerst een formuliersbesturings knop aangemaakt.
Toen rechtermuisknop : macro toewijzen
Nieuw: Snelkoppeling
Dan bewerken gekozen en code in Module3 ingevoerd

 

[edmoor]

Je moet de macro OpenMyComputer aan de knop toewijzen.

 

[Tijger81]

Heb ik nu gedaan, maar elke keer springt hij terug op snelkoppeling.
En als ik op dat play knopje druk dan opent Deze computer, maar niet als ik op de knop zelf druk

 

[edmoor]

Sorry, maar dan heb je het toch ergens niet goed gedaan.

Dit is de bedoeling:

 

[Tijger81]

 

[Warme bakkertje]

Haal die Private weg voor Sub en de macro wordt mee zichtbaar in Macro toewijzen aan object en kan dan geselecteerd worden.

 

[Tijger81]

Het is gelukt! Heb er een plaatje aan gehangen zelfs!

 

[Tijger81]

Dank jullie wel!