Beiträge von Wotan

Hat funktioniert, dieses ControlClick etc hat mir gefehlt Danke euch!

#include <Excel.au3>
#include <ExcelConstants.au3>
#include <Date.au3>
#include <MsgBoxConstants.au3>

Local $Excel = "Excel.exe"

ShellExecute ($Excel)

Local $hWnd = WinWait ("Book1 - Microsoft Excel", "",2)

Send ("^s")

Damit öffnet sich dann "Speichern-unter" ich will oben den Speicherungspfad ändern, wie kann ich das machen?

Es würde eher um das Verständnis des Anwählens der oben genannten Abschnitte gehen, also in welche Funktion ich das einbauen muss. Ich möchte das generell wissen, auch außerhalb von excel

Damit stelle ich fest wie die Felder heißen ja, bzw. bekomme Informationen über die Felder, aber wie baue ich diese in die Formel ein?

Wie kann ich diese Bereich anwählen? Welche Funktion kann ich dafür nutzen?
Ich habe mal mit Window Info versucht zu schauen wie die Bereiche heißen, mir fehlt aber dennoch die Vorgehensweise, was ich mit den Informationen anfangen soll

Hallo,

ich habe eine Frage bezüglich des Speichervorgangs in Excel.
ich möchte den Dateipfad anwählen und dann selbst einen Pfad hineinschreiben können. Dazu noch den Dateinamen und den Dateityp ändern können. Siehe angehängte Bilder
Wie kann ich diese einzelnen Bereich anwählen?

Ich danke euch sehr!

Jetzt verstehe ich das! Vielen Dank euch!

Beim Lösungsvorschlag von BananaJoe, verstehe ich die Angaben in der MessageBox überhaupt nicht...

So jetzt hat es funktioniert. Die Lösung von Yaerox hat funktioniert, allerdings mit der Änderung des $iRetVal = 0 statt = 1 wie du es in der Lösung hattest.

Die anderen Lösungen haben irgenwie nicht so funktioniert.... Danke trotzdem für eure super schnelle Hilfe!

Hallo Yaerox,

danke dir für deine Hilfe, dennoch sagt er mir jetzt das der "Speichervorgang nicht möglich" war, aber er ist doch erfolgreich...
Es sieht jetzt so aus:

_Excel_RangeWrite ($Excel, $Excel.Activesheet, "10","A1:D10")

_Excel_BookSaveAs ($Appl, $Dateipfad)
$iRetVal = _Excel_BookSaveAs ($Appl, $Dateipfad)
If $iRetVal = 1 Then
MsgBox (0,"Excel-Datei", "Überschreiben erfolgreich")
Else
MsgBox(5, "Excel-Datei", "Speichvorgang nicht möglich")
EndIf

_Excel_BookClose ($Excel)
Sleep (2000)
MsgBox (0,"Beenden", "Programm wird jetzt beendet")
_Excel_Close ($Appl,Default, True)

Hallo Leute,

ich bräuchte eure Hilfe, denn ich komme mit der Hilfe nicht mehr weiter...
hier mein Skript:

#include <Excel.au3>
#include <ExcelConstants.au3>
#include <Date.au3>
#include <MsgBoxConstants.au3>




;Öffnen der Exceldatei "Test" aus dem Ordner "Autoit" auf dem Desktop


Local $Appl = _Excel_Open()
Local $Dateipfad = "C:\Users\x0229914\Desktop\Autoit\Test.xlsx"
Local $Excel = _Excel_BookOpen($Appl, $Dateipfad)
Local $Zeit = TimerInit()


Sleep(3000)


_Excel_RangeWrite($Excel, $Excel.Activesheet, "1000", "A1:D10")


_Excel_BookSaveAs($Appl, $Dateipfad)
MsgBox(0, "Excel-Datei", "Überschreiben erfolgreich")
If @exitCode(1) Then
	MsgBox(5, "Excel-Datei", "Speichvorgang nicht möglich")
EndIf


_Excel_BookClose($Excel)
Sleep(2000)
MsgBox(0, "Beenden", "Programm wird jetzt beendet")
_Excel_Close($Appl, Default, True)

Der Fehler muss in den Zeilen 18-22 sein. Ich möchte das er mir eine Nachricht sendet, wenn er die Excel-Datei überschrieben hat und eine Nachricht wenn er aufgrund eines Fehler das nicht geschafft hat.
Das mag für manche eine sehr triviale Frage sein, aber ich bin noch extrem neu in diesem Programm.

Danke für eure Hilfe!!!

Edit bernd670: Quellcode formatiert