Invoerbericht/help

[arvie76]

Hallo,

Is het mogelijk om doormiddel van een macro een invoerbericht/help schermpje te laten zien zodra een bepaalde commandbutton aangewezen wordt of geactiveerd mag ook. Wil daar dan de naam van de medewerker even mee tonen.

Met de volgende reden. Ik heb een aantal knoppen gemaakt met het personeelsnummer van de medewerker er op. Als de knop aangeklikt/geactiveerd wordt worden er gegevens zicht in programma op webbasebasis van deze medewerker. Hiervoor heb ik al een werkende macro geschreven.

Ik kan de knoppen wel uitbreiden en de naam van de knop aanvullen met de naam maar dan wordt het formulier een beetje onoverzichtelijk.

Private Sub ARAxxx_Click()

ActiveWorkbook.FollowHyperlink Address:="https://rsa.belastingdienst.nl/Forms/OpenenDetailSchermUitRela.aspx?SAPId=xxxxx", NewWindow:=True
ARAxxxxx.BackColor = vbRed

End Sub

 

[Haije]

Wellicht dit toevoegen?

MsgBox Application.UserName

toont de Usernaam

 

[arvie76]

Thnx Haije

Dank voor je reactie, maar dit is niet wat ik zoek.

In het bestand staan een kleine 60 personeelsnummers en is dus niet gekoppeld aan userid. Dus als medewerker X het bestand gebruikt moet hij ook indien mogelijk de naam zien van de andere medewerkers.

 

[Haije]

plaats dan svp een voorbeeld van je bestand.

 

[arvie76]

Voorbeeld bestand

Ik heb een klein voorbeeldbestand gemaakt.

Wil dus als je op de commandButton gaat staan dat je te zien krijgt wat die doet. In voorbeeld dat deze naar bepaalde website gaat, en in originele bestand wil ik dus dat als ik op de knop ga staan ik de naam zie van de medewerker van des betreffende personeelsnummer.

 

[emields]

Bedoel je dan zoiets?

 

[VenA]

Of

Private Sub ARA654321_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
  If MsgBox("nu.nl", vbOKCancel) = vbOK Then ActiveWorkbook.FollowHyperlink Address:="https://www.nu.nl", NewWindow:=True
End Sub

 

[arvie76]

Thnx, we hebben mogelijk een begin

Dank VenA 7 & emields

Dit had ik reeds zelf ook al bedacht met een msgBox. Maar is net niet wat ik zoek. Want de msgbox moet je weer bevestigingen dus een extra klik.

Het idee van VenA, kom wel beetje in de richting en schilt een klik, en je krijgt de info te te zien, maar je moet om dan verder te kunnen gaan op oke of annuleren klikken.
Mijn wens is dat zodra je over de knop gaat je net z'n opmerkingveld te zien krijgt zoals dat werk als je een opmerking bij en cel vermeld. Deze wordt ook zicht zodra de cel met de muis aanwijst.

Heb in mijn vorige versie het personeelsnummer voorzien van een hyperlink en daar de scherminfo aangepast. Maar vond het zelf mooier om knoppen te maken en deze dan van kleur te laten veranderen, dan konden ze zien welke ze reeds gekozen hebben en welke niet.

 

[VenA]

Je kan onder het MouseMove event toch elke procedure hangen die je wilt?

 

[arvie76]

Thanks

Ik laat hem even rusten.