Supportnet / Forum / Tabellenkalkulation

Hallo, ich möchte die Einträge in einem Kobinationsfeld verlinken - wenn ich die Zelle verlinke - wird der Eintrag, der im Kombinationsfeld auf diese Zelle zugreift trotzdem nicht verlinkt. Wer kann mir da helfen? Gruß, Sepp

Hallo Sepp,

was verstehst Du unter "verlinken"? Soll, wenn Du einen Eintrag auswählst eine Internetseite oder ein anderes Tabellenblatt aufgerufen werden? Du müsstest schon etwas mehr darüber schreiben, was Du erreichen möchtest. Eventuell kann man Dir dan helfen.

MfG,
coros
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein}
^{Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Hallo Coros,
ich möchte beide Fälle erreichen - 2 Einträge sollen direkt mit einer Internetseite verlinkt werden und beim Rest soll ein Tabellenblatt aufgerufen werden.

Viele Grüße, Sepp

Hallo Sepp,

welches Kombinationsfeld hast Du benutzt? Das aus der Symbolleiste Steuerlement-Toolbox oder das aus der Symbolleiste Formular. Wenn Du das aus der Symbolleiste Formular benutzt hast, dann wird das nicht funktionieren. Dann musst Du das aus der Symbolleiste Steuerlement-Toolbox nehmen. Allerdings muss dann ein VBA Code erstellt werden, der zunächst einmal die ComboBox füllt. Hier benötige ich den bereich, in dem Die Daten stehen, die nachher in dem Kombinationsfeld angezeigt werden sollen.
Dann muss noch ein VBA Code erstellt werden, der dann die ausgewählten Begriffe auswertet und entsprechend die Internetseite oder das Tabellenblatt aufruft.
Aber beantworte bitte erst mal die beiden Fragen, bevor ich hier einen VBA Code poste.

MfG,
coros
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein}
^{Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Hallo,
zu 1) Das aus der Symbolleiste Steuerlement-Toolbox

zu 2) B 12 : B 19

Danke für die Hilfe.

Hi Kernel,

die nachfolgenden VBA Code gehören beide in das VBA Projekt der Tabelle, in der die ComboBox sich befindet.

Option Explicit

Private Sub ComboBox1_Change()
If ComboBox1.Text = Range("B12") Then Shell ("C:\Programme\Internet Explorer\Iexplore.exe www.excelbeispiele.de"), 1
If ComboBox1.Text = Range("B13") Then Sheets("Tabelle2").Activate
If ComboBox1.Text = Range("B14") Then Sheets("Tabelle3").Activate
If ComboBox1.Text = Range("B15") Then Shell ("C:\Programme\Internet Explorer\Iexplore.exe www.supportnet.de"), 1

End Sub

Private Sub ComboBox1_DropButtonClick()
Dim Wiederholungen As Integer
ComboBox1.Clear
For Wiederholungen = 12 To 19
ComboBox1.AddItem Cells(Wiederholungen, 2).Value
Next
End Sub

Bei dem Beispielcode wird mit dem ComboBox1_DropButtonClick-Ereignis, wenn in dem Kombiantionsfeld der Auswahlpfeil betätigt wird, die CmboBox mit den Werten gefüllt, die im Bereich B12:B19 stehen.

Der 2. Code wertet aus, welcher Begriff ausgewählt wurde und öffnet entweder eine Internetseite oder ein Tabellenblatt. Du musst den Code natürlich noch anpassen. Du musst schauen, was bei dem Begriff aus Zelle B12 z.B. passieren soll, z.B. wie in dem Beispiel eine Internetseite aufrufen. Der Begriff aus Zelle B13 ruft das Tabellenblatt "Tabelle2" auf usw.

Ich hoffe, Du kommst klar. bei Fragen melde Dich.

MfG,
coros
_{Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein}
^{Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.}

Hallo coros,

ich werde den Code ausprobieren. Herzlichen Dank für die Hilfe.

Grüße aus Regensburg, Sepp

Hallo,
funktioniert super - kann ich mich irgendwie erkenntlich zeigen?

Gruß, Sepp

• 1. Listeneintrag leer im Kombinationsfeld
• Hyperlinks im Kombinationsfeld ausführen
• Kombinationsfeld automatisch öffnen
• Verlinken in Outlook