Office: Hyperlink automatisch erstellen

Hallo zusammen,

ich habe grade versucht einen Button mit einem Hyperlink zu erstellen.
Aufgerufen werden soll eine Internetseite. In den Link versuche ich die Suche direkt auszuführen.
In der Datenbank stehen die Pflanzengattung und die Art. Daraus soll sich die automatische Erstellung des Links für einen Button ableiten.

Ausgangslink ist:

Code:

http://davesgarden.com/guides/pf/search.php?q=GATTUNG+ART&Search=Search+PlantFiles

Ich habe daraus folgendes gebastelt (in Anlehnung an diese Frage):

Code:

="http://davesgarden.com/guides/pf/search.php?q=" & [tb_Gattung]![Gattung] & "+" & [tb_Art]![Art] & "&Search=Search+PlantFiles"

Folgende Fehlermeldung bekomme ich:


Weiß jemand einen Rat?

 

Hallo,

liege ich richtig mit der Vermutung, dass Du den 2. Hyperlinkausdruck, so wie Du ihn angeführt hast, in die Hyperlinkeigenschaft des Button-Objekts eingegeben hast?

Das kann nicht funktionieren, denn in dieser Eigenschaft darf nur eine solche Hyperlink-Konstante stehen, so wie Du sie auch im URL-Feld des Internetexplorers eingeben würdest.

Wenn Du variable Elemente haben möchtest, musst Du das Click-Ereignis des Buttons zB. per VBA entsprechend programmieren:

Code:

'Angenommen der Button heißt "Command56",
'so würde seine Click-Ereignisbehandlungsroutine wie folgt aussehen:
'
Private Sub Command56_Click()
  With Me.Command56
    '.....
    '.....
    'Code zum Ermitteln des passenden Datensatzes aus Tabelle TB_GATTUNG für das Feld GATTUNG
    '.....
    'Code zum Ermitteln des passenden Datensatzes aus Tabelle TB_ART für das Feld ART
    '....
    '....
    'Sobald die folgende vollständige Adresse an die HyperlinkAddress-Eigenschaft zugewiesen wird,
    'wird der Link ausgeführt:
    .HyperlinkAddress = "http://davesgarden.com/guides/pf/search.php?q=" & _
             [tb_Gattung]![Gattung] & "+" & [tb_Art]![Art] & "&Search=Search+PlantFiles"
  End With
End Sub

Ich habe das nur für ACCESS2007 getestet - ich nehme aber an, dass es für Access2003 genauso sein wird.