Command Button Hyperlink i excel

[genuine]

Hei.

 

Har et problem jeg ikke finner ut av.

Jeg har en liste over referanser som jeg skal lage hyperlink til ved hjelp av kombinert tekst og command button.

 

Det jeg har er en adresse feks. www.test.no som skal kombineres med tekst fra en selle feks.

A1="/side1" (Knapp 1) Ved å trykke på denne åpnes siden www.test.no/side1

A2="/side2" (Knapp 2) Ved å trykke på denne åpnes siden www.test.no/side2

 

Noen som vet hvordan jeg setter opp koden for dette?

[Harald Staff]

Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink ("http://www.test.no" & Sheets("Ark1").Range("A1").Value)
End Sub

 

Edit: DU har kanskje en grunn for å bruke commandbuttons, men det er nokså overkill i et regneark. En button fra skjemaverktøyene er lettere. Eller rett og slett en enkel formelløsning, engelsk:

=HYPERLINK("http://www.test.no"&A1;"Klikk her for siden &"&A1)

 

HTH. Beste hilsen Harald

Endret 27. september 2009 av Harald Staff

[genuine]

Fantastisk. Vanlig formel blir for simpelt synes jeg. Ser bedre ut med knapp enn celle med link synes jeg. Skal brukes til dokument søk på tag. Vil da ha en knapp med dokument icon på.

 

Fant nettopp skjemaverktøyene. Har ikke fått dette med meg før. Funket som fanken det også.

 

Takker, bukker og bøyer meg i støvet.

 

Private Sub CommandButton1_Click()
ActiveWorkbook.FollowHyperlink ("http://www.test.no" & Sheets("Ark1").Range("A1").Value)
End Sub

 

Edit: DU har kanskje en grunn for å bruke commandbuttons, men det er nokså overkill i et regneark. En button fra skjemaverktøyene er lettere. Eller rett og slett en enkel formelløsning, engelsk:

=HYPERLINK("http://www.test.no"&A1;"Klikk her for siden &"&A1)

 

HTH. Beste hilsen Harald

Endret 27. september 2009 av genuine