Formatübernahme in html
Andreas
wie bekomme ich farblich markierte einzelne Zellen in einer tabelle auch in html hin?
hintergrund: habe eine excel datei mit mehreren tabellen (mannschaft1, 2, 3 usw.) da sind alle saison spiele aufgelistet... darunter ist dann die tabelle...
nach jeweiligem eintrag der spielergebnisse aktualisiere ich die tabelle mittels hinterlegter programierung...
in dieser ist gleizeitig ein befehl zum erstellen einer html seite dabei.
nun möchte ich gerne das unsere mannschaften (wie in der excelliste) farblich markiert sind und das ins html übernommen wird.
hab einiges probiert, aber es funzt nicht so recht.
als hilfe jede tabelle hat eine "call" funktion... und die hauptprozedur ist in modul geschrieben...
dazu der kurze auszug, wo die tabelle eingefügt wird...
Do
Zeile = ein.ReadLine
aus.WriteLine (Zeile)
Loop Until (Zeile = "") And (ein.AtEndOfStream True)
i = 2
Do
aus.Write "
"
"
"
"
vieleicht kann mir ja jemand einen Tipp geben?
Vielen Dank im Voraus
Andreas
Formatübernahme in html
Alfons
AW: Formatübernahme in html
Andreas
hallo Alfons
erst mal danke für deine antwort
die datei sieht nicht schlecht aus, nur kann ich damit nicht allzuviel anfangen...
weil ich nicht weiß was von dem ich bei mir wo genau einfügen muß,
ohne meine prozedur zu zerstören...
wenn ich was versuche mit interior color oder ähnlich übernimmt der das nicht...
oder muß/kann ich diese "dim" sachen erst deklarieren?
in der Rangtabelle funktioniert das ja mit der Zellfarbe...
nur in der Spieletabelle geht es nicht
hier als info dazugestellt , die zeile mit dem "if instr..." macht die farbige zelle
Do
Zeile = ein.ReadLine
aus.WriteLine (Zeile)
Loop Until (Zeile = "") And (ein.AtEndOfStream True)
i = i + 5
Do
Zeile = "
Then Zeile = Zeile & " bgcolor=""#" & Farbe & "\ """""
Zeile = Zeile & ">" & ActiveSheet.Cells(i, 4).Value & _
"
"
"
"
aus.WriteLine (Zeile)
AW: Formatübernahme in html
Alfons
also dein VBA-Code ist tendenziell etwas unübersichtlich ;-)
Kannst Du deine Datei mal hochladen?
Gruß
Alfons
http://vba1.de
AW: Formatübernahme in html
Andreas
hallo alfons
danke für deine mühe, aber ich hab noch keine datei bei euch reingeladen?
wie muß ich das machen?
nur die exceldatei wohin senden?
sorry wenn ich zublöd bin, vieleicht über diesen "File-upload" ?
danke und Gruß
andreas
AW: Formatübernahme in html
Andreas
ich nochmal hallo alfons
hier mal der hochladeversuch einer abgespeckten version der datei
https://www.herber.de/bbs/user/68773.xls
dazu ist sich vorzustellen, das in der "großen datei mehr mannschaftsblätter bestehen
dafür mehr spiele und so weiter
hoffe das hilft dir, es sollte so sein, das die gelben Zellen (mein team) auch im html dann erscheinen.
dazu brauchst du zum testen aber eine leer.htm datei im gleichen verzeichnis...
aber was sag ich, du bist doch der profi
nochmal danke für deine mühe
grüße andreas
AW: Formatübernahme in html
Alfons
Hallo,
Datei ist angekommen. Da muss man sich aber erstmal reindenken.
Um das zu vereinfachen:
In welcher Tabelle klickst Du auf welchen Button um für was, die HTML zu erstellen?
Wie sieht bislang deine (farblose) HTML aus?
Wie sieht deine Dateistruktur aus (z.B für Berichte.txt)?
Um welchen Verein geht es eigentlich?
Gruß an Mario...
Alfons
http://vba1.de
AW: Formatübernahme in html
Andreas
Hallo Alfons, danke erst mal das du dir die Mühe machst
Hier eine kurze erklärung der Datei
An Saisonbeginn gebe ich die Spiele im Blatt "1.Mannschft" ein, dort werden dann
auch später die Ergebnisse immer aktualisiert.
Im Blatt "Gesamtplan" durch Klick auf den Button "Spielplan erstellen" entsteht die Seite
im Blatt "Spiele", dort kommen dann die Einzelergebnisse rein
Im Blatt "Schnittliste" auf Button "aktualisieren" wertet die Einzelergebnisse aus, erstellt diese
Schnittliste, und exportiert diese als html über eine "leer-html...., das funzt ja auch super
eigentliches "Problem" ist in Blatt "1.Mannschaft"... dort gebe ich wie gesagt die Ergebnisse ein...
klicke dann den Button "Tabelle" an, der aktualisiert die unten stehende Rangtabelle,
und macht aus dem ganzen Tabelleblatt wieder über eine "leer-html" eine "herren1.html", die ich dann
nur noch auf meine Webseite schiebe, was ja super funktioniert.
Zu sehen unter http://home.mnet-online.de/tsv-hemhofen , unter Ergebnisse-Herren1-Spiele und Tabellen
Da es aber sehr viele Spiele sind, hebe ich unsere Mannschaft (TSV Hemhofen)
auf der Webseite immer durch Hintergrundfarbe hervor, und genau das übernimmt er nicht,
wenn ich in der Excelliste die Zellen vorher "einfärbe".
Noch was als info
"Berichte.txt geht noch nicht, genau so wie die sortierfunktion auf der Webseite
und den button "html" im Blatt "gesamtplan" habe ich bisher nicht benutzt
Vielen Dank im Voraus nochmal und ich hoffe die erklärung reicht aus
mit besten Grüßen aus dem Frankenland
Andreas
PS: mit Mario meinst du den Mario Seeberger?
AW: Formatübernahme in html
Alfons
Hallo Andreas,
muss dich leider enttäuschen: die Datei habe ich mir zwar kurz angesehen aber
der Aufwand ist mir einfach zu gross.
Da musst Du wohl selber ran...
Trotzdem noch ein Tipp für die nächsten Propjekte:
geh mal im Editor auf Extras/Optionen und mach einen Haken bei Variablendeklaration erforderlich.
Dann wird dir das mit diesem "Dim" auch klarer,
Gruß
Alfons
http://vba1.de
AW: Formatübernahme in html (abgeschlossen)
Andreas
Hallo Alfons
alles klar, trotzdem noch mal vielen danke das du dir das angesehen hast,
werd es schon irgend wie rausfinden...
und dankefür den tipp, werde ich machen...
bis vieleicht demnächst wiedermal
Grüße Andreas
He, Andreas, was hast du denn mit dem...
Luc:-?
…Eingabeformular gemacht? Das nächste mal nicht wieder die Tags für Zeilen- und Tabellenende vergessen. Lässt sich im Nachhinein extern kaum reparieren und lässt Vielen die Lust auf eine Antwort vergehen. Die Text-Zentrierung habe ich beim besten Willen nicht wegbekommen!
Wenn ich dein Problem so lese, denke ich, du bist mit einem dieser (Semi-)Profi-Tools zur Tabellendarstellung als HTML-Code besser bedient als mit Alfons' nettem Versuch… ;-)
(Nix für ungut Alfons, irgendwo muss man ja mal anfangen und meine offizielle Version ist auch nicht viel weiter, aber ich hab' die Tools für nahezu alles andere!)
Denn ich vermute Bedingt-Formate in deiner Quelle. Was da die Jeanie kann, weiß ich nicht und es interessiert mich auch nicht, aber Beverly muss sich auf jeden Fall damit auseinandergesetzt haben. Also besuche ihren Excel-Inn und teste das.
Ansonsten wäre die Ermittlung der reellen aktuellen Farbe einer Zelle eines der kompliziertesten VBA-Probleme überhaupt, besonders bei einer lokalen xlVersion und dann womöglich noch ab xl12. Ich habe dafür über 1000 Codezeilen gebraucht (ohne xl12, allerdings nicht nur für die Farbe) und dabei sind auch die wichtigen Unterpgmm noch nicht mal mitgezählt.
Gruß Luc :-?