teile eines links abschneiden

[kraehenseele]

Hallo zusammen

Ich habe ene Tabelle wo ich eine zelle links aus dem internet reinkopiere diese links sind allerdings durch nummeriert und eben jene nummerierung würde ich gerne abschneiden.
habe es schon mit links, rechts und teil versucht allerdings gibt er mir danach den link nur als Text aus. ich würde wenn möglich den link in seinem format beibehalten wollen und
nur die nummerierung enfernen. Hat da jemand einen Tip für mich oder ist das so nicht möglich wie ich mir das denke?

Besten Dank und Grüße

Micha

[RPP63]

Hallo Micha!
Schaue Dir mal die Funktion =HYPERLINK() an.
Für Dich dürfte das zweite Argument "freundlicher_Name" interessant sein, an den Du das LINKS() übergeben kannst.
Ansonsten schreibe mal einen Beispiel-Link und wie Du ihn dargestellt haben möchtest.

Gruß Ralf

[kraehenseele]

Hallo Ralf

ich kopiere die links von http://www.strassen-in-deutschland.de

und die sehen dann so aus:
1. B-Weg
2. Baaber Steig
3. Babelsberger Straße
4. Bacharacher Straße
5. Bachestraße
6. Bachstelzenbrücke
7. Bachstelzenweg
8. Bachstraße
9. Bachweg
10. Bachwitzer Straße
11. Backbergstraße
12. Bäckerstraße
....
wenn ich es nach Excel kopiere gehören die Zahlen mit zum Link


Wenn möglich hätte ich gerne das ich das in Spalte C reinkopiere und in Spalte B nur der Link ohne die Nummerierung steht. So das ich den "gesäuberten" Link in das eigentliche Datenblatt kopieren kann. Ich kann die Zahlen von Hand weg löschen und der Link funktioniert danach noch, das habe ich schon probiert. Der Arbeitsaufwand wäre sehr hoch, ähnlich wie mit "freundlicher Name". Mit der Teil Funktion geht es schon in die richtige Richtung nur das es danach leider Text ist. Wollte meine natürliche Faulheit unterstützen :17:

Gruß Micha

[Rabe]

wenn ich es nach Excel kopiere gehören die Zahlen nicht mit zum Link

welche Zahlen meinst Du, die Nummerierung oder die direkt in den Links?

Code:

1. [url=217003490-b-weg-in-berlin.html]B-Weg[/url]
2. [url=18652309-baaber-steig-in-berlin.html]Baaber Steig[/url]
3. [url=4535205-babelsberger-strasse-in-berlin.html]Babelsberger Straße[/url]
4. [url=5095718-bacharacher-strasse-in-berlin.html]Bacharacher Straße[/url]
5. [url=4535463-bachestrasse-in-berlin.html]Bachestraße[/url]
6. [url=152258286-bachstelzenbruecke-in-berlin.html]Bachstelzenbrücke[/url]
7. [url=26668446-bachstelzenweg-in-berlin.html]Bachstelzenweg[/url]
8. [url=4377122-bachstrasse-in-berlin.html]Bachstraße[/url]
9. [url=23424638-bachweg-in-berlin.html]Bachweg[/url]
10. [url=22942783-bachwitzer-strasse-in-berlin.html]Bachwitzer Straße[/url]
11. [url=5110656-backbergstrasse-in-berlin.html]Backbergstraße[/url]
12. [url=81414536-baeckerstrasse-in-berlin.html]Bäckerstraße[/url]
....

Schon mal das =Hyperlink(Link als Text) versucht?

[RPP63]

Da muss ich nochmal nachhaken:
Ich erhalte z.B. folgenden Link:
http://www.strassen-in-deutschland.de/23...rchen.html
Du erwartest nicht so etwas?

	A	B
4	http://www.strassen-in-deutschland.de/23252139-hagemannshof-in-gelsenkirchen.html	Hagemannshof

Formeln der Tabelle

Zelle Formel B4 =HYPERLINK(A4;"Hagemannshof")

Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4.8

B4 ist dann anklickbar.
Wenn ich die Zahl entferne, ist der Link unbrauchbar.

Gruß Ralf

[kraehenseele]

Hallo Ralf
Sorry da war ein nicht zuviel, direkt gelöscht.
=hyperlink Text als Link habe ich schon versucht aber die Verlinkung zur Website geht damit verloren.

Vielleicht war ich mit Infos zu geizig. Mein Wunsch wäre das ich auf Strassen-in-Deutschland.de die Links izu einem Buchastaben markiere, kopiere und in dem einen Tabbelenblatt in die Spalte einfüge. In der Nebenspalte nur die Straßennamen stehen ohne die fortlaufende Nummerierung wie auf Strassen-in-Deutschland.de, aber noch als Link.
Mit =Teil funktioniert es so wie ich mir das vorstelle, aber Excel wandelt den Link dann in Text um. Ich bräuchte also eine ähnliche Funktion um nicht jeden Link einzel von Hand von der Nummerierung zu bereinigen. Diesen bereinigten Link würde ich dann in das eigentliche Datentabellenblett kopieren wollen. Auf dieses Datentabellenblatt soll dann im nächsten Schritt eine Eingabemaske zu greifen in die man Ort, Strasse eingibt und über den dann angezigten Link sich die Lage der Strasse anzeigen lassen kann.

Hoffe das hilft weiter, zur Not wird es Fleißarbeit wenn es keine Möglichkeit einer Funktion gibt :17: 

Gruß Micha

[schauan]

Hallo Micha,

das geht doch im Prinzip mit Ralf's Ansatz:

Arbeitsblatt mit dem Namen 'Tabelle1'
	A	B
1	http://www.strassen-in-deutschland.de/23...rchen.html	hagemannshof-in-gelsenkirchen

Zelle	Formel
B1	=HYPERLINK(A1;WECHSELN(TEIL(A1;48;100);".html";""))

Diese Tabelle wurde mit Tab2Html (v2.5.0) erstellt. ©Gerd alias Bamberg

[RPP63]

Hi!
Im Prinzip ein sehr interessanter Ansatz!
Erstmal dumm, dass die Nummer 7-9stellig ist.
Ich bekomme es momentan auch nur hin, die Straßennamen zu kopieren.
Externe Daten, Aus dem Web funktioniert so nicht.
Sicherlich ist es aber problemlos möglich, das Ganze über die GoogleMaps-API zu automatisieren.
(Beispiele gibt es glaube ich auch hier im Forum)
Dann aber wohl nur mittels VBA.

Heute werde ich nicht mehr dazu kommen, morgen schaue ich mir das sicherlich nochmal genauer an.

Gruß Ralf

[atilla]

Hallo zusammen,

ich verstehe es so, dass beim ersten hineinkopieren in die Tabelle die Anzeige so aussieht:

Arbeitsblatt mit dem Namen 'Tabelle2'
	A
1	1. B-Weg
2	2. Baaber Steig
3	3. Babelsberger Straße
4	4. Bacharacher Straße
5	5. Bachestraße
6	6. Bachstelzenbrücke
7	7. Bachstelzenweg
8	8. Bachstraße
9	9. Bachweg
10	10. Bachwitzer Straße
11	11. Backbergstraße
12	12. Bäckerstraße

Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg

Es sind anklickbare Links.

Nun soll die Nummerierung rausgelöscht werden, dass das Ganze so aussieht:

Arbeitsblatt mit dem Namen 'Tabelle2'
	A
1	B-Weg
2	Baaber Steig
3	Babelsberger Straße
4	Bacharacher Straße
5	Bachestraße
6	Bachstelzenbrücke
7	Bachstelzenweg
8	Bachstraße
9	Bachweg
10	Bachwitzer Straße
11	Backbergstraße
12	Bäckerstraße

Diese Tabelle wurde mit Tab2Html (v2.4.1) erstellt. ©Gerd alias Bamberg

Obiges Erscheinungsbild habe ich mit einem kleinen aufgezeichneten und erweiterten Code erreicht:

Code:

Sub Makro1()
'
' Makro1 Makro
'
Dim i As Long

For i = 1 To 12
   Range("A" & i).Hyperlinks(1).TextToDisplay = Split(Range("A" & i), ". ")(1)
Next i
End Sub

So bleiben die Links erhalten.

[kraehenseele]

So wie bei Attila hatte ich mir das gedacht. Wollte es nur eben über Funktionen erreichen.
Bin "noch" nicht so Excel firt. An Macros hab ich mich noch nicht ran getraut, aber wenn es der Weg zum Ziel ist werd ich mich da morgen auf Nachtschicht mal ran machen.
Für heute hab ich erstmal Feierabend. Bedanke mich für die Hilfe und wünsche euch allen noch einen schönen Abend.

Gruß Micha