Verbindung zu Exceltabellen

Gespeichert von Heike am
im Forum ArcView 3.x classic
Hallo!

Ich bin kein wirkliches Arcview-Genie..deswegen hoffe ich dass mir hier irgend jemand helfen kann?
Also: Ich habe mittels eines Hotlinks und Script mein (Flächen)Thema in Arcview mit verschiedenen Ecxeltabellen verbunden. Das funktioniert auch ganz gut...aber wenn sich die zu der Fläche zugehörige Tabelle öffnet sind deren gesamte Formatierungen weg bzw. verändert. Und ich hab absolut keine Ahnung wie man dieses Problem beheben kann.

Kann mir irgendwer helfen?

Danke - Heike

Gespeichert von Gast am Mo., 18.10.2004 - 13:28

Permalink
Hallo Heike,

die Tabellen werden in Excel geöffnet?
Und wenn Du die Tabellen von Hand öffnest, ist die Formatierung O.K.?

Jörg

Gespeichert von Heike am Mo., 18.10.2004 - 14:46

Permalink
Hey Jörg,

Ich klicke mit meinem Hotlink auf die Fläche-->es öffnet sich excel und die entsprechende Tabelle-->alle Formatierungen sind dann verändert- auch wenn ich im Anschluss die Tabelle von Hand öffne.

Heike

Gespeichert von uwelangehh am Mo., 18.10.2004 - 14:50

Permalink
Hallo Heike,

eine Loesung faellt mir zwar momentan nicht ein, aber vielleicht hilft uns der Quellcode deines Hotlink-Skriptes weiter.

Danke dafuer und Gruss

Uwe

Gespeichert von Heike am Mo., 18.10.2004 - 15:06

Permalink
Ich hab mir den Text für das Script von -->webgis.dyndns.org runtergezogen da ich selbst bis jetzt nur über sehr beschränkte Kenntnisse verfüge was das Programmieren in Arcview angeht. Ich hoffe das meinst du mit Quellcode...:

theVal = SELF

' Prüfen, ob der Wert des Feldes ungleich Null ist
if (not (theVal.IsNull)) then

' Wenn die im Feld angegebene Datei existiert,
' Bild zeigen
if (File.Exists(theVal.AsFileName)) then

' Pfad zur Programmdatei des Explorer
' verwenden funktioniert aber auch ohne Pfad
System.Execute("D:\Programme\Microsoft Office\Office11\Excel.exe "++theVal)

else

' Wenn die Datei nicht existiert, Benutzer
' informieren

MsgBox.Warning("Datei "+theVal+" nicht gefunden.","Hot Link")

end

end


Heike

Gespeichert von uwelangehh am Mo., 18.10.2004 - 16:55

Permalink
Hallo Heike,

eigentlich kann es nicht sein, dass ArcView eine Datei durch das Oeffnen mit System.Execute veraendert. Falls du das dingfest machen moechtest, so kannst du die Tabelle ja vorher auf schreibgeschuetzt setzen. Stutzig machen mich allein die Leerzeichen in deinem Pfad, aber ArcView scheint das ja nicht zu stoeren; zumindest wird der durch ein Leerzeichen getrennte Parameter erkannt und die Tabelle geoeffnet.

Du schreibst, dass nach dem Oeffnen mit dem Arcview-Skript die Formatierungen verloren gegangenen sind. Bist du denn sicher, dass die Formatierungen tatsaechlich gespeichert wurden? Sprich: wenn du eine Tabelle mit Hand oeffnest, ohne sie mit ArcView angefasst zu haben, ist dann alles in Ordnung?

Was passiert, wenn du den Text D:\Programme\ ... meineTabelle.xls unter START -> AUSFUEHREN in der Kommandozeile eingibst? Hast du dann dasselbe Problem wie mit System.Execute? Wenn ja, dann waere die Loesung deines Problems zumindest ausserhalb von ArcView/Avenue zu suchen.

Gruss und Viel Erfolg

Uwe

Gespeichert von Heike am Di., 19.10.2004 - 08:10

Permalink
Guten Morgen Uwe,

Habe gestern meine Tabellen schreibgeschützt gesetzt und die Formatierungen blieben nach dem öffnen mit Arcview erhalten. Ich muss allerdings auch zugeben dass eine Datei fehlerhaft gewesen sein muss, so dass wahrscheinlich deswegen die Formatierungen immer weg waren. Auf alle Fälle danke ich dir recht herzlich für deine Hilfe.

Viele Grüße

Heike

Gespeichert von Gast am Do., 02.03.2006 - 15:32

Permalink
Hallo Heike,

kannst Du mir einen Tipp geben, wie ich meine Excel-Tabelle per Hotlink in mein ArcView 3.2a einfügen kann?

Vielen Dank

Gespeichert von kulle am Di., 28.11.2006 - 16:04

Permalink
alle views schliessen
links den button scripte anklicken
dann auf neu
folgenden text reinkopieren:

theVal = SELF
if (not (theVal.IsNull)) then
if (File.Exists(theVal.AsFileName)) then
'Pfad zur Programmdatei des Viewers
System.Execute("c:\programme\microsoft office\office\excel.exe"++theVal)
else
MsgBox.Warning("File "+theVal+" not found.","Hot Link")
end
end


Achtung: nicht vergessen den Pfad anzupassen, wo er die .exe datei findet
danach auf -->Skript -->Kompilieren
schliessen
fertig
im view dann unter -->thema -->eigenschaften -->hotlink dein script benutzen (script1, wenn du es nicht umbenannt hast)
fertig