in een Excel bestand heb ik een Userform1 gemaakt met commandbutton die verwijst naar een website
In this Workbook staat:
Tot hier werkt dit ook naar behoren, voor de mooiigheid wil ik dit nog wat finetunen maar krijg het niet voor elkaar.
Ik wil dat:
- de commandbutton alleen op blad1 verschijnt (en niet op alle (3) werkbladen
- Als de commandbutton wordt weggeklikt dat deze weer 'automatisch' tevoorschijn komt (of met een toetscombinatie of helemaal niet weggeklikt kan worden wat nog beter is)
- dat alles ook nog werkt als de naam van het werkbook wijzig en/of het de naam van het werkblad.
Wie ziet het licht..?
Code:
Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink _
Address:="https://www.google.nl/" 'voorbeeld
End Sub
Private Sub UserForm_Initialize()
Me.Left = 750
Me.Top = 200
End Sub
In this Workbook staat:
Code:
Private Sub Workbook_Open()
UserForm1.Show
With UserForm1
.Top = Application.Top + 400 '< change to what u want
.Left = Application.Left + 1250 '< change to what u want
End With
End Sub
Tot hier werkt dit ook naar behoren, voor de mooiigheid wil ik dit nog wat finetunen maar krijg het niet voor elkaar.
Ik wil dat:
- de commandbutton alleen op blad1 verschijnt (en niet op alle (3) werkbladen
- Als de commandbutton wordt weggeklikt dat deze weer 'automatisch' tevoorschijn komt (of met een toetscombinatie of helemaal niet weggeklikt kan worden wat nog beter is)
- dat alles ook nog werkt als de naam van het werkbook wijzig en/of het de naam van het werkblad.
Wie ziet het licht..?
Laatst bewerkt: