Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
  		RegistrierenRegistrieren  LoginLogin

Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB.NET] Fragen - Antworten
Autor
Nachricht
eiM
Newbie
Newbie

Anmeldedatum: 10.01.2010
Beiträge: 1
hyperlink via makro erstellen
Verfasst am: 10.01.2010, 16:17
Hallo,

im Zuge eines Projektes meins Vaters wollte ich ihm zur Hand gehen und habe folgendes Problem/Ausgangssituation.
Es gibt eine Spalte in Excel in der jeweils unterschiedlich viele Bild-Dateinamen (immer gleiche länge) in einer Zeile aufgeführt sind (durch Zeilenumbruch getrennt). Jeder dieser Dateinamen soll nun zu einem Hyperlink konvertiert werden und z.b. auf /fotos/DATEINAME verlinken.
Wäre es jeweils nur ein Dateiname, dann könnte ich einfach =HYPERLINK(link,name) benutzen. So ist es aber etwas komplizierter. Ich habe mich mal rangewagt und folgenden code geschrieben:

Code:
Sub foto()
Dim i, length As Integer
 
 length = Len(Cells(ActiveCell.Row, ActiveCell.Column - 1).Text) Mod 12
 For i = 1 To length
 
 ActiveCell.Text = Hyperlink("/fotos/" & Mid(zelle, i, i + 12))

End Sub


Soll halt pro 12 Zeichen des strings der aktiven Zelle einen neuen link erstellen und in die Zelle daneben schreiben (testzweck). Bisher laufe ich noch auf Fehler und sitze auch schon ganz schön lagne daran, daher hoffe ich jetzt hier auf ein bisschen Hilfe zu treffen. Ich habe vor Jahren mal VB benutzt aber habe so ziemlich alles vergessen.

Lg,
eiM
_________________
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB.NET] Fragen - Antworten

Tags: hyperlink, makro, erstellen, excel

  
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge [suche] Tuturials winsock & daten senden 869 09.06.2011, 12:19
Keine neuen Beiträge [Video] *.dll & *.ocx Installer 2432 06.03.2008, 20:19
Keine neuen Beiträge ListView speichern & laden 1242 05.08.2008, 12:32
Keine neuen Beiträge Registry & Co Fragen 1101 03.05.2007, 09:57
Keine neuen Beiträge Listbox speichern & laden 2047 22.03.2007, 20:25
 




[ Time: 0.1962s ][ Queries: 81 (0.0541s) ][ GZIP on - Debug on ]