| |

Visual-Basic EinsteigerRe: Einfache Linkseite mittels VBA erstellen!? | |  | Autor: Damo | Datum: 05.12.03 20:32 |
| Hi,
erstmal vielen Dank für deine Hilfe. Leider verstehe ich nicht alles als Laie.
Zum ersten verstehe ich nicht wie ich den Verweis anlegen muss. Habe mal gegooglet, man muss ja Unter Projekt - Verweise (Project - Preferences) 'Microsoft Scripting Runtime' auswählen. Arbeite mit dem Visual Basic Editor in Exel, dort habe ich aber die Option nicht.
Soweit ich deinen Code verstehe, wird zuerst eine Datei geöffnet (index.html) und dort rein dann die Links geschrieben. Richtig? Wo ist denn der Stop in deinem Code. z.B erstelle Links bis Seite222.html ?
Ich erstelle Webseiten aus Exel Informationen mit folgendem Code
Sub Erstelle_Webseiten()
For Nr = 2 To 3
Open "C:/seite" & Nr & ".html" For Output As #1
Print #1, "<!DOCTYPE html PUBLIC ""-//W3C//DTD HTML 4.01 Transitional//EN"">"
Print #1, "<html>"
Print #1, "<head>"
Print #1, "<title>Titel</title>"
Print #1, "</head>"
Print #1, "<body>"
Print #1, "<p align=""center""><img border="; 0; " src=""" & Cells(Nr, 3) & """></p>"
Print #1, "<p align=""center"">" & Cells(Nr, 2) & "</p>"
Print #1, "<p align=""center""><a href=""" & Cells(Nr, 1) & """>derLink</a></p>"
Print #1, "</body>"
Print #1, "</html>"
Close #1
Next
End Sub
Ist es möglich diesen Code umzubasteln das er mir diese Linksseite erstellt?
Habe schon ein bischen rumexperimentiert, konnte mir allerdings nicht erklären mit welchem Befehl dem Programm gesagt wird das er jeden Link aus der Exeldatei auf eine seperate Seite schreibt.
Wenn ich jetzt z.B sage er soll alle Informationen in eine Datei schreiben, dann wäre es doch im Prinzip auch möglich so eine Linkseite zu erstellen, oder? |  |
 | Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.
Einloggen | Neu registrieren |
  |
|
sevISDN 1.0 
Überwachung aller eingehender Anrufe!
Die DLL erkennt alle über die CAPI-Schnittstelle eingehenden Anrufe und teilt Ihnen sogar mit, aus welchem Ortsbereich der Anruf stammt. Weitere Highlights: Online-Rufident, Erkennung der Anrufbehandlung u.v.m. Weitere InfosTipp des Monats Oktober 2025 Matthias KozlowskiUmlaute konvertierenErsetzt die Umlaute in einer Zeichenkette durch die entsprechenden Doppelbuchstaben (aus ä wird ae, usw.) TOP! Unser Nr. 1 
Neu! sevDataGrid 3.0
Mehrspaltige Listen, mit oder ohne DB-Anbindung. Autom. Sortierung, Editieren von Spalteninhalten oder das interaktive Hinzufügen von Datenzeilen sind ebenso möglich wie das Erstellen eines Web-Reports. Weitere Infos
|
|
|
Copyright ©2000-2025 vb@rchiv Dieter Otter Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.
Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel
|
|