Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
808to812
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
808to812
808to812
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Shell Befehle sind nicht ausführbar

Shell Befehle sind nicht ausführbar
11.10.2006 01:52:45
Andrej
Hallo Leute,
folgendes Problem: Shell Kommando wird ignoriert.
Weiß jemand warum der Shell Befehl von VBA nicht ausgeführt wird?
Syntax ist korrekt, auf dem Arbeitsplatz funktioniert wunderbar.
Zuhause jedoch nicht.
Betriebssystem ist XP Home SP2.
Vielen Dank.

15
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Shell Befehle sind nicht ausführbar
11.10.2006 23:44:53
Reinhard
Hi Andrej,
folgendes Problem: Shell Kommando wird ignoriert.
du stehst im Editor und drückst mehrmals F8, Shell wird gelb markiert aber nicht ausgeführt?
Syntax ist korrekt, auf dem Arbeitsplatz funktioniert wunderbar.
Du siehst das so, poste mal den Code.
Zuhause jedoch nicht.
Betriebssystem ist XP Home SP2.
Auf dem Arbeitsplatz oder/und Zuhause?
In die Glaskugel schaue, liegt an unterschiedlichen Pfaden *mutmaß*
Gruß
Reinhard
AW: Shell Befehle sind nicht ausführbar
12.10.2006 00:01:08
Andrej
Hallo Reinhard,
erstmal Danke für die Interesse.
So jetzt die Antworten auf die Fragen:
ja mit F8 wird gelb markiert, passiert aber nichts, mit F5 das gleiche
BeispielCode

Sub test()
Shell ("C:\WINDOWS\system32\notepad.exe")
End Sub

Zuhause ist bei mir XP Home SP2, am Arbeitsplatz XP Pro
Sehr merkwürdig, kann da Firewall eine Rolle spielen,
oder ein Dienst ist deaktiviert?
Über Eingabeaufforderung direkt funzt es.
Anzeige
AW: Shell Befehle sind nicht ausführbar
12.10.2006 15:52:31
W.Itzich
Hi,

Sub test()
Dim s
s = Shell("C:\WINDOWS\system32\notepad.exe", 1)
End Sub

mfg W.
AW: Shell Befehle sind nicht ausführbar
12.10.2006 23:28:27
Andrej
Danke,
hat's leider nicht geholfen.
im Lokalfenster mit F8 nimmt die Variable s den Wert 0
AW: Shell Befehle sind nicht ausführbar
12.10.2006 23:36:33
W.Itzich
Hi,
das kann ganz einfach nicht sein!
Überprüfe den Pfad zum Notepad.
mfg W.
AW: Shell Befehle sind nicht ausführbar
12.10.2006 23:46:43
Andrej
wie gesagt,
an meinem Arbeitsplatz funktioniert es auch
AW: Shell Befehle sind nicht ausführbar
13.10.2006 00:10:27
Reinhard
Hi Andrej,
ich frage nochmal nach.
Du hast 2 Rechner. Wenn du bei beiden über Start--Ausführen
C:\WINDOWS\system32\notepad.exe
eingibst, so funktioniert das bei beiden Rechnern und Notepad wird gestartet.
Sub test()
Dim s
s = Shell("C:\WINDOWS\system32\notepad.exe", 1)
End Sub
funktioniert nur bei einem der beiden Rechner, bei dem Anderen ist s=0 bzw es tut sich nix.?
Wenn dies alles richtig ist, dann klinke ich mich aber aus dem Thread aus, weil keinen Plan mehr was das sein könnte.
evtl: Zugriffsrechte, darfst du keine Exe starten?
evtl: Du gehst mit der Frau des Admins fremd und er weiß das inzwischen? *smile*
Poste mal den Pfad zu Notepad von rechner 1 und 2
Gruß
Reinhard

Gruß Reinhard ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Shell Befehle sind nicht ausführbar
13.10.2006 00:26:23
Andrej
Hallo Reinhard,
beide deine Fragen kann ich mit "ja" beantworten.
Funktioniert allerdings nicht auf meinem Rechner zu Hause,
wo ich als Admin angemeldet bin!
Eigentlich geht's mir um das Starten von einer Batch Datei.
Am Arbeitspaltz habe ich testweise einfach notepad.exe per VBA
gestartet, und das ging. Zuhause nicht.
So ist meine Frage: was kann die Ausführung außer des falschen
Syntax verhinden?
AW: Shell Befehle sind nicht ausführbar
13.10.2006 00:36:16
Reinhard
Hi Andrej,
beide Fragen mit "ja"!? aha, ist sie nett? :-)
Im Ernst, batch ist gutes Stichwort, wie wärs als workaround mit:
close
open "c:\test\notep.bat" for output as #1
print #1, "C:\WINDOWS\system32\notepad.exe" ' oder "C:\WINDOWS\system32\notepad.exe MeineDatei.txt"
close #1
Starten=shell("c:\test\notep.bat")
Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Shell Befehle sind nicht ausführbar
13.10.2006 00:57:27
Andrej
Hallo Reinhard,
mit der Frau des Admin habe ich leider pech.. ;-)
bei der Zeile:
Print #1, "C:\WINDOWS\system32\notepad.exe"
kommt Laufzeitfehler 54 - Falscher Dateimodus
?
AW: Shell Befehle sind nicht ausführbar
13.10.2006 01:04:38
Reinhard
Hi Andrej,
grad getestet, XL9,0, Code funktioniert und Notepad wird gestartet, einzige Änderung ist das Dim wegen Option Explicit
Sub tt2()
Dim Starten
Close
Open "c:\test\notep.bat" For Output As #1
Print #1, "C:\WINDOWS\system32\notepad.exe" ' oder "C:\WINDOWS\system32\notepad.exe MeineDatei.txt"
Close #1
Starten = Shell("c:\test\notep.bat")
End Sub

Gruß
Reinhard
ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
AW: Shell Befehle sind nicht ausführbar
13.10.2006 01:16:53
Andrej
Hi Reinhard,
bei mir kommt gleicher Fehlercode raus.
Tja, das Problem liegt entweder an der installierten Version,
oder sperrt die Ausführung was in meinem Rechner.
Werde vielleicht auch 2000 Version installieren und noch mal probieren
Gruß, Andrej
AW: Shell Befehle sind nicht ausführbar
13.10.2006 01:23:47
Reinhard
Hi Andrej,
vielleiocht findet sich noch jmd der auch 10.0 hat und das mal testet.
kappe mal die Internetverbindung, dann deaktiviere alles was da Virenschutz oder Firwall oder sonstwas in der Art ist , klappt dann der Code?
Gruß
Reinhard
AW: Shell Befehle sind nicht ausführbar
13.10.2006 01:40:45
Andrej
ich mach's morgen (genauer gesagt heute abend),
ist ein ein bießchen ;-) spät geworden.
Also bis dann,
Gruß, Andrej
Anzeige
AW: Shell Befehle sind nicht ausführbar
13.10.2006 02:07:52
Andrej
Reinhard vielen Dank für den Tip,
unglaublich aber Kaspersky war schuld, kann doch nicht wahr sein!!!
Ich habe doch getestet und siehe da...
So jetzt geht's, muß noch rausfinden, was das für eine Einstellung in Kaspersky ist.
Schöne Grüße, Andrej

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige